Отправлено: 29.01.08 13:59. Заголовок: Новая версия Расширенного релиза библиотеки MiniGUI (часть VI ) (продолжение)

Начало темы находится здесь, а теперь

АНОНС * АНОНС * АНОНС * АНОНС * АНОНС

Готовится к опубликованию новая сборка №48, которая выйдет в конце недели.
Если у Вас есть интересные наработки для включения в новый релиз, то сейчас самое удобное время для их отправки мне

Кратко, что нового:

- исправление обнаруженных ошибок и неточностей кода;
- новый класс HEADERIMAGE для Grid и Browse;
- свойство Address в Hyperlink может теперь открывать папку или файл на диске;
- добавлен NOTABSTOP класс для Browse;
- поддержка пользовательских компонентов (заимствована из оффициального релиза);
- расширения и исправления в библиотеках TsBrowse и PropGrid;
- обновлены сборки Харбор и HMGS-IDE;
- новые и обновленные старые примеры (как обычно ).

 Отправлено: 20.09.23 10:45. Заголовок: SergKis пишет: Небо..

SergKis пишет:

цитата:

Небольшая добавка в h_objmisc.prg

Принято

 Отправлено: 26.09.23 12:50. Заголовок: Выложил 2-е обновлен..

Выложил 2-е обновление сборки 23.09 по адресу

Скачать

До новых встреч!

 Отправлено: 27.09.23 21:35. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

Выложил 2-е обновление сборки 23.09

Собрал на новой версии свою прогу.
Сразу вылетает с ошибкой:

 
 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 

Вот код:

   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 

Собираю на предыдущей версии 23.09.01, такой ошибки нет !

 Отправлено: 28.09.23 16:15. Заголовок: Григорий ! Что делат..

Григорий ! Что делать с НОВОЙ версией ?
Не работает прога...

 Отправлено: 28.09.23 18:08. Заголовок: Andrey пишет: Что д..

Andrey пишет:

цитата:

Что делать с НОВОЙ версией ?

Andrey
Внимательно проверь, какая версия библиотека tsbrowse используется при линковке программы.

Размер файла: 359 936 байт
Дата изменения: ‎15 ‎сентября ‎2023 ‎г., ‏‎19:57:37

Рекомендую временно убрать с диска все старые версии этой библиотеки, чтобы гарантировано использовать только эту версию

 Отправлено: 28.09.23 18:37. Заголовок: Andrey Твой пример ..

Andrey
Твой пример zProgram_Template(1.4p-2).7z, с убранными из каталога *.lib и .\OBJ - собирается, работает

 Отправлено: 29.09.23 14:56. Заголовок: SergKis пишет: Твой..

SergKis пишет:

цитата:

Твой пример zProgram_Template(1.4p-2).7z, с убранными из каталога *.lib и .\OBJ - собирается, работает

Да, собирается...

gfilatov2002 пишет:

цитата:

Рекомендую временно убрать с диска все старые версии этой библиотеки, чтобы гарантировано использовать только эту версию

Убрал, удалил все .\OBJ
tsbrowse такая же как указана выше.
Сборку делаю так:

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

Собираю, ехе-ник собирается, при запуске падает с такой же ошибкой:

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 

Сделал ещё так:

   ? 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 

 Отправлено: 29.09.23 23:04. Заголовок: Сделал небольшие пер..

Сделал небольшие перетасовки в программе, перестало работать на версии MiniGUI-23.09.1
Работает теперь только на версии MiniGUI-23.09

 Отправлено: 27.10.23 17:27. Заголовок: Всем кому это интересно :)

Подготовил новую сборку 23.10, которая будет опубликована на следующей неделе.

Что нового:

цитата:

- добавлена поддержка библиотеки SQLRDD, которая позволяет с минимальными изменениями кода мигрировать в среду SQL; - добавлен большой пример-шаблон программы от Андрея Верченко.

Желаю всем мира и добра!

 Отправлено: 27.10.23 20:35. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

- добавлен большой пример-шаблон программы от Андрея Верченко.

Про Сергея забыл добавить !
Без него, примера бы не было !!!

 Отправлено: 30.10.23 14:06. Заголовок: А почему иконка на ф..

А почему иконка на форме появляется где-то через секунд 4-5 ?
Показ формы в новом примере меню Setting - "Show MAIN form"

 Отправлено: 30.10.23 15:38. Заголовок: Andrey пишет: почем..

Andrey пишет:

цитата:

почему иконка на форме появляется где-то через секунд 4-5 ?

Потому что иконка прорисовывается на форме после поступления события ON PAINT.

Для того, чтобы она появлялась сразу, запиши показ главной формы из меню таким образом:

цитата:

Item 'Show MAIN window' ACTION {|| oMainWnd:Show(), SendMessage( oMainWnd:Handle, WM_PAINT, 0, 0 ) } ICON "i_Menu32x1" FONT hFont1

 Отправлено: 30.10.23 19:17. Заголовок: Спасибо ! Заработало..

Спасибо ! Заработало !

 Отправлено: 31.10.23 10:56. Заголовок: Всем кому это интересно

Как и обещал, выложил последнюю сборку 23.10 с поддержкой библиотеки SQLRDD по адресу

click here

Пример шаблона программы с использованием OOП от Андрея и Сергея можно посмотреть в папке
\SAMPLES\Advanced\APP_OOPTEMPLATE

Желаю всем хорошего дня

 Отправлено: 14.11.23 11:45. Заголовок: Выложил 1-е обновлен..

Выложил 1-е обновление сборки 23.10 по адресу

Скачать

Альтернативная ссылка на zip-архив, если антивирус блокирует выкачку инталлятора:

Скачать архив

цитата:

- обновлен большой пример-шаблон программы от Андрея Верченко и Сергея Киселева.

Желаю всем хорошего дня

 Отправлено: 18.11.23 19:38. Заголовок: Всем кому это интересно :)

Адаптировал текущую сборку Минигуи для работы со свежим ВСС 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) ---------------------------

Ваши комментарии приветствуются

 Отправлено: 18.11.23 20:03. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

Ваши комментарии приветствуются

Взять его можно тут в принципе вот
Смущает одно "(Evaluation Only!)"
По ходу качнул а BRC там древний

 Отправлено: 18.11.23 20:39. Заголовок: Dima пишет: Смущает..

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.

 Отправлено: 18.11.23 21:11. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

or up to $5,000 per year in revenue

Решение!))

 Отправлено: 18.11.23 22:15. Заголовок: PSP пишет: Решение!..

PSP пишет:

цитата:

Решение!))