Zitat von
Uwe Raabe:
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.
Das ist tatsächlich die eleganteste Lösung.
Zugelernt habe ich, daß der Anfang eines Array in der Procedure immer mit 0 beginnt, obwohl das übergebende Array einen ganz anderen Indexbereich hat. z.B. von 4 bis 8.