Фатальная ошибка при любом изменении в проекте.

[Lorden]

Доброго дня господа!
Ситуация следующая:
Написал небольшую программу с 3-мя окнами. Вчера скомпилил все работало хорошо.
Сегодня открываю проект добавляю на форму кнопку и выдает ошибку:

[dcc32 Error] Unit1.pas(68): E2066 Missing operator or semicolon
[dcc32 Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

Думаю ладно, откатываю проект до рабочей версии, открываю проект заново, компилится все хорошо, пробую добавить любой элемент на форму, к примеру Label, опять выдает ошибку.

[dcc32 Error] Unit1.pas(68): E2066 Missing operator or semicolon
[dcc32 Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

и ссылается на строку

while i<=length(t) do begin

в функции

//Если в строке есть русские буквы то меняем их на английские
function Transliterate(S: String): String;
var
  i: integer;
  t: String;
begin
  t:=S;
  i:=1;
  while i<=length(t) do begin
    case t[i] of
      'а': t[i]:='a';   'б': t[i]:='b';   'в': t[i]:='v';   'г': t[i]:='g';   'д': t[i]:='d';   'е': t[i]:='e';
      'ё': begin t[i]:='y'; insert('e', t, i+1); i:=i+1; end;
      'ж': begin t[i]:='z'; insert('h', t, i+1); i:=i+1; end;
      'з': t[i]:='z';   'и': t[i]:='i';   'й': t[i]:='y';   'к': t[i]:='k';   'л': t[i]:='l';   'м': t[i]:='m';
      'н': t[i]:='n';   'о': t[i]:='o';   'п': t[i]:='p';   'р': t[i]:='r';   'с': t[i]:='s';   'т': t[i]:='t';
      'у': t[i]:='u';   'ф': t[i]:='f';   'х': t[i]:='h';   'ц': t[i]:='c';
      'ч': begin t[i]:='c'; insert('h', t, i+1); i:=i+1; end;
      'ш': begin t[i]:='s'; insert('h', t, i+1); i:=i+1; end;
      'щ': begin t[i]:='s'; insert('h''', t, i+1); i:=i+2; end;
      'ъ': t[i]:='''';   'ы': t[i]:='y';   'ь': t[i]:='''';   'э': t[i]:='e';
      'ю': begin t[i]:='y'; insert('u', t, i+1); i:=i+1; end;
      'я': begin t[i]:='y'; insert('a', t, i+1); i:=i+1; end;

      'А': t[i]:='A';   'Б': t[i]:='B';   'В': t[i]:='V';   'Г': t[i]:='G';   'Д': t[i]:='D';   'Е': t[i]:='E';
      'Ё': begin t[i]:='Y'; insert('e', t, i+1); i:=i+1; end;
      'Ж': begin t[i]:='Z'; insert('h', t, i+1); i:=i+1; end;
      'З': t[i]:='Z';   'И': t[i]:='I';   'Й': t[i]:='Y';   'К': t[i]:='K';   'Л': t[i]:='L';   'М': t[i]:='M';
      'Н': t[i]:='N';   'О': t[i]:='O';   'П': t[i]:='P';   'Р': t[i]:='R';   'С': t[i]:='S';   'Т': t[i]:='T';
      'У': t[i]:='U';   'Ф': t[i]:='F';   'Х': t[i]:='H';   'Ц': t[i]:='C';
      'Ч': begin t[i]:='C'; insert('h', t, i+1); i:=i+1; end;
      'Ш': begin t[i]:='S'; insert('h', t, i+1); i:=i+1; end;
      'Щ': begin t[i]:='S'; insert('h''', t, i+1); i:=i+2; end;
      'Ъ': t[i]:='''';   'Ы': t[i]:='Y';   'Ь': t[i]:='''';   'Э': t[i]:='E';
      'Ю': begin t[i]:='Y'; insert('u', t, i+1); i:=i+1; end;
      'Я': begin t[i]:='Y'; insert('a', t, i+1); i:=i+1; end;
    end; {Case}
    i:=i+1;
  end;
  result:=t;
end;

Ошибку выдает не важно в каком из Unit-ов были произведены изменения, валится даже когда я хочу закомментить ненужную переменную.

Сталкивался кто-нибудь с такой проблемой?