Fórum Acrescentar linhas de um memo em outro memo já com texto #294347
02/09/2005
0
Tenho um Memo q possui texto e gostaria de somar acrescentar outro texto q tem em outro memo tipo
Mensagem.Lines:=Mensagem.Lines+FrmCadManut.DBMemo2.Lines;
alguma coisa assim, mas não consegui achar como fazer, alguém pode me ajudar?
Mensagem.Lines:=Mensagem.Lines+FrmCadManut.DBMemo2.Lines;
alguma coisa assim, mas não consegui achar como fazer, alguém pode me ajudar?
Janete
Curtir tópico
+ 0
Responder
Posts
02/09/2005
Motta
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
for i:=0 to (Memo1.Lines.Count-1) do
Memo2.Lines.Add(Memo1.Lines[i]);
end;
var i:integer;
begin
for i:=0 to (Memo1.Lines.Count-1) do
Memo2.Lines.Add(Memo1.Lines[i]);
end;
Responder
Gostei + 0
05/09/2005
Steve_narancic
Mensagem.Lines.add(FrmCadManut.DBMemo2.Lines);
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)