Dann versuche es doch mal, die Variable anders zu benennen.
Code:
type
TStringArray = array of string;
procedure TForm1.ArrayFuellen(var [color=#ff0000]SomeArray[/color]: TStringArray);
begin
SetLength([color=#ff0000]SomeArray[/color], ListBox1.Count);
...
end;
...
...