Como formatar string no componente MaskEdit ?

Delphi

31/05/2006

E aí, pessoal...

Estou com uma dúvida a respeito do componente MaskEdit... :(

Eu preciso formatar a string (somente números) digitada no componente, preenchendo o lado direito com zeros...

Por exemplo: a propriedade MaxLength foi definida como 6. Seu eu digitar ´1234´, ao teclar TAB o texto deverá ficar como ´001234´

Nâo conseguí entender o help do Delphi para a função Format.

Alguém poderia me socorrer ? :?:

Valew...


Adalberto

Adalberto

Curtidas 0

Respostas

Adalberto

Adalberto

31/05/2006

Errei ao digitar... Na realidade é para preencher o lado esquerdo da string...


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

31/05/2006

Colega,

Uma solução simples é colocar a seguinte instrução no manipulador de evento [b:ced9ffcc0e]OnExit[/b:ced9ffcc0e]:

  (Sender as TMaskEdit).Text  := FormatFloat(´000000´, StrToFloat((Sender as TMaskEdit).Text));



GOSTEI 0
POSTAR