Отправлено: 15.11.11 21:36. Заголовок: Примеры из Минигуи -ошибки, вопросы..... (продолжение)

Всем привет.
Взялся смотреть примеры из МиниГуи, так не все работают. Может кто подскажет что там "допилить" нужно ?
А заодно может и исправить и добавить новые....

Очень красочный пример: \MiniGUI\SAMPLES\Advanced\AVI_Animation - не работает под Win7 (наверно AVI-шки нет в ресурсах)
Предложение Григорию:
Можно ли добавить еще один пример с отдельным AVI-файлом в ресурсах проекта и показом такого же бегунка ?


Пример: \MiniGUI\SAMPLES\Advanced\DisplayMode - не работает под ХР и далее....


Пример: \MiniGUI\SAMPLES\Advanced\Tsb_filter - вылетает на ХР
--------------------------------------------------------------------------------
Harbour MiniGUI Errorlog File
Harbour MiniGUI Extended Edition 2.0.1 - 2011.09.21
--------------------------------------------------------------------------------
Date: 11/15/2011 Time: 22:13:24
Error BASE/1124 Argument error: LEFT

Called from LEFT(0)
Called from SCANSOFT(195)
Called from MAIN(84)


Пример: \MiniGUI\SAMPLES\BASIC\MsgEdit - не собирается...
Z:\MiniGUI\SAMPLES\BASIC\MsgEdit>call ..\..\..\batch\compile.bat demo /L shell32
Harbour 3.1.0dev (Rev. 17042)
Copyright (c) 1999-2011, http://harbour-project.org/
Compiling 'demo.prg'...
Lines 20133, Functions/Procedures 30
Generating C source output to 'demo.c'... Done.
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
demo.c:
Error E2141 demo.prg 993: Declaration syntax error
*** 1 errors in Compile ***

C compile error.

 Отправлено: 22.05.17 21:38. Заголовок: Как узнать где текущ..

Как узнать где текущий фокус объекта в окне ?
Т.е. если фокус не на таблице, то кнопку сделать серой (не выбираемой) !

 Отправлено: 22.05.17 22:21. Заголовок: Andrey пишет: Т.е...

Andrey пишет:

цитата:

Т.е. если фокус не на таблице, то кнопку сделать серой (не выбираемой)

Для реализации этого точное место нахождения фокуса не нужно.

У browse, к примеру, есть события ON GOTFOCUS/ON LOSTFOCUS

Все, что вам нужно - это при получении фокуса таблицей сделать кнопку доступной, при потере - ну вы понимаете..

 Отправлено: 22.05.17 23:20. Заголовок: Спасибо ! :sm36: ..

Спасибо !

 Отправлено: 26.05.17 11:22. Заголовок: Подскажите пожалуйст..

Подскажите пожалуйста, можно ли изменить ранее определённый LOSTFOCUS ?

Вот код:

         @ nRow, nCol GETBOX &cObj VALUE xRet   ; 
           ................ 
           ON CHANGE { || xRet := GetProperty(cForm, cObj, "Value" ) } ; 
           ON LOSTFOCUS { || WrtiteFldGetBox( cForm,cObj,cPole,xRet ) }

На новый LOSTFOCUS:

          ON LOSTFOCUS { || WrtiteFldGetBox( cForm,cObj,cPole,xRet ), MyRunGetBox(cFunc) }

 Отправлено: 26.05.17 12:17. Заголовок: Andrey _SetControlA..

Andrey
_SetControlAction(cControl, cForm, bBlock [, cEvent])
где cEvent :=
'ONCHANGE'
'ONGOTFOCUS'
'ONLOSTFOCUS'
'ONDBLCLICK'
по умолчанию на _HMG_aControlProcedures [ i ] := bBlock, т.е. ACTION

 Отправлено: 26.05.17 12:24. Заголовок: SergKis пишет: _Set..

SergKis пишет:

цитата:

_SetControlAction(cControl, cForm, bBlock [, cEvent])

bBlock := { || WrtiteFldGetBox( cForm,cObj,cPole,xRet ), MyRunGetBox(cFunc) }
_SetControlAction(cObj, cForm, bBlock , 'ONLOSTFOCUS' )

Так заработало ! Спасибо БОЛЬШОЕ !

 Отправлено: 22.06.17 18:23. Заголовок: Пере собрал прошлого..

Пере собрал прошлогодний проект.
Вылезли вот такие ошибки:
Turbo Incremental Link 5.66 Copyright (c) 1997-2002 Borland
Error: Unresolved external '_HB_FUN_WIN_PRINTEREXISTS' referenced from C:\MINIGUI\HARBOUR\LIB\XHB.LIB|xhbprn
Error: Unresolved external '_HB_FUN_WIN_PRINTERGETDEFAULT' referenced from C:\MINIGUI\HARBOUR\LIB\XHB.LIB|xhbprn
Error: Unresolved external '_HB_FUN_WIN_PRINTERSTATUS' referenced from C:\MINIGUI\HARBOUR\LIB\XHB.LIB|xhbprn
Error: Unresolved external '_HB_FUN_WIN_PRINTERPORTTONAME' referenced from C:\MINIGUI\HARBOUR\LIB\XHB.LIB|xhbprn
Error: Unresolved external '_HB_FUN_WIN_PRINTFILERAW' referenced from C:\MINIGUI\HARBOUR\LIB\XHB.LIB|xhbprn
Error: Unresolved external '_HB_FUN_WIN_PRINTERLIST' referenced from C:\MINIGUI\HARBOUR\LIB\XHB.LIB|xhbprn
Error: Unresolved external '_HB_FUN_WIN_PRINTERSETDEFAULT' referenced from C:\MINIGUI\HARBOUR\LIB\XHB.LIB|xhbprn
hbmk2[IniFileHL]: Error: Running linker. 2
Почему ?
Неужели придётся старым МиниГуи собирать ?

 Отправлено: 22.06.17 18:30. Заголовок: Andrey Мне кажется ..

Andrey
Мне кажется HBWIN нужно прицепить еще

 Отправлено: 22.06.17 18:47. Заголовок: Точно ! Заработало....

Точно ! Заработало...
Хотя в прошлом году можно было и без него !
Спасибо !

 Отправлено: 22.06.17 19:08. Заголовок: Andrey пишет: Хотя ..

Andrey пишет:

цитата:

Хотя в прошлом году можно было и без него

Ты помнишь что было в том году , цеплял ты Hbwin или нет , цеплял скорее всего.

 Отправлено: 22.06.17 19:29. Заголовок: Dima пишет: Ты помн..

Dima пишет:

цитата:

Ты помнишь что было в том году , цеплял ты Hbwin или нет , цеплял скорее всего.

Нет не цеплял. В папке лежит IniFileLoad.hbp - без hbwin.lib и компилировалось нормально.

 Отправлено: 21.07.17 14:01. Заголовок: Пример C:\MiniGU..

Пример C:\MiniGUI\SAMPLES\Advanced\GoogleDirections\ , собрал , запустил...бах , ошибка сценария.
Как лечить ?
Как сделать что бы юзался не Explorer а например FireFox ?

ЗЫ
Вылечил

 Отправлено: 21.07.17 17:08. Заголовок: Dima пишет Вылечил Ч..

Dima пишет

цитата:

Вылечил

Что и как ?

 Отправлено: 21.07.17 17:32. Заголовок: SergKis oActiveX..

SergKis
oActiveX:silent := 1 // вот эту строку добавил
oActiveX:Navigate(CurDrive() + ":\" + CurDir() + "\rtemp.html" )

 Отправлено: 21.07.17 17:48. Заголовок: Dima пишет oActiveX:..

Dima пишет

цитата:

oActiveX:silent := 1 // вот эту строку добавил

Вроде, заработало
Смотрю, сам начал строгать, не нашел прогу ?

 Отправлено: 21.07.17 17:56. Заголовок: SergKis А этот вари..

SergKis
А этот вариант думаю мне подойдет , только переработаю.
Игорь подсказал с этой строкой

 Отправлено: 22.07.17 22:02. Заголовок: Какой есть аналог фу..

Какой есть аналог функции МиниГуи - Lastkey() ?

 Отправлено: 22.07.17 22:07. Заголовок: Нашёл только для oBr..

Нашёл только для oBrw:oWnd:nLastKey

 Отправлено: 24.07.17 11:38. Заголовок: Контекстное меню

Коллеги, подскажите как выйти из следующей ситуации:

Есть форма 1 , на ней контекстное меню которое открывает форму 2.
Пока форма 2 активна ( минимизирована или скрыта формой 1 ) контекстное меню на форме 1 не вызывается , ну никакой реакции на клики

 Отправлено: 24.07.17 14:08. Заголовок: Haz Примерчик бы. А..

Haz
Примерчик бы. А то вопросы по типам окон.
1 - sdi ?
2 - standart\child
или
0 - sdi
1 - ?
2 - ?