copiar de memo para memo

Delphi

13/02/2006

por gentiliza alguem pode me informar como eu copio na intega o texto de um memo para outro via código....


o metodo que eu fiz ele está matando todas as linhas do origem e agrupando tudo na primeira do destinho


Crcam

Crcam

Curtidas 0

Melhor post

Massuda

Massuda

13/02/2006

Acho que isto deve funcionar...
// copia Memo1 para Memo2
Memo2.Lines.Clear;
Memo2.Lines.AddStrings(Memo1.Lines);



GOSTEI 1

Mais Respostas

Aroldo Zanela

Aroldo Zanela

13/02/2006

Colega,

Eu faço da seguinte forma:

  mmo2.Lines.Assign(mmo1.Lines);


No caso, mmo2 recebe o conteúdo de mmo1 (Memos).


GOSTEI 0
Crcam

Crcam

13/02/2006

valeu muito obrigado é uma coisa simples mas que tem muita gente que não sabe...


GOSTEI 0
Truck1n

Truck1n

13/02/2006

Opa, atrazadinho mais vo posta mesmo assim, o importante é ajudar

vc pode deixar ele na area de transferencia...

Delcare Uses: ClipBRD;
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, [b]ClipBrd[/b], StdCtrls;



procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.SelectAll;
Memo1.CopyToClipboard;
memo2.PasteFromClipboard;
Clipboard.Clear
end;


é isso ai.. ai vc ja aprendi sobre o ClipBRD.

fuii


Abraços!


GOSTEI 0
POSTAR