Hintereinander schreiben ...

[Devilo]

Ich hab keine bessere Themen-Überschrift gefunden ... :gruebel:

MEIN PROBLEM: Ich will (z.B. mit "Edit1.Text:='text ... blabla';)
was in ein Edit-Fenster reinmachn ... funktioniert auch ... aba ich will mehrere Texte hintereinander in dieses Fenster (Memo, Edit) ...

Beispiel: ich klick auf nen Button (INHALT: "Edit1.Text:='text ... blabla';) ---> der TExt wird ins Edit-Fenster eingefügt. und danach klick ich auf nen andern Button der einen anderen Text einfügen soll ...
ABER DANN GEHT DER ALTE TEXT WEG UND DAS iS NICH GUT ...

keine ahnung wie das geht ... :wall:

Danke leude :freak:

[ims]

Delphi-Quellcode:

form1.edit1.text := form1.edit1.text + deinNeuerText

gruss, ims

[Tyrael Y.]

für das erste Button

Delphi-Quellcode:

Edit1.Text := 'Koch'

für das zweite Button

Delphi-Quellcode:

Edit2.Text := Edit1.Text + 'Salz'

Ergebis in Edit2 ist Kochsalz

in der art?
oder habe ich dich falsch verstanden?

Gruß

[choose]

Hallo Devilo,

das Konkatenieren von Strings (Aneinanderhängen) unter Delphi ist mithilfe des plus("+")-Operators relativ schlicht gelöst

Delphi-Quellcode:

myString:= 'A text';
myString:= myString+' and another text.';
Showmessage(myString);

Dank des Konzepts der Delphi-Properties (Eigenschaften) kannst Du so ganz ähnlich mit Eigenschaften von Objekten (zB TEdit.Text) verfahren. Arbeite mit ihnen einfach so, als wenn es Variablen wären (was natürlich nur bedingt stimmt).

[Devilo]

Jut Leude reicht ...

Cool danke ...

Ihr habt mia geholfen ... Danke :dancer:

Bye

[Devilo]

Und wie mach ich das ... wenn es sozusagen nach einem Zufallsprinzip funktioniert ...

Das es z.B. 100 verschiedene Buttons gibt, mit verschiedenen Texte
und diese Texte sollen alle in der Reihenfolge erscheinen, wie ich sie anklicke. und alle sollen nua in einem Edit-Fenster erscheinen ...

DANKE LEUDE

[MrKnogge]

Wenn du mirdie Frage mal erklärst kann ich dir sicher helfen,
aber ich versteh nur Bahnhofundkofferklau :shock:

[Matze]

schlechte Lösung, aber geht:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Stringavriable:=Stringvariable+'zugehoriger Button-Text';
end;

Das bei jedem ButtonClick hinschreiben :mrgreen:

[MrKnogge]

Aber weis meint er mit Zufallsprinzip ?

[Matze]

Oh stimmt, das hab ich auch nicht verstanden :oops: