edit q só aceita numeros

Delphi

19/08/2005

Ai gente alguem sabe como fazer para meu edit só aceitar numeros e parentese () e traços - ???


Arturbarbozaa

Arturbarbozaa

Curtidas 0

Respostas

Rjun

Rjun

19/08/2005

Você pode fazer isso no evento onKeyPress, embora não funcione para caso o usuário copie e cole um caracter inválido.

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if (not(key in [´0´..´9´, ´)´, ´(´, ´.´])) then
    key := 0;
end;



GOSTEI 0
Marcio.theis

Marcio.theis

19/08/2005

Você tb pode utilizar o componente [url=http://www.revolution.com.br/delphistop/tredit.zip]RealEdit[/url].


GOSTEI 0
POSTAR