kleine frage omg *g

**Zero1**

hiho!

also ich möchte gerne den text von der memo2 das mit 2 anderen wörtern zusammengefügt wird und in memo1 ausgibt! pro zeile!

zb.
zeile1: test1 hallo test2
zeile2: test1 hi test2
usw...

prob gebe es keine aber wie kann ich machen das sich das alles automatisch um 1 erhöt wenn ne neue zeile ist?

normal hatte ich das so :
memo1.Text := a+memo2.lines[0]+b+a+memo2.lines[1]+b; wenn ich das so mache wäre das ne menge arbeit *g denn ich brauch ca 1000 lines *g

wolltes mit ner schleife probieren aber funkte nicht?

weis maybe jemand wie ich das am besten lösen kann? danke schon im vorraus! hoffentlich versteht ihr was ich meine *g
ansonsten fragt nochmal :p

markieren

Delphi-Quellcode:

			procedure TForm1.BitBtn1Click(Sender: TObject);

var a,b: String;

begin

 a :='test1';

 b :='test2';

 memo1.Text := a+memo2.lines+b;

 end;

end.

greez Zero1

kleine frage omg *g

kleine frage omg *g

Forumregeln