Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643173 Sun, 13 Mar 2005 16:19:48 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643173 У меня в var'e была объявлена переменная Pos
:wall: :wall: :wall:

Добавлено
J. Bravo спасибо че обратил внимание на var, а то хз скока ещеб пропарился.
з.ы. тока переменные расставлены у меня так
    [B]position[/B],k,t:LongWord;
    st,buf,buf2,res:String;
    cbuf:Char;
    bonus:ShortInt;
]]> tmp Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643159 Sun, 13 Mar 2005 16:06:45 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643159
    var k,i,t: integer;
        s, buf, st: string;

Вот так у меня всё компилируется. У тебя переменные так объявлены?]]> J. Bravo Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643147 Sun, 13 Mar 2005 16:01:14 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643147 Может в типах данных что-то нахимичено? ;)]]> s-mike Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643146 Sun, 13 Mar 2005 15:58:48 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643146 J. Bravo Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643137 Sun, 13 Mar 2005 15:50:54 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=643137
       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));
]]> tmp Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642809 Sun, 13 Mar 2005 09:28:24 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642809
КОД ДАВАЙ!!!]]> Anatoly Podgoretsky Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642804 Sun, 13 Mar 2005 09:18:24 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642804 У тебя пропущен оператор или точка с запятой]]> jack128 Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642800 Sun, 13 Mar 2005 09:12:48 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642800 Chess Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642799 Sun, 13 Mar 2005 09:10:44 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642799 MaxxSoft Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642798 Sun, 13 Mar 2005 09:10:18 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642798 Покажи проблемный участок кода. Или он секретный?]]> Chess Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642797 Sun, 13 Mar 2005 09:10:01 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642797 Если нет, то код покажи - что-то где-то потерял...]]> Snow Silence Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642791 Sun, 13 Mar 2005 09:03:44 +0000 Функция Pos https://forum.sources.ru/index.php?showtopic=86656&view=findpost&p=642791 tmp Delphi: Общие вопросы