Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - On-Click-Event


Major1337 - Mo 28.09.09 19:32
Titel: On-Click-Event
Tag,
das Event On-Click soll nach jedem Klick auf den Button die Zeichenkette, in diesem Falle Teststring an Edit1 übergeben.
Bei meinem Code wird der String nur einmal an Edit1.Text gesendet egal wie oft ich den Button klicke.
Hier der Code:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.Button1Click(Sender: TObject);
begin

Edit1.Text := 'Teststring';

end;


Bitte um Hilfe ;-)


Mit freundlichen Grüßen
Major


jaenicke - Mo 28.09.09 19:58

Beispiel:
Du willst 4 Äpfel und 4 Birnen in einen Korb legen.
Würdest du das dann so machen, dass du sagst "In den Korb: 4 Birnen"? Nein, du würdest beides hineinlegen...

Du aber legst in das Editfeld ja nur den neuen String, es soll aber der alte (Edit1.Text) plus der neue ('Teststring') hinein.


der organist - Mo 28.09.09 20:01

naja, wenn du willst, dass der String immer angehängt wird, solltest du dem Edit auch den bisherigen Text UND den String geben:


Delphi-Quelltext
1:
TestEdit.Text:=TestEdit.Text+'Teststring';                    


EDIT: Also, dass es immer noch die anderen gibt :P

Gruss,