Bloqueando Caracter
Caros colegas, gostaria de saber como posso bloquear a digitação de um determinado caracter em um Edit.
Mais especificamente o caracter ponto(.)
Obrigado desde já.
Mais especificamente o caracter ponto(.)
Obrigado desde já.
Manjuneiro
Curtidas 0
Respostas
Macario
22/04/2004
Ola programador, beleza?
voce pode estar usando assim
onde 46 é o codigo ANSI para ´.´ e 0 anula a tecla
caso queira bloquear a digitação de outros caracteres procure uma tabela ANSI, valeu.
voce pode estar usando assim
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key = #46 then
key := 0;
end;
onde 46 é o codigo ANSI para ´.´ e 0 anula a tecla
caso queira bloquear a digitação de outros caracteres procure uma tabela ANSI, valeu.
GOSTEI 0
Orlando Frade
22/04/2004
No envento OnKeyPress coloque o seguinte código:
if Key=#46 then Key := 0;
GOSTEI 0