Just nu i M3-nätverket
Jump to content

Memo1 Edit1 Memo2


Mikey

Recommended Posts

Hur ska jag gör om jag vill få texten från Memo1 till Memo2 och få innehållet i Edit1 att hamna före i Memo2 rutan.

 

Ex:

 

Memo1

-----

ett

två

tre

fyra

 

Edit1

-----

\test

Resultatet i Memo2 ska bli

--------------------------

\test\ett

\test\två

\test\tre

\test\fyra

 

Jag har försökt men jag får inte det att fungera!

Jag vill att den ska känna av hur många rader det finns i Memo1 och bara stoppa värdet från Edit1 framför varje rad, och inte mer. Det ska bli som i exemplet.

 

tack i förhand

 

/mikey

Link to comment
Share on other sites

typ ...

 

var

i:integer

begin

memo2.clear;

for i := 0 to memo1.lines.count -1 do

memo2.lines.add(edit1.text + memo1.lines);

end:

 

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...