Array mit mehreren Strings auf einmal füllen

[Mike_]

Guten Abend,

es ist mir fast peinlich die Frage zu stellen, da Arrays m.E.n. zu den Grundfunktionen gehören, die selbst ein Anfänger wissen müsste bzw. man zur not ergoogeln sollte.

Weder google noch die Boardsuche hat mir dabei jedoch etwas wirklich gebracht.

Aufgabe:
Ich möchte mehrere Strings in ein Array packen.

"Problem":
Die Strings sind bereits dem Programm vorgegeben, so dass ich bisher als einzige Lösung folgendes tat:

[...]
var
ArrayWithData: Array of String;
begin
ArrayWithData[0] := 'a';
ArrayWithData[1] := 'b';
[...]
ArrayWithData[15] := 'c';


Aber dass muss doch auch effizienter gehen ?!
Ich habe im Internet auf einer FreePascal Seite folgenden Quellcode gefunden (Umgeformt auf mein Beispiel):

[...]
ArrayWithData := ('a','b','c');


Das "schluckt" Delphi 2007 aber nicht...
Ich bin ratlos... wie kann ich ein Array fortlaufend füllen ohne den Quellcode "künstlich" aufquillen zu lassen ?

EDIT://
Alternativ kam mir die Idee die Strings in eine StringList zu packen und von dort in ein Array zu verschieben... jedoch habe ich auch bei der Stringlist nur die Möglichkeit gefunden ein Item je Zeile hinzuzufügen...