Отправлено: 07.01.15 18:29. Заголовок: Чего мне не хватает в МиниГуи....

Всех с праздниками !!!
Предлагаю тем кто использует МиниГуи высказать свои предложения по улучшению данного продукта, да и в какую сторону двигаться дальше....

Вот то что мне не хватает (я имею в виду примеров):
1. Очень мало примеров для работы с DLL (хотя это и не относиться к МиниГуи, но как делать не знаю).
1.1 Как собирать свои ресурсы к программе в отдельную dll-ку. Как подключать её при запуске, показ картинок из dll (я может и догадываюсь, но пока не могу сделать этого) ?
1.2. Как сделать отдельный свой ехе-ник, а Харбор и Минигуи затолкать в отдельную dll-ку, ну и LetoDB в отдельную dll.
Как подключать при запуске эти отдельные dll и пользоваться функциями из этих dll ?
1.3. Как использовать чужие dll (допустим на Дельфи) в своих программах на МиниГуи (хотя FastReport'ом пользуюсь, но он специально сделан под Харбор) ?
Разные примеры из МиниГуи на эту тему смотрел, кое что понятно, кое что нет.

2. Полноценная работа с иконками
2.1. Сейчас приходиться каждый размер иконки (16х16, 32х32 и т.д.) хранить отдельно в ресурсном файле и выводить на кнопки по отдельности.
Нужна функция вывода из ОДНОГО файла иконки (содержащий все размеры от 16х16 до 128х128) выбранного размера.
2.2. Как из shell32.dll (она содержит все размеры иконок) можно выбрать и показать иконку отличную от размера 32х32 ?
2.3. Как вывести на форму (не на кнопку) иконку заданного размера ?

Вот пока часть чего хочется... Может на Рождество желания сбудутся ?

 Отправлено: 07.08.24 12:28. Заголовок: Andrey пишет: В фун..

Andrey пишет:

цитата:

В функции MsgDebug() не хватает сохранение/восстановление текущего окна.

Благодарю за напоминание.

Сейчас такой код работает:

 
    DEFINE WINDOW &cForm AT nY, nX WIDTH nW HEIGHT nH TITLE cTitle ; 
       WINDOWTYPE STANDARD NOSIZE TOPMOST                          ; 
       BACKCOLOR aBColor                                           ; 
       ON INIT    _wPost( 0)                                       ; 
       ON RELEASE _wSend(90)                                        
  
       This.Cargo := oHmgData() ; owc := This.Cargo 
       owc:oWnd := oWnd 
  
       MsgDebug(owc:oWnd) 
 ... 
    END WINDOW 
 

 Отправлено: 07.08.24 18:14. Заголовок: Спасибо БОЛЬШОЕ ! :..

Спасибо БОЛЬШОЕ !

 Отправлено: 26.09.24 21:46. Заголовок: Как в EDITBOX показа..

А есть простые функции, которые из p-кода делают читаемый текст prg ?
Без всяких наворотов, простые тексты.

 Отправлено: 08.10.24 14:36. Заголовок: https://i.postimg.cc..

А как поменять цвет фонта на этом объекте ?
Вот так не меняет - This.&("_Filter").Fontcolor := aFClr

 Отправлено: 10.10.24 17:25. Заголовок: https://i.postimg.cc..

Создаю окно при правки ячейки, ширину окна надо рассчитать для объекта DATEPICKER
Как мне узнать максимальную ширину объекта (1) и (2) в зависимости от размера фонта ?
Это нужно для размещения далее кнопок, ну чтобы окно слишком широким не было.

 Отправлено: 23.10.24 10:25. Заголовок: Версия МиниГуи 24.08..

Версия МиниГуи 24.08
Пример - tsb_ViewAccess.prg, вызываю RecnoInsert()
Там далее вызов запроса

   IF AlertYesNo( cMsg, cTitle, , , 64, aColors ) 

Результат:

Откуда берётся ИКОНКА, она же не указана ?
Если делаю старой версией МиниГуи, то иконка правильная, знак вопроса.

Далее еще вызов запроса:

      AlertInfo( cMsg2, cTitle, ,"iAccess64", 64, { ORANGE } )

Нужно убрать лишнюю запятую.

 Отправлено: 24.10.24 14:36. Заголовок: В программе указано ..

В программе указано

   SET WINDOW MODAL PARENT HANDLE ON

Вызываю потом STANDART окно.
Почему при запуске из окна STANDART

   WaitWindow( {cMsg, cPath + cDbf}, .T., 800, 13, NIL, BLACK, YELLOW ) 

Окно привязывается к MAIN окну ?
Можно ли как то привязать это окно к STANDART и как это сделать ?

    //cForm - это STANDART окно 
     cWin :=  WaitWindow( ...)

 Отправлено: 24.10.24 14:56. Заголовок: Andrey пишет: как э..

Andrey пишет:

цитата:

как это сделать ?

Попробуй

цитата:

// SetParent (hWndChild, hWndNewParent) HB_FUNC ( SETPARENT ) { HWND hWndChild = (HWND) HB_PARNL (1); HWND hWndNewParent = (HWND) HB_PARNL (2); hb_retnl ((LONG_PTR) SetParent (hWndChild, hWndNewParent) ); }

Пример использования:

/* put the progress bar in the status bar */
SETPARENT(Form_1.PBar.Handle, Form_1.STATUSBAR.Handle)

 Отправлено: 24.10.24 15:37. Заголовок: Что то нет такой так..

Что то нет такой такой функции

Error: Unresolved external '_HB_FUN_SETPARENT' referenced from D:\TEMP\HBMK_EW5NBE.DIR\ZDBF_LETO1.OBJ 
 hbmk2[letodb]: Error: Running linker. 2 
 

Нашёл в \MiniGUI_24.08Pro\SAMPLES\BASIC\Grid_Virtual_3
А в основную библиотеку можно перенести такую маленькую функцию ?

 Отправлено: 24.10.24 18:21. Заголовок: Andrey пишет: в осн..

Andrey пишет:

цитата:

в основную библиотеку можно перенести такую маленькую функцию ?

Уже добавил.
Благодарю за помощь

 Отправлено: 03.11.24 22:11. Заголовок: А можно для объекта ..

А можно для объекта EDITBOX сделать подсветку для строк ?
Т.е. все строки начинающиеся на знак ";" выделять другим цветом.
Может и была такая тема, но уже не помню....

 Отправлено: 03.11.24 22:55. Заголовок: Григорий, а можно вк..

Григорий, а можно включить анимированные иконки для стандартных окошек Alert*() ?
Вот примерно такие - https://iconscout.com/lottie-animations/attention
Ресурсы для них делать отдельные, для желающих.