Функция Pos , кидается ошибкой "Missing operator or semicolon"

Вобщем-то в проге юзаю стандартную функцию поиска подстроки в строке, задаю оба параметра. А когда пытаюсь скомпилить, то выкидывается ошибка "Missing operator or semicolon". Как это поправить?

Забыл точку с запятой поставить в предыдущей строке. (скорее всего).
Если нет, то код покажи - что-то где-то потерял...

По-моему, без кода сложно что-то сказать.
Покажи проблемный участок кода. Или он секретный?

Ну хоть код покажи...

Втроём одновременно добавили посты одного и того же содержания

А я и без кода могу сказать :-)
У тебя пропущен оператор или точка с запятой

ну вы и попросили, это же особоохраняемый секрет.

КОД ДАВАЙ!!!

Сообщение отредактировано: Anatoly Podgoretsky - 13.03.05, 09:28

   repeat
   buf:=s;
   Delete(buf,1,k-1);
   Delete(buf,i+1,Length(buf)-i);
   k:=k+i;
   t:=Pos(buf,st); - здесь кидается ошибкой
   Delete(st,t,i);
   until (k>=Length(s));

Неплохо было бы ещё показать раздел объявления переменных.

Не должен бы...
Может в типах данных что-то нахимичено?

var k,i,t: integer;
    s, buf, st: string;

Вот так у меня всё компилируется. У тебя переменные так объявлены?

У меня в var'e была объявлена переменная Pos


Добавлено 13.03.05, 16:21
J. Bravo спасибо че обратил внимание на var, а то хз скока ещеб пропарился.
з.ы. тока переменные расставлены у меня так

[B]position[/B],k,t:LongWord;
st,buf,buf2,res:String;
cbuf:Char;
bonus:ShortInt;