Zitat von
Apollonius:
Das Array enthält Ansistrings, welche Zeiger sind. Dabei wird der Referenzzähler nicht erhöht.
Deswegen ist das
Delphi-Quellcode:
procedure FillArray(var Dest: array of string; const Source: array of string);
var
I: Integer;
begin
for I := 0 to Min(Length(source), Length(Dest)) - 1 do
Dest[I] := Source[I];
end;
auch die sauberste Methode.