como deleta 1 caracter no EDIT depois q ele aparece???

Delphi

01/03/2004

como eu deleto um caracter d um EDIT assim q ele aparecer???
por ex: c eu digitar o ´ponto´ dentro d um EDIT, quero q esse ´ponto´ seja apagado automaticamente....


Mestre5

Mestre5

Curtidas 0

Respostas

Thomaz_prg

Thomaz_prg

01/03/2004

no evento onchange do edit, vc pode verificar o ultimo dígito colocado e retirá-lo caso não queira o mesmo. ex.

if copy( edit1.text , lenght( edit1.text ), 1) = ´.´ then
edit1.text = copy( edit1.text , 1, lenght( edit1.text ) - 1 );

não testei, mas acho que funcionará.


GOSTEI 0
Mestre5

Mestre5

01/03/2004

no evento onchange do edit, vc pode verificar o ultimo dígito colocado e retirá-lo caso não queira o mesmo. ex. if copy( edit1.text , lenght( edit1.text ), 1) = ´.´ then edit1.text = copy( edit1.text , 1, lenght( edit1.text ) - 1 ); não testei, mas acho que funcionará.
valew perfeito, so uma OBS: é [b:136ecc7ab4]LENGTH[/b:136ecc7ab4] :mrgreen: :D


GOSTEI 0
POSTAR