Syntax-Frage: Einem Array mehrere Werte "aufeinmal" zuweisen

[Uwe Raabe]

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.