Thema: Delphi Prüfen ob (Ganz-)Zahl

Einzelnen Beitrag anzeigen

MikeS

Registriert seit: 3. Mai 2003
Ort: München
157 Beiträge
 
Delphi 7 Professional
 
#6

Re: Prüfen ob (Ganz-)Zahl

  Alt 19. Dez 2003, 05:53
Moin

Mit dem Befehl val kannst du einen String in eine Zahl umwandeln!

Code:
 
...
var zahl: integer;
    code: integer;
begin
val(edit1.text, zahl, code);
...
wenn du zahl als integer deklarierst dann ist code immer dann null wenn dein String eine Zahl ist
die dem Typ Integer entspricht!

Code:
 
...
var zahl: real;
    code: integer;
begin
val(edit1.text, zahl, code);
...
Wenn du Zahl als z.B. real deklariest dann ist code auch dann null wenn z.b. "1.0" in deinem Edit steht!

=> mit code kannst du prüfen ob die Umwandlung erfolgreich war und wenn Sie es war dann stand eine
(Ganz-)Zahl in deinem Edit
Mike Schröder
  Mit Zitat antworten Zitat