Thema: Delphi Addieren

Einzelnen Beitrag anzeigen

Teekeks

Registriert seit: 19. Okt 2008
Ort: Dresden
765 Beiträge
 
FreePascal / Lazarus
 
#4

Re: Addieren

  Alt 27. Jan 2010, 10:01
Zitat von Ouou:
Moin Liebe DPler...

ich bräuchte nen rat und zwar möchte ich 3 editfelder addieren und die summe in ein anderes ausgeben.

Hier mal mein Code:

Edit5.Text := StrToFloatDef(PersonalNk1.Text,0) + StrToFloatDef(PersonalNK2.Text,0) + StrToFloatDef(PersonalNK3.Text,0); Beim Compilieren tritt aber immer ein Fehler auf...

Kann jemand helfen?

MFG
Mach das so:
Edit5.Text := FloattoStr(StrToFloatDef(PersonalNk1.Text,0) + StrToFloatDef(PersonalNK2.Text,0) + StrToFloatDef(PersonalNK3.Text,0)); Du musst ja deine In Zahlen umgewandelte Strings dann auch wieder in einen String zurück-Wandeln...

Gruß Teekeks

EDIT: Wo ist der rote Kasten hin??
Peter
"Div by zero Error" oder auch: "Es geht auch ohne Signatur!".
  Mit Zitat antworten Zitat