Форум » [x]Harbour » xHarbour -> Harbour » Ответить

xHarbour -> Harbour

Andrey: Всем привет! Имею конструкцию в проге на хХарборе: try // catch // end // try Как перевести в Харбор ?

Ответов - 9

Dima: #xcommand TRY => BEGIN SEQUENCE WITH {|e| Break( e )} #xcommand CATCH [<!oErr!>] => RECOVER [USING <oErr>] <-oErr->

Andrey: Спасибо Dima ! А вот ещё такую конструкцию: switch nCode case ER_NO_ERROR case ER_FILE_NOT_FOUND exit default // <-- на эту строку ругается компилятор ! return "код ошибки " + str( nCode ) end // switch

Dima: Andrey пишет: default попробуй OTHERWISE а вообще смотри xhb-diff.txt в папке doc

Andrey: Ни кто не сталкивался с проблемой индексация на последнем Харборе ? У меня есть терминалка. База 866 кодировка, экран тоже. хХарбор 1.2.3 Открываю базу в 866 Делаю условную индексацию по ключу: 'ОТКАЗ' $ UPPER(PRIM).AND.!Deleted() находит 3567 записей МиниГуи - последний Харбор, Окна в кодировке WIN, та же база в 866 кодировке. Открываю базу в 866 Делаю условную индексацию по ключу: 'ОТКАЗ' $ UPPER(PRIM).AND.!Deleted() находит 0 записей.

Andrey: Блин, сбоит Мозила, выдавала ошибку при передачи, а сама нафигачила...

Andrey: Разобрался... Нужно перед передачей строку поиска менять функцией HB_ANSItoOEM(), тогда ищет...

Dima: Andrey пишет: Блин, сбоит Мозила, выдавала ошибку при передачи, а сама нафигачила... Да не только у тебя нафигачила А я чистил потом за всеми в том числе за собой :)

rvu: Взял свою программу, написанную на xHarbour 1.0.0, прогнал на Харборе с hbmk2, получил такой списочек в ошибках: DIRNAME DIRMAKE NTOC DISKFREE CHECKSUM GETDEFAULTPRINTER WIN32PRN TOLEAUTO CSETCURS COLORWIN SHOWTIME KEYSEC SETDATE SETTIME CENTER ISLEAP TIMETOSEC SECTOTIME FILEMOVE KSETINS Теперь думаю, что с этим делать...

Петр: rvu пишет: Теперь думаю, что с этим делать... Подключить библиотеки xhb и hbct



полная версия страницы