validar el ingreso a un Edit solo numeros

[[BlueSteel]]

Hola,

Tambien puedes utilizar el componente de la JVC (Jedi).. el JvValidateEdit.. es muy bueno

y con respecto a esto

Empezado por brakaman

Algo como esto.

Código Delphi [-]
procedure TForm1.EDit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9','.',#8]) then
begin
key:=#0;
showmessage('Por favor introduzca numeros')
end
end;
Saludos

creo que falta intervenir en el evento onExit del Edit1... para dar solución a esto

y si no se ingresa nada que salga un mesaje que no a ingresado numeros

ya que si no presiona ninguna tecla, el mensaje anterior no aparecerá...

Código Delphi [-]
If Edit1.Text = '' Then
   ShowMessage('Debe ingresar un dato');

Salu2