Foros Club Delphi - Ver Mensaje Individual - Como limitar ingreso de l 1 al 10 en un edit

[Caral] · #2 23-03-2011

Hola

Código Delphi [-]procedure TForm1.Edit1Change(Sender: TObject);
var valor: integer;
begin
   Valor:= 10;
   If Valor < StrToInt(Edit1.Text) then
   Showmessage('es mayor de 10');
end;

Saludos