Und das arbeiten erst mit einer lokalen Variable bremmst du Angelegenheit nur.
Delphi-Quellcode:
function CopyListToArray(List: TStringList): TStringArray;
var
nCount: Integer;
begin
SetLength(result, List.Count);
for nCount := Low(result) to High(result) do
result[nCount] := List.Strings[nCount];
end;
Windows Vista - Eine neue Erfahrung in Fehlern.