Автор | Сообщение |
|
| постоянный участник
|
Пост N: 3478
Зарегистрирован: 12.09.06
|
|
Отправлено: 06.07.14 23:39. Заголовок: Перевод с хХарбора на Харбор ?
Всем доброй ночи... Сижу вот перевожу программу с хХарбора на МиниГуи (Харбор), да вот незадача, споткнулся об такую конструкцию: IF cResponse HAS RegStatus .AND. cResponse HAS RegMessage .AND. cResponse HAS RegNeeded Подскажите пожалуйста как перевести её на Харбор ? Читал http://clipper.borda.ru/?1-4-0-00000939-000-0-0-1383983897 - не помогло.... Заменил ( IF cResponse LIKE RegVersion .AND. cResponse LIKE RegLink ), все равно не собирает, дает ошибку при сборке: Harbour 3.2.0dev (r1405231501) Copyright (c) 1999-2014, http://harbour-project.org/ forms_UpdateVer.prg(373) Error E0030 Syntax error "syntax error at 'LIKE'" forms_UpdateVer.prg(384) Error E0030 Syntax error "syntax error at 'LIKE'" Подсоединил в проект \MiniGUI\Harbour\include\hbcompat.ch - все равно не помогает....
|
|
|
Новых ответов нет
[см. все]
|
|
|
| |
Пост N: 142
Зарегистрирован: 10.07.07
|
|
Отправлено: 07.07.14 00:21. Заголовок: Если в лоб то так cR..
Если в лоб то так cResponse HAS RegStatus заменить на HB_REGEXHAS( RegStatus, cResponse ) и т.д. Другой способ через #xtranslate <x> HAS <y> => HB_REGEXHAS( <y>, <x> )
|
|
|
|
| постоянный участник
|
Пост N: 3479
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.07.14 00:39. Заголовок: TimTim пишет: cResp..
TimTim пишет: цитата: | cResponse HAS RegStatus заменить на HB_REGEXHAS( RegStatus, cResponse ) и т.д. |
| Спасибо БОЛЬШОЕ ! Буду править....
|
|
|
|
| постоянный участник
|
Пост N: 3481
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.07.14 09:31. Заголовок: TimTim пишет: HB_RE..
TimTim пишет: цитата: | HB_REGEXHAS( RegStatus, cResponse ) |
| Так заработало ! Но почему не делается #translate ( <exp1> LIKE <exp2> ) => ( hb_regexLike( ( <exp2> ), ( <exp1> ) ) ) из hbcompat.ch ?
|
|
|
|
| постоянный участник
|
Пост N: 3482
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.07.14 11:18. Заголовок: Рано радовался... Ре..
Рано радовался... Регулярка в хХарборе и Харборе по разному работают. Имею в хХарборе: IF cResponse HAS RegStatus .AND. cResponse HAS RegMessage .AND. cResponse HAS RegNeeded Для Харбора заменил на: IF hb_regexLike( RegStatus , cResponse ) .AND. hb_regexLike( RegMessage, cResponse ) .AND. hb_regexLike( RegNeeded , cResponse ) В Харборе - НЕ РАБОТАЕТ !!! Подскажите пожалуйста в чем не прав ?
|
|
|
|
| постоянный участник
|
Пост N: 3483
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.07.14 11:25. Заголовок: Блин, совсем туплю....
Блин, совсем туплю... Смутила наверно Димина тема. Одно заменил другим и хочу чтобы заработало... Нужно делать так как посоветовал TimTim ! IF hb_regexHAS( RegStatus , cResponse ) .AND. hb_regexHAS( RegMessage, cResponse ) .AND. hb_regexHAS( RegNeeded , cResponse ) Где есть описание для hb_regexLike ?
|
|
|
|
| |
Пост N: 301
Зарегистрирован: 16.12.08
|
|
Отправлено: 07.07.14 12:22. Заголовок: http://www.kresin.ru..
|
|
|
|
| постоянный участник
|
Пост N: 3484
Зарегистрирован: 12.09.06
|
|
Отправлено: 07.07.14 15:55. Заголовок: Спасибо santy :sm36..
Спасибо santy
|
|
|
|