Thema: Delphi Immer +1 nehmen

Einzelnen Beitrag anzeigen

SirTwist

Registriert seit: 28. Sep 2006
198 Beiträge
 
Delphi XE Professional
 
#14

Re: Immer +1 nehmen

  Alt 9. Feb 2009, 14:24
Hi,

Zitat von luckys41:
Aber wie kann ich es realisieren das es immer +1 genommen wird?
wieso machst Du diese grauenhaften Konvertierungen von String nach Zahl und zurück? Speicher die Anzahl der "1"en in einer lokalen Variable, die du jedesmal um eins erhöhst, wenn Du vom Server etwas bekommen hast. Und diese Zahl schreibst Du dann in Dein Edit-Feld. Wozu ist das eigentlich ein Edit-Feld? Soll das irgendwer ändern können?

Delphi-Quellcode:
  str := Socket.ReceiveText;
  zahl1 := StrToFloatDef(str, 0);
  Anzahl := Anzahl + zahl1;
  Edit1.Text := FloatToStr(Anzahl);
Gruß,
Sir Twist
  Mit Zitat antworten Zitat