Was ist hier falsch?(Miss. op. or semicolon)

[braingrenade]

Moin leutz !

wieso geht

Delphi-Quellcode:

function makekeystream(key : string;length : integer) : String;
var
  i,i2,i3,z : integer;
  s : string;
begin
i:=0;
repeat
z:=z + integer(key[i]);
until i = length(key)+1;
i := 0;
while i < length do
begin
for i2 := 0 to length(key) do
s := s + inttokeystream(randgen(integer(key[i]),z,9999999));
i:= length(s);
end;

nicht ?

Ich bekomme an jeder stelle an der length() steht den fehler missing operator or semicolon.

ich hab keine plan