Zitat von
Blup:
..., damit ist die direkte Übergabe von TStrings-Property nicht möglich.
Delphi-Quellcode:
procedure FillWithNumbers(const aList: TStrings);
var i: integer;
begin
aList.Clear;
for i := 0 to 100 do
aList.Add(Format('%d',[i]));
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
FillWithNumbers(Memo1.Lines);
end;
Komischerweise funktioniert das bei mir, obwohl ich das wohl schon seit Jahren falsch mache.