Código Delphi [-]if Edit.Text <> '' then begin // Hace comprobación de que sean números end;
if Edit.Text <> '' then begin // Hace comprobación de que sean números end;