Ostendo/Delphi – Create a array of string

//Create a list of strings
//Declare
var
aOrders : TStringList;

begin
//create a blank list
aOrders := TStringList.Create;


//add item to list
aOrders.Add('a');

//loop through the items in the list
for x := 0 to aOrders.Count - 1 do
begin
   aOrders.Strings(x)        
end;

end.