Addieren

[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:

Delphi-Quellcode:

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

[tkone]

am besten kann man dir helfen wenn du immer die fehlermeldung mit angibst.
"ein fehler" ist da zu ungenau ;)

ich würde mal sagen, dass du nen float-wert an ein edit feld gibst bringt den fehler.
editfelder wollen nen string

[daddy]

Du weist da einem String einen Real-Wert zu, musst also das Ergebnis Deiner Addition noch mit FloatToStr umwandeln.

Gruß
Daddy.

[Teekeks]

Zitat:

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:

Delphi-Quellcode:

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:

Delphi-Quellcode:

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??

[Ouou]

ahh ok danke euch vielmals habe es verstanden klappt auch wunderbar...

Bis denn