Tema
:
validar el ingreso a un Edit solo numeros
Ver Mensaje Individual
#
22
12-01-2009
miado
Miembro
Registrado
: mar 2008
Posts
: 28
Reputación
:
0
algo sencillo
Puedes utilizar esto en el evento OnKeyPress del Edit;
procedure TForm1.DBEdit1KeyPress(Sender: TObject;
var Key: Char);
begin
if (StrScan('1234567890', Key) = nil) and (Key <> #8) then Key := #0;
end;
miado
Ver Perfil
Encontrar Todos los Mensajes de miado