In Function übergebenes dynamisches Array

[RomanK]

Also ich will einen String mit Leerzeichen an den Leerzeichen teilen, die einzelnen Teile werden dann in ein dynamisches Array geschrieben.
Hier der Code:

Code:

function parsen ( var output: array of String; input: string; trennzeichen:char):integer;
var
i,ac:integer;
begin
ac := 1;
setlength(output,ac);    
for i:=0 to length(input) do    
 begin
 if input[i] = ' ' then
  begin                     
  inc(ac);                       
  setlength(output,ac); 
 end
 else                                
  begin
  output[ac]:=output[ac]+input[i]; 
 end;
end;
result := ac;
end;

wenn ich jetzt
setlength(output,ac);
mache dann kommt
[Fehler] Unit1.pas(41): Inkompatible Typen
was mache ich falsch
oder darf ich die Länge eines Übergebenen Arrays nicht verändern
DANKE schonmal![/b]