Einzelnen Beitrag anzeigen

Benutzerbild von Binärbaum
Binärbaum

Registriert seit: 19. Jan 2005
Ort: Elstra
764 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: Zeilenblock in Memo einfügen...

  Alt 14. Feb 2005, 23:12
Vielleicht so:
Delphi-Quellcode:
var sl: TStrings;
begin
 sl:= TStrings.Create;
 sl.AddStrings(Memo1.Lines);
 sl.AddStrings(Memo2.Lines);
 Memo1.Clear;
 Memo1.AddStrings(sl);
 sl.Free;
end;
(ungetestet)

MfG
Binärbaum
There are exactly 10 kinds of people: those who understand binary, and those who don't.
---
"Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek
  Mit Zitat antworten Zitat