Thema: Delphi is wert ein integer

Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.323 Beiträge
 
Delphi XE2 Professional
 
#5

Re: is wert ein integer

  Alt 7. Feb 2006, 11:09
Hallo,

leider gibst du keine Delphi-Version an.

Ab Delphi 7 könntest das machen:


ich geh davon aus, dass dein Textfeld ein Edit ist - bei mir Edit1
Delphi-Quellcode:
var
  i: Integer;

begin
  i := StrToIntDef(Edit1.Text, 1);
end;
Wenn der Wert deines Textfeldes (Edits) ein Integer ist, wird Dieser an i übergeben. Wenn nicht, dann wird der Defaultwert (hier 1) übergeben.

....

ansonsten kannst es so machen:

Delphi-Quellcode:
var
  i: Integer;

begin
  try
    i := StrToInt(Edit1.Text);
  except
    i := 0; //oder was auch immer du dann machen willst, wenn der Wert des Textfeldes kein Integer ist.
  end;
end;
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat