Código Delphi [-]If StrToIntDef(Edit1.Text,-1) = -1 then Valor_Incorrecto
If StrToIntDef(Edit1.Text,-1) = -1 then Valor_Incorrecto