Zeilen mit Stringliste bis zu bestimmten Zeichen auslesen

[marabu]

So geht das nicht. Wenn du die Namensliste in der Funktion selbst erzeugen möchtest, dann so:

Delphi-Quellcode:

procedure CreateNames(s: TStrings): TStrings;
var
  i: Integer;
begin
  Result := TStringList.Create;
  for i := 0 to Pred(s.Count) do
    Result.Add(s.Names[i]);
end;

marabu