problema en for

[julyus]

no se que es este tipo de error ?? este codigo me produce el siguiente error e2081 FOR-loop variable i count

Código Delphi [-]
  for iCount := 0 to Length(aEventCode) - 1 do
        begin
          if aEventCode[iCount] = 1 then
          begin

            inc(iMessageId);
          end;
        end;