Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.06.03;
Скачать: CL | DM;

Вниз

поиск подстроки POS   Найти похожие ветки 

 
Leshas0 ©   (2007-05-14 11:56) [0]

Добрый день!

столкнулся с простой задачей, но в чём проблема не могу понять.

есть переменная buf: string[255];

нужно найти знак ";" (тчк с зпт).

Делаю так:
           while Pos (";", buf) > 0 do
             begin
               tmp := concat (tmp, buf[i]);
             end;

Delphi показывает ошибку:
Missing operator or semicolon

В чём м.б. проблема?

Спасибо!


 
MBo ©   (2007-05-14 12:05) [1]

вместо Concat можно использовать +
tmp := tmp + buf[i];

А код вообще-то странный, и не особо соответствует заявленной задаче, и цикл бесконечный.


 
leshas0 ©   (2007-05-14 12:12) [2]

дело не в concat, в ошибке при вызове функции Pos

          while Pos (";", buf) > 0 do // !!!!!!!! ОШИБКА В ЭТОЙ СТРОКЕ
            begin
              // дальнейшие действия
            end;

В мануале именно столько аргументов. Что ещё хочет Delphi я не пойму.


 
MBo ©   (2007-05-14 12:23) [3]

В этой строке ошибки (синтаксической) нет, ищи выше по тексту


 
leshas0 ©   (2007-05-14 12:25) [4]

но дельфи ссылается именно на Pos (";", buf) > 0  :(


 
Плохиш ©   (2007-05-14 12:49) [5]


> leshas0 ©   (14.05.07 12:25) [4]
> но дельфи ссылается именно на Pos (";", buf) > 0

Потому что в предыдущей строке точка с запятой, оканчивающие в паскале оператор, не поставлены, пора бы уже и прочитать основы синтаксиса используемого языка программирования...


 
leshas0 ©   (2007-05-14 12:55) [6]

всё поставлено.
основы синтаксисы выучены.


 
Плохиш ©   (2007-05-14 13:08) [7]


> leshas0 ©   (14.05.07 12:55) [6]

Не люблю врунов...


 
leshas0 ©   (2007-05-14 13:43) [8]

Удалено модератором
Примечание: Как сказал, так и будет


 
pavel_guzhanov ©   (2007-05-14 13:56) [9]

Покажи весь код, а не только цикл, тогда можно будет что-то сказать...



Страницы: 1 вся ветка

Текущий архив: 2007.06.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.063 c
15-1178037925
sayuki
2007-05-01 20:45
2007.06.03
Version Control


15-1178379472
ArtemESC
2007-05-05 19:37
2007.06.03
Ищу простую утилиту для сравнения содержимого...


2-1178888598
Yury
2007-05-11 17:03
2007.06.03
Создание компоненты.


3-1173587325
O.O
2007-03-11 07:28
2007.06.03
Большие числа int64/LargeInt


15-1178698333
Kerk
2007-05-09 12:12
2007.06.03
Ищу единомышленников...