Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.029 c
15-1178734080
ProgRAMmer Dimonych
2007-05-09 22:08
2007.06.03
Помогите, пожалуйста, продолжить рассказ


4-1167142342
MasteroK
2006-12-26 17:12
2007.06.03
Как извлечь из буфера обмена первые N символов текста.


9-1151685359
VolanD666
2006-06-30 20:35
2007.06.03
Нормальный Lightmap


15-1178864905
alexandr
2007-05-11 10:28
2007.06.03
я ухожу из delphimaster


1-1176217171
I-New
2007-04-10 18:59
2007.06.03
вывод TPopupMenu с Timage при нажатии на левую кнопку мыши




   Наверх