Форум » GUI » Новая версия Расширенного релиза библиотеки MiniGUI (часть VI ) (продолжение) » Ответить
Новая версия Расширенного релиза библиотеки MiniGUI (часть VI ) (продолжение)
gfilatov: Начало темы находится здесь, а теперь АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Готовится к опубликованию новая сборка №48, которая выйдет в конце недели. Если у Вас есть интересные наработки для включения в новый релиз, то сейчас самое удобное время для их отправки мне Кратко, что нового: - исправление обнаруженных ошибок и неточностей кода; - новый класс HEADERIMAGE для Grid и Browse; - свойство Address в Hyperlink может теперь открывать папку или файл на диске; - добавлен NOTABSTOP класс для Browse; - поддержка пользовательских компонентов (заимствована из оффициального релиза); - расширения и исправления в библиотеках TsBrowse и PropGrid; - обновлены сборки Харбор и HMGS-IDE; - новые и обновленные старые примеры (как обычно ).
gfilatov2002: SergKis пишет: Небольшая добавка в h_objmisc.prg Принято
gfilatov2002: Выложил 2-е обновление сборки 23.09 по адресу Скачать До новых встреч!
Andrey: gfilatov2002 пишет: Выложил 2-е обновление сборки 23.09 Собрал на новой версии свою прогу. Сразу вылетает с ошибкой:[pre2] Time from start: 0 days 0 hours 0 mins 0 secs Error BASE/1001 Неизвестная функция: EVENTS Args: [1] = N 329558 [2] = N 129 [3] = N 0 [4] = N 1701896 --------------------------------- Stack Trace --------------------------------- Called from EVENTS(0) Called from INITWINDOW(0) Called from _DEFINEWINDOW(0) Called from MAIN(121) in module: Source\main.prg [/pre2] Вот код: [pre2] Set_bEvents( {|hH,nM,wP,lP| MyEventsHandler(hH,nM,wP,lP) } ) // блок кода, сделать STATIC DEFINE WINDOW Form_Main ; AT 0,0 WIDTH 640 HEIGHT 480 ; TITLE cTitle ICON cIcon ; MAIN NOSHOW ; NOMAXIMIZE NOSIZE NOCAPTION ; ON INIT {|| DoEvents(), _wPost(0) } ; ON RELEASE {|| _LogFile(.T., CRLF + ">>> STOP <<< " + HMG_TimeMS(App.Cargo:tStart) ) } ; ON INTERACTIVECLOSE {|| IIF( lStaticErrorClose, MyExit(), Nil ) } // строка 121 [/pre2] Собираю на предыдущей версии 23.09.01, такой ошибки нет !
Andrey: Григорий ! Что делать с НОВОЙ версией ? Не работает прога...
gfilatov2002: Andrey пишет: Что делать с НОВОЙ версией ? Andrey Внимательно проверь, какая версия библиотека tsbrowse используется при линковке программы. Размер файла: 359 936 байт Дата изменения: 15 сентября 2023 г., 19:57:37 Рекомендую временно убрать с диска все старые версии этой библиотеки, чтобы гарантировано использовать только эту версию
SergKis: Andrey Твой пример zProgram_Template(1.4p-2).7z, с убранными из каталога *.lib и .\OBJ - собирается, работает
Andrey: SergKis пишет: Твой пример zProgram_Template(1.4p-2).7z, с убранными из каталога *.lib и .\OBJ - собирается, работает Да, собирается... gfilatov2002 пишет: Рекомендую временно убрать с диска все старые версии этой библиотеки, чтобы гарантировано использовать только эту версию Убрал, удалил все .\OBJ tsbrowse такая же как указана выше. Сборку делаю так: [pre2]set MG_ROOT=C:\MiniGUI-23.09.2 set MG_BCC=C:\borland\BCC58 set PATH=%MG_ROOT%\BATCH;%MG_BCC%\bin;%MG_ROOT%\harbour\bin;%PATH% echo ------------ сделана замена линковщика ------ rem echo %PATH% echo %MG_ROOT%\BATCH\hbmk2.bat echo %MG_BCC% hbmk2.bat Abonent4win.hbp[/pre2] Собираю, ехе-ник собирается, при запуске падает с такой же ошибкой: [pre2]Time from start: 0 days 0 hours 0 mins 0 secsTime from start: 0 days 0 hours 0 mins 0 secs Error BASE/1001 Неизвестная функция: EVENTS Args: [1] = N 1836110 [2] = N 129 [3] = N 0 [4] = N 1701896 --------------------------------- Stack Trace --------------------------------- Called from EVENTS(0) Called from INITWINDOW(0) Called from _DEFINEWINDOW(0) Called from MAIN(124) in module: Source\main.prg [/pre2] Сделал ещё так: [pre2] ? ProcNL(), Repl("*",10) + " DEFINE WINDOW " + Repl("*",10), "Set_bEvents('MyEventsHandler')" DoEvents() Set_bEvents( {|hH,nM,wP,lP| MyEventsHandler(hH,nM,wP,lP) } ) // блок кода, сделать STATIC DEFINE WINDOW Form_Main ; AT 0,0 WIDTH 640 HEIGHT 480 ; TITLE cTitle ICON cIcon ; MAIN NOSHOW ; NOMAXIMIZE NOSIZE NOCAPTION ; ON INIT {|| DoEvents(), _wPost(0) } ; ON RELEASE {|| _LogFile(.T., CRLF + ">>> STOP <<< " + HMG_TimeMS(App.Cargo:tStart) ) } ; ON INTERACTIVECLOSE {|| IIF( lStaticErrorClose, MyExit(), Nil ) } // строка 124 [/pre2]
Andrey: Сделал небольшие перетасовки в программе, перестало работать на версии MiniGUI-23.09.1 Работает теперь только на версии MiniGUI-23.09
gfilatov2002: Подготовил новую сборку 23.10, которая будет опубликована на следующей неделе. Что нового: - добавлена поддержка библиотеки SQLRDD, которая позволяет с минимальными изменениями кода мигрировать в среду SQL; - добавлен большой пример-шаблон программы от Андрея Верченко. Желаю всем мира и добра!
Andrey: gfilatov2002 пишет: - добавлен большой пример-шаблон программы от Андрея Верченко. Про Сергея забыл добавить ! Без него, примера бы не было !!!
Andrey: А почему иконка на форме появляется где-то через секунд 4-5 ? Показ формы в новом примере меню Setting - "Show MAIN form"
gfilatov2002: Andrey пишет: почему иконка на форме появляется где-то через секунд 4-5 ? Потому что иконка прорисовывается на форме после поступления события ON PAINT. Для того, чтобы она появлялась сразу, запиши показ главной формы из меню таким образом: Item 'Show MAIN window' ACTION {|| oMainWnd:Show(), SendMessage( oMainWnd:Handle, WM_PAINT, 0, 0 ) } ICON "i_Menu32x1" FONT hFont1
Andrey: Спасибо ! Заработало !
gfilatov2002: Как и обещал, выложил последнюю сборку 23.10 с поддержкой библиотеки SQLRDD по адресу click here Пример шаблона программы с использованием OOП от Андрея и Сергея можно посмотреть в папке \SAMPLES\Advanced\APP_OOPTEMPLATE Желаю всем хорошего дня
gfilatov2002: Выложил 1-е обновление сборки 23.10 по адресу Скачать Альтернативная ссылка на zip-архив, если антивирус блокирует выкачку инталлятора: Скачать архив - обновлен большой пример-шаблон программы от Андрея Верченко и Сергея Киселева. Желаю всем хорошего дня
gfilatov2002: Адаптировал текущую сборку Минигуи для работы со свежим ВСС 7.70, который вышел в октябре этого года. Harbour Build Info --------------------------- Version: Harbour 3.2.0dev (r2311151457) Compiler: Borland/Embarcadero C++ 7.7 (32-bit) Platform: Windows 10 10.0 PCode version: 0.3 ChangeLog last entry: 2023-11-15 15:57 UTC+0100 Phil Krylov (phil a t krylov.eu) ChangeLog ID: 99237045fe4821b9a0b6d824f94711e3c31e382c Built on: Nov 18 2023 16:39:58 Extra Harbour compiler options: -gc0 Extra C compiler options: -DHB_GUI -DHB_NO_PROFILER -DHB_NO_TRACE -DHB_MEMO_SAFELOCK Build options: (Clipper 5.3b) (Clipper 5.x undoc) --------------------------- Ваши комментарии приветствуются
Dima: gfilatov2002 пишет: Ваши комментарии приветствуются Взять его можно тут в принципе вот Смущает одно "(Evaluation Only!)" По ходу качнул а BRC там древний
gfilatov2002: Dima пишет: Смущает одно "(Evaluation Only!)" Это C++Builder 11 Community Edition Его можно использовать бесплатно при следующих условиях: 1. If you're an individual you may use C++Builder CE to create apps for your own use and apps that you can sell until your revenue reaches $5,000 per year. 2. If you’re a small company or organization without revenue (or up to $5,000 per year in revenue), you can also use the C++Builder CE.
PSP: gfilatov2002 пишет: or up to $5,000 per year in revenue Решение!))
Dima: PSP пишет: Решение!))
полная версия страницы