[Delphi] Z Memo1.Lines kopiuj do Memo2.Lines..?

Hej!

Weźcie mi przypomnijcie jak się kopiowało z Memo1 do Memo2 za pomocą SpeedButtona.

Czy to było jakoś tak..

Memo1.Lines.Copy:=Memo2.Lines;

Oj wątpie że to to.

AdSoft

---

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
Memo2.Lines := Memo1.Lines;
end;

//----------------------
admin(at)beldzio(dot)com
www.beldzio.com
www.beldzio.com/forum
gg :3183960

cytat:Bełdzio napisał:

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
Memo2.Lines := Memo1.Lines;
end;

//----------------------
admin(at)beldzio(dot)com
www.beldzio.com
www.beldzio.com/forum
gg :3183960

Niestety ale ten kod nie dziala tylko kasyje memo. Juz dorwałem kod :):

Memo1.SelectAll;
Memo1.CopyToClipboard;
Memo2.PasteFromClipboard;

a odwrotnie:

Memo2.SelectAll;
Memo2.CopyToClipboard;
Memo1.PasteFromClipboard;

8)

AdSoft

cytat:Anonymous napisał:
Niestety ale ten kod nie dziala tylko kasyje memo. Juz dorwałem kod :):

?? co CI nie działa wszystrko działa, a to co Ty robisz to niepotrzebna zabawa ze schowkiem

//----------------------
admin(at)beldzio(dot)com
www.beldzio.com
www.beldzio.com/forum
gg :3183960

---

cytat:Anonymous napisał:

cytat:Bełdzio napisał:

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
Memo2.Lines := Memo1.Lines;
end;

Niestety ale ten kod nie dziala tylko kasyje memo.

Dziala, dziala, musialy Ci sie Memo pokrecic i pusty kopiowales do pelnego ;P

"Człowieka można zniszczyć ale nie pokonać"
Ducha nie można ani zniszczyć ani pokonać.
Ducha X - nawet nie pytaj.
;)

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl