'Eigenbau Shell' verschluckt Chars

[Muetze1]

Zitat von nEmai:

Danke, dann mach ichs so. (Wie einfach.. )

Geht noch einfacher, ohne Schleife:

Delphi-Quellcode:

procedure TForm1.Print;
begin
  Memo1.Lines.AddStrings(FText);
end;