bloquea os campo??

Delphi

21/03/2003

Como que eu faço para bloquear o edit só para numero?


Anonymous

Anonymous

Curtidas 0

Respostas

Biscalquini

Biscalquini

21/03/2003

é só colocar no evento onkeypress deste:

If not( key in[´0´..´9´,#8] ) then
begin
beep;
key:=0;
end;

pronto!!!


GOSTEI 0
Marcelo Saviski

Marcelo Saviski

21/03/2003

No evento on key press digite isto

if (not key in [´0´..´9´]) and (not ((ord(key) > vk_left) and (ord(key)<vk_down) and (not key = 8) and (not key = 46)) then key := 0;


Isto testa se a tecla pressionada está entre 0 e 9, se é alguma das setas de movimentação, backspace ou delete


GOSTEI 0
POSTAR