Новая версия Расширенного релиза библиотеки MiniGUI (часть V) (продолжение)

Форум » GUI » Новая версия Расширенного релиза библиотеки MiniGUI (часть V) (продолжение) » Ответить

Новая версия Расширенного релиза библиотеки MiniGUI (часть V) (продолжение)

gfilatov: Начало темы находится здесь, а теперь АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Готовится к опубликованию новая сборка №48, которая выйдет в конце недели. Если у Вас есть интересные наработки для включения в новый релиз, то сейчас самое удобное время для их отправки мне Кратко, что нового: - исправление обнаруженных ошибок и неточностей кода; - новый класс HEADERIMAGE для Grid и Browse; - свойство Address в Hyperlink может теперь открывать папку или файл на диске; - добавлен NOTABSTOP класс для Browse; - поддержка пользовательских компонентов (заимствована из оффициального релиза); - расширения и исправления в библиотеках TsBrowse и PropGrid; - обновлены сборки Харбор и HMGS-IDE; - новые и обновленные старые примеры (как обычно ).

Ответов - 301, стр: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 All

Панченко: gfilatov2002 пишет: Дополнительно выложил документацию на текущую версию HMG HPDF по адресу: http://gfilatov.front.ru/HMG_HPDF_Doc.pdf Ошибка 404. Документ не найден.

nick_mi: Правая кнопка - Добавить страницу в закладки, и из закладок уже открывай. Но все же надо было, конечно, подробней прокоментировать

Dima: nick_mi Таки да работает так Переналил http://zalil.ru/33839337 http://files.mail.ru/RXUIME http://www.rapidshare.ru/2900627 http://www.fayloobmennik.net/2265091 http://rghost.ru/40858024 http://www.multiupload.nl/9H5761MS3U

gfilatov2002: Новый релиз библиотеки для компилятора BCC с обновленным файлом помощи перезалил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8712

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.1.7, которая выйдет завтра. Кратко, что нового: - исправление обнаруженных ошибок/опечаток в коде ; - важные исправления в библиотеке TsBrowse для обеспечения корректного выхода из режима редактирования мемо-полей; - обновлена unicode-сборка Харбора версии 3.2.0dev, а также библиотеки MiniPrint и HbPrinter для совместимости с изменениями в языковой поддержке компилятора Харбор; - добавлены новые и обновлены старые примеры (как обычно ). Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.1.7-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg217-mingw.exe Ваши замечания и предложения, как всегда, приветствуются Дополнение. Новый релиз библиотеки для компилятора BCC перезалил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8713

petr707: в примере ..\MiniGUI\SAMPLES\Advanced\VOLUME_INFO\demo.prg видимо опечатка ? 65535 в строке 22 cDiskSerial := I2Hex( nSerNum / 65535 ) + "-" + I2Hex( nSerNum ) должно быть 65536 cDiskSerial := I2Hex( nSerNum / 65536 ) + "-" + I2Hex( nSerNum ) demo и demo2 дают разное значение серийного номера

Avf: Здравствуйте, Григорий! Планируется ли перенос в Ваш новый релиз графической библиотеки BosTaurus авторства dr.Claudio Soto ?

Andrey: Avf пишет: графической библиотеки BosTaurus авторства dr.Claudio Soto Ссылку для просмотра дайте пожалуйста.

gfilatov2002: Avf пишет: Планируется ли перенос в Ваш новый релиз графической библиотеки BosTaurus Да, планируется. Клаудио как раз прислал мне сегодня свежую версию своей библиотеки со следующими изменениями: *************************************** * BOS TAURUS: Graphic Library for HMG * *************************************** * Bos Taurus, (c) 2012 by Dr. Claudio Soto, <srvet@adinet.com> ************************************ * BOS TAURUS 1.0.1 2012/11/03 ************************************ - Updated BT_BitmapLoadFile() fuction, now load images in the formats: BMP, GIF, JPG, TIF and PNG. - Added Functions: - BT_BitmapInvert - BT_BitmapContrast - BT_BitmapModifyColor - BT_BitmapGammaCorrect - BT_BitmapConvolutionFilter3x3 - Updated BosTaurus-FunctionsReferenceGuide.PDF with changes made. - Added Prototype Example for HMG Extended in BosTaurus-FunctionsReferenceGuide.PDF - Added Demo10 - Added the following directive in file: BosTaurus_C.prg (for compatibility with HMG Extended) - #define BT_BCC_LINK_LIB "C:\Borland\BCC55\Lib\PSDK\msimg32.lib" // If necessary define adequate path in your application before include header files - Now Bos Taurus is distributed as HFCL and as raw source code. - BosTaurus_HFCL.rar - BosTaurus_SOURCE.rar - BosTaurus_HMG // HMG Oficial - BosTaurus_MiniGUI // HMG Extended

Andrey: gfilatov2002 пишет: and PNG Т.е. можно будет PNG-картинки выводить ?

Avf: Спасибо, будем ждать. Тем более, что он планирует ее доработать : I'm finishing the next version and I will distribute as HFCL and as a separate package. The next version of Bos Taurus include functions for processing image (blur, emboss, sharpen, edge detect, etc.) and load PNG images. I am currently in the process of testing and documentation update. Best regards, Claudio.

Avf: to Andrey Предварительная документация http://tempfile.ru/file/2603239

sashaBG: Ребята нужен Аналог команды KEYBOARD в MiniGUI Я пробовал искать по форуму но ничего не нашел ! На английском форуме что-то нашел , вариант Поляка Марека но под MiniGui Ext Не сработало.

SergeyL: Посмотрите пример в MiniGUI ..\Advanced\ReadKey

sashaBG: Я имел ввиду вствить в буффер клавиатуры : KEYBOARD chr(13)

gfilatov2002: sashaBG Попробуйте использовать функцию InsertReturn() В общем случае, можно использовать вызов _PushKey ( VK_????? ) для того, чтобы поместить в буфер клавиатуры код нужной клавиши.

sashaBG: Спасибо Григорий ! Наверное надо ети функции описать в документации Я их нашел в c_controlmisc.c

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершается подготовка к опубликованию новой версии 2.1.8, которая выйдет на следующей неделе. Кратко, что нового: - исправлены обнаруженные ошибки и неточности кода; - добавлена команда DEFINE WINDOW TEMPLATE ... MDICHILD; - добавлен новый класс VCENTERALIGN для вертикального выравнивания текста в элементе управления LABEL (благодарю SergKis за подсказку); - PRG-код был отформатирован с помощью Harbour утилиты hbformat и далее - вручную; - обновлена UNICODE-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеках MiniPrint и PropGrid; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые/обновлены старые примеры, в т.ч. библиотека Bos Taurus v.1.02. Благодарю за внимание!

Andrey: gfilatov2002 пишет: в т.ч. библиотека Bos Taurus v.1.02. А она показ PNG файлов поддерживает ? gfilatov2002 пишет: PRG-код был отформатирован с помощью Harbour утилиты hbformat А где её посмотреть ?

gfilatov2002: Andrey пишет: А она показ PNG файлов поддерживает ? Да, поддерживает Andrey пишет: А где её посмотреть ? В папке harbour\contrib\hbformat на сайте Харбор SVN

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.1.8-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg218-mingw.exe Новый релиз библиотеки для компилятора BCC перезалил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8714 Благодарю за внимание

Andrey: Спасибо БОЛЬШОЕ Григорий ! Библиотека SAMPLES\Advanced\BosTaurus - просто сказка ....

Dr. Oldwarez: Подскажите, пожалуйста, почему в 2.1.7 и 2.1.8 не работает THREESTATE checkbox. Похоже это от того, что переменным больше нельзя быть неопределенными, а логическая переменная может иметь только два состояния.

gfilatov2002: Dr. Oldwarez пишет: не работает THREESTATE checkbox Благодарю за сообщение! Это будет исправлено в следующей сборке, а сейчас просто пересоберите библиотеку с помощью батника source\MakeLib.bat

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил на обновленном сайте по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.1.9-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg219-mingw.exe Новый релиз библиотеки для компилятора BCC перезалил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8715 Кратко, что нового: - исправлены обнаруженные ошибки и неточности кода; - ширина и высота в команде DEFINE WINDOW ... теперь имеют значения по умолчанию; - исправления в элементе управления LABEL (благодарю SergKis за подсказку); - обновлена UNICODE-сборка Харбора версии 3.2.0dev, важные изменения в contrib библиотеках SQLite и MySQL, мелкие исправления в библиотеке TsBrowse; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые/обновлены старые примеры. Благодарю за внимание!

Andrey: Ура ! Примеры с LABEL заработали ! Спасибо БОЛЬШОЕ !

gustow: Григорий , спасибо! "В новый год - с новым релизом!" :) По примерам: я когда-то года 3 назад делал "интеллектуального почтового робота" (Harbour, консоль, разбирает вложения из писем по папкам, авто-отвечает, ведет HTML-лог); недавно наткнулся на него в "старых завалах". Не надо ли такое в примеры? Оно, конечно, заточено по логике разбора и поведения "под себя" прямо в коде (а не как бы надо - что правила прописаны где-то во "внешке"), но авось кому пригодится именно как пример подобной "автоматизации офис-процесса"? Можно и "допилить надфилем", конечно :) Это мы собирали в Мед.информ.центре с области ежедневно статистику по ОРВИ - а в каждом письме должно быть 4 (или 5) XLSок с предопределенными именами ("Axxxx", "Bxxxx", "Cxxxx", "Dxxxx" [, "Exxxx"] - где "хххх" цифровой код больницы; и надо проверить, что хотя бы A-D имеются, а потом сложить "Axxxx.xls" в папочку, где накапливаются сегодняшние "A", "Bxxxx.xls" - где "B"... ; не забыть пометить в списке, от кого пришли...); и когда в день таких писем сыплется полторы-две сотни, посаженная разгребать девочка слезами-потом-матом умылась сходу :)) А эта штука лежит на серваке, шедулером (ОСи сервака) запускается раз в 15 минут, проверяет определенный ящик, если есть новые письма - разгребает, ВСЕМ отвечает (либо "Всё нормально, принято, благодарю за службу!", либо "А где вложения??" или "А почему только 3 файла??" или "Это еще что за фигню вы прислали??" - и всё вполне подробно, "по-человечески"), спит дальше. Работала год без вопросов (забыли выключить :)) хотя Минздрав наш уже через 3 месяца ежедневный контроль отменил, а еще через 2 совсем отменил, поскольку лето настало, какие тут ОРВИ?..).

krutoff: У меня возникла такая ситуация: Поставил Windows 8, Установил последнюю сборку xHarbour: xhmg219_xhb9908 и MiniGUI hmg-2.1.9-setup. В результате при сборке моей программы (68 модулей) операционная система выдала APPCRASH Код исключения=C0000005. Прочитал в интернете эту ошибку и понял, что меня отфутболила операционная система и искать эту ошибку можно месяцами, т.к. при тестировании я не смог подойти даже к 1-й строчке моей программы. Сделал откат на MiniGUI hmg-2.1.7-setup и Ура! - Все заработало под Windows 8. Конечно, буду искать и дальше у себя, но пока буду сидеть на версии 2.1.7...

Andrey: Григорий ! Спасибо БОЛЬШОЕ за пример ! Пример просто СУПЕР !

MTC: Andrey пишет: Григорий ! Спасибо БОЛЬШОЕ за пример ! Пример просто СУПЕР ! А что за пример то?

Andrey: MTC пишет: А что за пример то? Вот - http://files.mail.ru/5013FA6875C54E49AAD2A11FF73F0FC5

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.0, которая выйдет завтра. Кратко, что нового: - исправлены обнаруженные ошибки и неточности кода; - оптимизировано использование внутренних функций элемента управления Browse; - Controls Context меню теперь поддерживает многоуровневые меню (благодарю Владимира Чумаченко за это); - обновлен менеджер проектов MPM и батник batch\compile.bat для работы с дебагером; - библиотека WinReport поддерживает теперь создание отчетов в формате PDF (это beta-версия); - обновлена WINANSI-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеке TsBrowse; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые/обновлены старые примеры, в т.ч. библиотека Bos Taurus v.1.02. Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил на обновленном сайте по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.0-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg220-mingw.exe Новый релиз библиотеки для компилятора BCC добавил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8716 Благодарю всех заинтересованных за внимание!

gustow: Григорий, спасибо за очередной релиз! Засуча рукава, начнем копать - что там новенького-интересненького?.. :)

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.1, которая выйдет послезавтра (в День освобождения Одессы от фашистов). Кратко, что нового: - исправление обнаруженных опечаток в коде, а также мелкие оптимизации кода с целью уменьшения размера ядра библиотеки; - добавлена возможность разместить индикатор PROGRESSITEM в статусной строке элемента управления StatusBar; - добавлен новый класс Customize для элемента управления Toolbar[Ex]; - добавлена секция <trustInfo> в файл манифеста для корректного запроса прав запуска в UAC при работе в Win Vista/7; - обновлена библиотека HbSQLite3 до версии 3.7.16.1; - обновлена unicode-сборка Харбора версии 3.2.0dev, а также библиотеки WinReport и TSBrowse; - обновлена HMGS-IDE до версии 1.2.0; - добавлены новые и обновлены старые примеры (как обычно ). Благодарю за внимание!

Andrey: gfilatov2002 пишет: Завершена подготовка к опубликованию новой версии 2.2.1, которая выйдет послезавтра (в День освобождения Одессы от фашистов). С нетерпением ждем ....

Softlog86: индикатор PROGRESSITEM в статусной строке элемента управления StatusBar Давно ждал !!!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил на обновленном сайте по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.1-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg221-mingw.exe Новый релиз библиотеки для компилятора BCC добавил вчера по адресу: http://minigui.mylivepage.ru/file/?fileid=8718 Благодарю всех заинтересовавшихся за 46 скачиваний к этому моменту!

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.2, которая выйдет на следующей неделе (и посвящается очередной годовщине Великой Победы). Кратко, что нового: - исправление обнаруженных опечаток в коде, а также мелкие оптимизации кода с целью уменьшения размера ядра библиотеки; - добавлены новые команды для выгрузки всех видов меню (синхронизировано с официальным релизом HMG 3.1.2); - обновлена библиотека HbSQLite3 до версии 3.7.16.2; - обновлена unicode-сборка Харбора версии 3.2.0dev, а также библиотеки HbPrinter и MiniPrint; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые и обновлены многие старые примеры (как обычно ). Благодарю за внимание!

Andrey: gfilatov2002 пишет: добавлены новые команды для выгрузки всех видов меню А можно кратко об этих командах ?

gfilatov2002: Andrey пишет: А можно кратко об этих командах ? Я добавил следующие команды для совместимости с официальным релизом: - новая функция IsMainMenuDefined ( <FormName> ) - команды уничтожения ранее заданного меню в процессе выполнения программы: RELEASE MAIN MENU OF <form> RELEASE CONTEXT MENU OF <form> RELEASE NOTIFY MENU OF <form> RELEASE DROPDOWN MENU BUTTON <button> OF <form> RELEASE DROPDOWNMENU OWNERBUTTON <button> OF <form> а также пример использования этих команд

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.2-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg222-mingw.exe Новый релиз библиотеки для компилятора BCC добавил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8721 Благодарю всех нетерпеливых и внимательных за 12 скачиваний к этому моменту!

alex_II: Перешел на версию 2.2.2 – полет нормальный Большое спасибо

Andrey: gfilatov2002 - хотелось бы видеть пример для GUI отладчика для Harbour в поставке MiniGui. Пускай общественность знает и пользуется классным отладчиком, тем более что в МиниГуи отладки нет, то что есть - неудобно пользоваться. Кто поддерживает это предложение ?

krutoff: Григорий, спасибо за новую версию. Хочу попробовать ее на XHarbour под Windows 8. Подскажите, где можно скачать последние бинарники XHarbour для Вашей версии 2.2.2?

gfilatov2002: krutoff пишет: Подскажите, где можно скачать последние бинарники XHarbour для Вашей версии 2.2.2? Можно взять здесь http://hmgextended.com/files/CONTRIB/xhmg222_xhb9950.zip

gfilatov2002: Andrey пишет: хотелось бы видеть пример для GUI отладчика для Harbour Очень просто: 1) копируете 2 файла - hwgdebug.lib и hwgdebug.exe в папку своего проекта (или примера); 2) запускаете графический отладчик на выполнение по команде Compile.bat /s /b /l hwgdebug Вот и все!

alkresin: Еще было бы хорошо дополнить эти 2 функции из dbgconnect.prg ( hwgdebug.lib ) кодом для Minigui: Function hwg_dbg_Alert( cMessage ) Local bCode := &( Iif( Type( "hwg_msginfo()" ) == "UI", "{|s|hwg_msginfo(s)}", "{|s|alert(s)}" ) ) Eval( bCode, cMessage ) Return Nil Function hwg_dbg_Quit() Local bCode := &( Iif( Type( "hwg_endwindow()" ) == "UI", "{|s|hwg_endwindow()}", "{||__Quit()}" ) ) Eval( bCode ) Return Nil

gfilatov2002: Ok Function hwg_dbg_Alert( cMessage ) Local bCode := &( Iif( Type( "hwg_msginfo()" ) == "UI", "{|s|hwg_msginfo(s)}", "{|s|msginfo(s)}" ) ) Eval( bCode, cMessage ) Return Nil Function hwg_dbg_Quit() Local bCode := &( Iif( Type( "hwg_endwindow()" ) == "UI", "{|s|hwg_endwindow()}", "{||ReleaseAllWindows()}" ) ) Eval( bCode ) Return Nil

alkresin: Тогда, наверное, вот так: Function hwg_dbg_Alert( cMessage ) Local bCode := &( Iif( Type( "hwg_msginfo()" ) == "UI", "{|s|hwg_msginfo(s)}", ; Iif( Type( "msginfo()" ) == "UI", "{|s|msginfo(s)}", "{|s|alert(s)}" ) ) ) Eval( bCode, cMessage ) Return Nil Function hwg_dbg_Quit() Local bCode := &( Iif( Type( "hwg_endwindow()" ) == "UI", "{|s|hwg_endwindow()}", ; Iif( Type( "ReleaseAllWindows()" ) == "UI","{||ReleaseAllWindows()}", "{||__Quit()}" ) ) ) Eval( bCode ) Return Nil Отлаживаются ведь и консольные приложения.

Andrey: alkresin пишет: Еще было бы хорошо дополнить эти 2 функции из dbgconnect.prg ( hwgdebug.lib ) кодом для Minigui: Куда ставить эти функции ? В свой проект ?

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.3, которая выйдет послезавтра. Кратко, что нового: - исправлены обнаруженные ошибки и неточности кода; - добавлена давно обещанная поддержка PNG and TIF картинок в элементе управления Image и для использования на кнопках элемента управления ToolBar - добавлены новые команды для синхронизизации с официальным релизом HMG 3.1.3: DISABLE [ CONTROL ] EVENT ControlName OF FormName ENABLE [ CONTROL ] EVENT ControlName OF FormName StopControlEventProcedure ( cControlName, cFormName, lStop ) DISABLE [ WINDOW ] EVENT OF FormName ENABLE [ WINDOW ] EVENT OF FormName StopWindowEventProcedure ( cFormName, lStop ) GetLastActiveFormIndex () --> Return nFormIndex GetLastActiveControlIndex () --> Return nControlIndex - обновлена библиотека WinReport (это beta-версия); - обновлена библиотека SQLite3Facade (это надстройка для облегчения доступа к базам SQLite); - обновлена библиотека HbSQLite3 до версии 3.7.17; - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеке TsBrowse; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые/обновлены старые примеры, в т.ч. библиотека Bos Taurus v.1.04. Благодарю за внимание!

Andrey: gfilatov2002 пишет: - добавлена давно обещанная поддержка PNG and TIF картинок в элементе управления Image Пример в студию !

gfilatov2002: Пример от автора изменений уругвайца Клаудио Сото: [pre2]/* * HMG - Harbour Win32 GUI library Demo * * Copyright 2013 Dr. Claudio Soto <srvet@adinet.com.uy> */ #include "hmg.ch" MEMVAR nWidth MEMVAR nHeight MEMVAR lStretch MEMVAR lTransparent MEMVAR lColor MEMVAR aBackgroundColor MEMVAR lAdjustImage MEMVAR aPicture MEMVAR i Function Main PRIVATE nWidth := 200 PRIVATE nHeight := 100 PRIVATE lStretch := .F. PRIVATE lTransparent := .F. PRIVATE lColor := .F. PRIVATE aBackgroundColor := NIL PRIVATE lAdjustImage := .F. PRIVATE aPicture := {"img.gif", "img.jpg", "img.wmf", "img.bmp", "img.png", "img.tif"} PRIVATE i := 1 DEFINE WINDOW Win_1 ; AT 0,0 ; WIDTH 800 HEIGHT 600 ; TITLE 'Load Image From DISK' ; MAIN DEFINE MAINMENU DEFINE POPUP "File" MENUITEM "Exit" ONCLICK ThisWindow.Release END POPUP DEFINE POPUP "Options" MENUITEM "Stretch" ONCLICK {lStretch := ! lStretch, Define_Image()} NAME Menu_Stretch MENUITEM "Transparent" ONCLICK {lTransparent := ! lTransparent, Define_Image()} NAME Menu_Transparent MENUITEM "BackgroundColor RED" ONCLICK {lColor := ! lColor, Define_Image()} NAME Menu_Color MENUITEM "AdjustImage" ONCLICK {lAdjustImage := ! lAdjustImage, Define_Image()} NAME Menu_AdjustImage SEPARATOR MENUITEM "Width=200 and Height=100" ONCLICK {|| nWidth:=200, nHeight:=100, Define_Image(1)} NAME Menu_Size1 MENUITEM "Width=NIL and Height=NIL" ONCLICK {|| nWidth:=NIL, nHeight:=NIL, Define_Image(2)} NAME Menu_Size2 MENUITEM "Width=200 and Height=0" ONCLICK {|| nWidth:=200, nHeight:=0, Define_Image(3)} NAME Menu_Size3 MENUITEM "Width=0 and Height=100" ONCLICK {|| nWidth:=0, nHeight:=100, Define_Image(4)} NAME Menu_Size4 END POPUP END MENU @ 10 ,10 BUTTON Button_1 CAPTION "Set GIF" ACTION {|| Win_1.Image_1.Picture := "img.gif", ImgSize(1)} WIDTH 100 HEIGHT 30 @ 10 ,110 BUTTON Button_2 CAPTION "Set JPG" ACTION {|| Win_1.Image_1.Picture := "img.jpg", ImgSize(2)} WIDTH 100 HEIGHT 30 @ 10 ,210 BUTTON Button_4 CAPTION "Set WMF" ACTION {|| Win_1.Image_1.Picture := "img.wmf", ImgSize(3)} WIDTH 100 HEIGHT 30 @ 10 ,310 BUTTON Button_6 CAPTION "Set BMP" ACTION {|| Win_1.Image_1.Picture := "img.bmp", ImgSize(4)} WIDTH 100 HEIGHT 30 @ 10 ,410 BUTTON Button_7 CAPTION "Set PNG" ACTION {|| Win_1.Image_1.Picture := "img.png", ImgSize(5)} WIDTH 100 HEIGHT 30 @ 10 ,510 BUTTON Button_8 CAPTION "Set TIF" ACTION {|| Win_1.Image_1.Picture := "img.tif", ImgSize(6)} WIDTH 100 HEIGHT 30 @ 150, 140 LABEL Label_1 Value "" AUTOSIZE Define_Image (1) END WINDOW Win_1.Center ACTIVATE WINDOW Win_1 Return Nil Procedure ImgSize (Index) Local n i := Index Win_1.Label_1.Value := "Width: "+hb_ntos(Win_1.Image_1.WIDTH)+" Height: "+hb_ntos(Win_1.Image_1.HEIGHT) IF IsControlDefined (Frame_1, Win_1) == .T. Win_1.Frame_1.Release ENDIF n:= 2 @ (Win_1.Image_1.ROW -n), (Win_1.Image_1.COL -n) FRAME Frame_1 OF Win_1; WIDTH (Win_1.Image_1.WIDTH +n+n); HEIGHT (Win_1.Image_1.HEIGHT +n+n); TRANSPARENT Return Procedure Define_Image (nSize) Win_1.Menu_Stretch.Checked := lStretch Win_1.Menu_Transparent.Checked := lTransparent Win_1.Menu_Color.Checked := lColor Win_1.Menu_AdjustImage.Checked := lAdjustImage aBackgroundColor := IF (lColor, RED, NIL) IF VALTYPE (nSize) == "N" Win_1.Menu_Size1.Checked := .F. Win_1.Menu_Size2.Checked := .F. Win_1.Menu_Size3.Checked := .F. Win_1.Menu_Size4.Checked := .F. SetProperty ( "Win_1", "Menu_Size"+LTRIM(STR(nSize)), "Checked", .T. ) ENDIF IF IsControlDefined (Image_1, Win_1) == .T. Win_1.Image_1.Release ENDIF DEFINE IMAGE Image_1 PARENT Win_1 ROW 200 COL 140 WIDTH nWidth HEIGHT nHeight PICTURE aPicture [ i ] STRETCH lStretch TRANSPARENT lTransparent BACKGROUNDCOLOR aBackgroundColor ADJUSTIMAGE lAdjustImage END IMAGE IF IsControlDefined (Label_1, Win_1) == .T. ImgSize (i) ENDIF Return[/pre2]

Haz: Суть в следующем - Если в TBrowse объявить SELECTOR, то происходит игнорирование флага ::lLockFreeze: в стороке 8459 h_tbrose.prg 8447: If ::lSelector ... 8459: ::lLockFreeze := .T. // Переменная лочит замороженные колонки ВНЕ зависимости от того что пропишет разработчик Возможное решение : 1) закомментировать эту ( 8459: ) строку - //::lLockFreeze := .T. 2) в метод METHOD TSBrowse:GoLeft() добавить проверку на SELECTOR 5409: вместо While nCell > ( If( lLock, ::nFreeze + 1, 1 ) ) пишем While nCell > ( If( lLock, ::nFreeze + 1, if ( ::lSelector, 2, 1) ) ) 5449: вместо If ::nCell == 1 пишем If ::nCell == if ( ::lSelector, 2, 1)

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил на обновленном сайте по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.3-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg223-mingw.exe Новый релиз библиотеки для компилятора BCC добавил вчера по адресу: http://minigui.mylivepage.ru/file/?fileid=8722 Благодарю за внимание!

Andrey: Спасибо Григорий ! Возник вопросик по PNG картинкам:

Dima: Andrey Фон нужно сделать у твоей картинки прозрачным

Andrey: Dima пишет: Фон нужно сделать у твоей картинки прозрачным А как ?

Dima: Andrey пишет: А как ? Вариантов несколько. Можно найти уже готовую картинку с прозрачным фоном. Можно ручками в спец проге либо черный фон залить прозрачным либо сделать фон прозрачным. Я юзаю Axialis IconWorkshop , хотя заюзать можно любой инструмент ну например фотошоп

Andrey: Dima пишет: Можно найти уже готовую картинку с прозрачным фоном. У этой картинки img.png из примера \MiniGUI\SAMPLES\BASIC\IMAGE_2 - фон прозрачный. А на форме этот фон становиться ЧЕРНЫМ ! Вот и вопрос, как выводить PNG-картинки с прозрачным фоном на окне программы МиниГуи, без черного фона ? Подставлял я и другую картинку с прозрачным фоном... На окне программы все равно черный фон.

gfilatov2002: Andrey пишет: Возник вопросик по PNG картинкам Выбери в программе пункт меню Options->Transparent А затем еще попробуй Options->Stretch при включенном пункте Transparent Отпишись, если заметишь разницу...

Andrey: gfilatov2002 пишет: Отпишись, если заметишь разницу... Да, есть разница. Это уже лучше, но не совсем... Остается черная окантовка вокруг предметов... Не очень красиво... Можно ли эту окантовку совсем убрать ?

Dima: Andrey пишет: Можно ли эту окантовку совсем убрать ? а если ее залить прозрачным ?

Andrey: Dima пишет: а если ее залить прозрачным ? Попробуй... Пример смотри \MiniGUI\SAMPLES\BASIC\IMAGE_2 !

gfilatov2002: Andrey пишет: Можно ли эту окантовку совсем убрать ? Да. Как я уже писал ранее gfilatov2002 пишет: попробуй Options->Stretch при включенном пункте Transparent

Andrey: Не получается... Или из-за Win8 окантовка остается ?

Andrey: gfilatov2002 пишет: попробуй Options->Stretch при включенном пункте Transparent Нет, оказывается нужно только включенную опцию: Options->Stretch !!! И все нормально показывается !!!

Andrey: Рано радовался.... Переделал пример на другой цвет фона и вот что получается: Или вот еще: Опять остается вывод ТОЛЬКО ICO-файла на форму МиниГуи .... ? Или опять я что-то не так делаю....

alex_II: Линковка проекта не прошла В прошлой версии всё работало нормально Error: Unresolved external 'TransparentBlt' referenced from C:\MINIGUI\LIB\MINIGUI.LIB|c_image

gfilatov2002: alex_II пишет: Error: Unresolved external 'TransparentBlt' referenced from C:\MINIGUI\LIB\MINIGUI.LIB|c_image Просто добавь в свой скрипт еще одну библиотеку c:\borland\bcc55\lib\PSDK\msimg32.lib З.Ы. Это уже сделано в стандартном батнике minigui\batch\compile.bat

alex_II: Всё ОК Спасибо за помощь

Панченко: Григорий, описание ColumnControls в Grid (версия 2.2.1.) правильно работает только в ВЕРХНЕМ РЕГИСТРЕ. Может подправите это дело, что бы библиотека тоже была регистронезависимой как и Harbour?

gfilatov2002: Панченко пишет: Может подправите это дело Сделал в новой сборке Исправленный релиз библиотеки для компилятора BCC выложил по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.3a-setup.zip Этот релиз библиотеки для компилятора BCC добавил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8723 Надеюсь на конструктивную критику...

Панченко: gfilatov2002 пишет: Сделал в новой сборке Спасибо за оперативность.

Danilevich: Что-то я делаю не так? В примере при Lostfocus GetBox_1 открывается новое окно, при закрытии которого по ALT+T в главное окно в следующий GETBOX этот ALT+T попадает как "мусор" #include "minigui.ch" Function Main DEFINE WINDOW Form_1 ; AT 0,0 ; WIDTH 400 HEIGHT 280 ; TITLE 'TEST' ; MAIN NOMAXIMIZE ; FONT "Arial" SIZE 9 DEFINE LABEL Label_1 ROW 10 COL 10 HEIGHT 20 WIDTH 140 VALUE "Please press ENTER" END LABEL DEFINE GETBOX GetBox_1 ROW 10 COL 160 WIDTH 60 HEIGHT 20 VALUE " " ONLOSTFOCUS showMemo() END GETBOX DEFINE LABEL Label_2 ROW 30 COL 10 HEIGHT 20 WIDTH 140 VALUE "TEST" END LABEL DEFINE GETBOX GetBox_2 ROW 30 COL 160 WIDTH 60 HEIGHT 20 VALUE "TEST" END GETBOX END WINDOW Form_1.Activate return function showMemo() local cWindowName:="MEMO" DEFINE WINDOW &cWindowName AT 50,50 ; WIDTH 600 ; HEIGHT 400 ; CHILD ; TITLE "ESC - no problem. ALT+T ???" ; ON LOSTFOCUS SetProperty(cWindowName,"TopMost",.f.) _DefineHotKey(cWindowName,1,84,{||DoMethod(cWindowName,"Release")}) ON KEY ESCAPE OF &cWindowName ACTION DoMethod(cWindowName,"Release") DEFINE EDITBOX RICHEDITBOX ROW 1 COL 1 WIDTH 592 HEIGHT 346 FONTNAME "Courier New" FONTSIZE 11 READONLY .f. VALUE "Please press ALT+T."+chr(13)+chr(10)+chr(13)+chr(10)+"Is field TEST changed?" END EDITBOX END WINDOW DoMethod(cWindowName,"Center") SetProperty(cWindowName,"TopMost",.t.) DoMethod(cWindowName,"Activate") return Заранее благодарен.

gfilatov2002: Исправленный релиз библиотеки для компилятора BCC снова выложил по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.3b-setup.zip Этот релиз библиотеки для компилятора BCC добавил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8724 Благодарю за внимание!

gfilatov2002: Danilevich пишет: в главное окно в следующий GETBOX этот ALT+T попадает как "мусор" Да, это известная "фича" у GETBOX Как вариант исправления/обхода этого глюка я добавил следующие две строки в конце функции showMemo() ... DoMethod(cWindowName,"Activate") DoMethod("Form_1","GetBox_1","Setfocus") SetProperty("Form_1","GetBox_1","Value","") return

Danilevich: Спасибо Григорий, но у меня только вот так идет: cOld:=... DoMethod(cWindowName,"Activate") WAITPERIOD(25) // 25*0,01 Sec WHILE WAITPERIOD() ****** ENDDO SetProperty("Form_1","GetBox_1","Value",cOld) SetProperty(cWindowName,"GetBox_TextSArtNr","Value",cSaveTemp)

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.4, которая выйдет завтра. Кратко, что нового: - исправлены обнаруженные ошибки и неточности кода; - добавлен вывод времени работы приложения до сбоя в лог-файл errorlog.htm; - обновлена библиотека WinReport (это beta-версия); - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеке HbMySql; - пересобрана HMGS-IDE с версией 2.2.2 библиотеки; - обновлены некоторые старые примеры, в т.ч. пример WebCam preview. Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.4-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg224-mingw.exe Новый релиз библиотеки для компилятора BCC добавил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8725 P.S. Благодарю всех нетерпеливых и внимательных за 23 скачивания к этому моменту!

Andrey: Установил новую версию. Собирается нормально через файл проекта. А через xMate перестал собираться проект - выдает ошибку: Ïðîåêò: Zip-Arxiv, Èíñòðóìåíòàðèé: BccHbMGui2010: [1]:iLink32.Exe -aa -Tpe -Gn @Zip-Arxiv.bcl Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland Error: Unresolved external '_pcre_config' referenced from Z:\MINIGUI\HARBOUR\LIB\HBRTL.LIB|hbregex Error: Unresolved external '_pcre_stack_malloc' referenced from Z:\MINIGUI\HARBOUR\LIB\HBRTL.LIB|hbregex Error: Unresolved external '_pcre_stack_free' referenced from Z:\MINIGUI\HARBOUR\LIB\HBRTL.LIB|hbregex Какие изменения в библиотеках ?

gfilatov2002: Andrey пишет: А через xMate перестал собираться проект - выдает ошибку: Ïðîåêò: Zip-Arxiv, Èíñòðóìåíòàðèé: BccHbMGui2010: Попробуй добавить в файл BccHbMGui2010.Env в секцию [Files] строку %HB_LIB_INSTALL%\hbpcre.lib

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

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.5, которая выйдет послезавтра. Кратко, что нового: - исправлены обнаруженные ошибки и неточности кода; - обновлена библиотека SQLITE3 до версии 3.8.0 (это dev-версия); - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеке HbMySql; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые и обновлены некоторые старые примеры. Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.5-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg225-mingw.exe Новый релиз библиотеки для компилятора BCC добавил также по адресу: http://minigui.mylivepage.ru/file/?fileid=8727 P.S. Благодарю всех нетерпеливых и внимательных за 19 скачиваний к этому моменту! P.S. 2 Увы, но с каждым днем все меньше стимулов продолжать эту бесплатную работу, начатую еще в марте 2005 г.

Andrey: gfilatov2002 пишет: Увы, но с каждым днем все меньше стимулов продолжать эту бесплатную работу, начатую еще в марте 2005 г. Каждый труд должен оплачиваться. Ваша работа очень большая и нужная. Как помочь в данном случае не знаю. Был бы директором фирмы, то смог бы помогать. Ваш продукт нужно распространять - очень много муниципальных и госпредприятий до сих пор сидят на Клипере. Чем больше клиентов, тем лучше. Но перенос программ с Клипера на МиниГуи затруднен и долог. Главное - нет нормального дизайнера форм, я долго с ним разбирался и все равно делаю формы руками. Со своей стороны, я стараюсь привлечь и помочь Клиперистам в переносе проектов на Харбор и МиниГуи. Куда доступ имею, туда и рекламирую Харбор и МиниГуи.

gfilatov2002: Благодарю за добрые слова Andrey пишет: Со своей стороны, я стараюсь привлечь и помочь Клиперистам в переносе проектов на Харбор и МиниГуи. и Вашу поддержку! Это действительно важно

krutoff: Григорий, прежде всего, спасибо огромное за Ваш труд! Решил перейти на xHarbour 1.2.3 Intl. (SimpLex) (Build 20130419) с версии MiniGUI 2.2.2 на 2.2.5. После этого при сборке моих проектов выдается ошибка: "Unresolved external 'TransparentBit' referenced from D:\MINIGUI\XLIB\MINIGUI.LIB|c_image"...

Andrey: Григорий, насколько знаю, сейчас в отпуске. krutoff пишет: "Unresolved external 'TransparentBit' referenced from D:\MINIGUI\XLIB\MINIGUI.LIB|c_image"... По поиску 'TransparentBit' в дистрибутиве, нет вообще совпадений. Сделай отдельный пример, где эта функция используется.

Петр: krutoff пишет: "Unresolved external 'TransparentBit' referenced from D:\MINIGUI\XLIB\MINIGUI.LIB|c_image". Включите в проект msimg32.lib

krutoff: Петр пишет: Включите в проект msimg32.lib Спасибо большое, Петр, все получилось! Собирал проект я с помощью xMate, и за это время ничего не добавлял по графике. Даже не мог предположить, что надо искать в BCC55\Lib\PSDK. Григорий, у меня не получалось собрать miniGUI под xHarbour. Когда я поменял в MakeLibOpt.bat строку: if defined MG_CMP if !MG_CMP!==XHARBOUR set MV_USEXHRB=Y на if defined MG_CMP if "%MG_CMP%"=="XHARBOUR" set MV_USEXHRB=Y то сборка библиотеки прошла нормально. Проверьте, пожалуйста. Еще раз спасибо за отзывчивость!

gfilatov2002: krutoff пишет: Проверьте, пожалуйста. Благодарю за наводку Поправил эту опечатку в двух файлах: MakeLibOpt.bat и Compile.bat

Andrey: Григорий. Исправьте в библиотеке пожалуйста следующее: Haz пишет: Андрей , держи таблетку и играй в прятки с модальными окнами в h_windows.prg в строке 1295 вместо If _HMG_aFormType == "M" _ShowWindow ( _HMG_aFormNames , .F. ) нужно прописать условие IF ... и пересобратьбиблиотеки минигуи If _HMG_aFormType == "M" if _HMG_aFormNoShow == .F. _ShowWindow ( _HMG_aFormNames , .F. ) ELSE _hIDEWindow ( _HMG_aFormNames , .F. ) end

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.6, которая выйдет завтра. Кратко, что нового: - исправлены обнаруженные неточности кода; - оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - обновлена библиотека SQLITE3 до версии 3.8.0.2; - обновлена unicode-сборка Харбора версии 3.2.0dev; - мелкие исправления в HMGS-IDE; - добавлены новые и обновлены некоторые старые примеры (как обычно ). Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.6-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg226-mingw.exe Желаю удачи!

Andrey: Перекомпилировал свои проги на новую версию, полет нормальный ! Tbrowse - пока не пользуюсь...

Dima: gfilatov2002 Спасибо за новую версию ! В примерах везде есть батник для сборки типа Compile.bat если в нем прописано что то типа call ..\..\..\batch\compile.bat то сборка заканчивается не удачей с месагой [pre2] Системе не удается найти указанный путь. C compile error. [/pre2] Если тупо заменить call ..\..\..\batch\compile.bat на call ..\..\..\batch\hbmk2.bat то все в норме.

gfilatov2002: Dima пишет: сборка заканчивается не удачей Просто надо поправить в батнике minigui\batch\compile.bat путь к компилятору BCC Dima пишет: Если тупо заменить call ..\..\..\batch\compile.bat на call ..\..\..\batch\hbmk2.bat то все в норме. Это работает потому, что утилита hbmk2 выполняет поиск пути к файлу bcc32.exe на диске самостоятельно.

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.7, которая выйдет послезавтра. Кратко, что нового: - исправлены обнаруженные неточности кода; - завершена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - обновлена библиотека SQLITE3 до версии 3.8.1 (это dev-версия); - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеке PropGrid; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые (отдельная благодарность за примеры - Верченко Андрею ) и обновлены некоторые старые примеры. Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.7-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg227-mingw.exe

Haz: Григорий , огромное спасибо за труд и вдвойне за труд бескорыстный

alex_II: Спасибо Григорий! Отличная работа!

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.8, которая выйдет послезавтра. Кратко, что нового: - исправлены обнаруженные ошибки и неточности кода; - добавлена возможность вызова стандартных диалогов Винды с таймаутом, основанная на недокументированном MessageBoxTimeout API; - обновлена библиотека SQLITE3 до финальной версии 3.8.1; - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие добавления в библиотеке TsBrowse; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые (отдельная благодарность за примеры - Логошному Сергею ) и обновлены некоторые старые примеры. Благодарю за внимание! В эту сборку будет включен пример создания вот такого окна с пользовательскими кнопками:

Andrey: gfilatov2002 пишет: В эту сборку будет включен пример создания вот такого окна с пользовательскими кнопками: Суппер ! Давно хотелось красивого интерфейса на МиниГуи ! С нетерпением ждем ! P.S. Только как на кнопку будет "влезать" русские длинные слова "Добавить" вместо "Add", "Удалить" вместо "Del" ?

AlexMyr: Andrey пишет: P.S. Только как на кнопку будет "влезать" русские длинные слова "Добавить" вместо "Add", "Удалить" вместо "Del" ? посмотрите на пример с кнопками, "imagebutton1" подлиней будет чем "добавить", и размер шрифта есть, и не ищите проблем на ровном месте, это ж уже не консоль 24Х80.

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.8-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg228-mingw.exe Благодарю за внимание!

Andrey: Скачал. Пробую \samples\Advanced\ExpButton В начале программы поставил REQUEST HB_CODEPAGE_RU1251 ANNOUNCE RDDSYS ........ FUNCTION Main() ........ SET LANGUAGE TO RUSSIAN // язык SET CODEPAGE TO RUSSIAN // кодовая страница SET Date TO GERMAN ..... И в результате получаю: Что не так делаю ?

Dima: Andrey пишет: Что не так делаю ? А исходник в какой кодировке (вероятно DOS) ?

Andrey: Dima пишет: А исходник в какой кодировке (вероятно DOS) ? Блин, точно. Фар новый попутал... Все нормально оказывается: Пример просто классный ! Давно такие кнопочки хотел !

Andrey: Что то я не понял, уже тестируется версия HMG 3.1.0, а Григорий выдал новую версию 2.2.8 Там есть типа: - HMG_CreateBarCode( cCode, cType, [nBarwidth], [nBarHeight], [lDisplayCode], [cPNGFileName], [aBarColor], [aBackColor], [lCheckSum], [lWide2_5], [lWide3] ) - HMG_CreateBarCode() function can be used to create barcode image in png file format if cPNGFileName parameter is included. If cPNGFileName is omitted, the function returns the hBitMap handle of barcode. - Any one of the following Barcode types is allowed. { "EAN13","EAN8","UPCA","UPCE","CODE39","ITF","MSI","CODABAR","CODE93","CODE11","CODE128","PDF417","DATAMATRIX","QRCODE" } и т.д. Это как понимать, у них своя версия - у нас своя версия ?

gfilatov2002: Andrey пишет: у них своя версия - у нас своя версия ? Именно так. HMG 3.1.5 - это последняя на данный момент официальная тестовая unicode версия Minigui EE 2.2.8 - это неофициальная рабочая winansi сборка от другой группы разработчиков Andrey пишет: Там есть типа: Посмотри пример в папке samples\Advanced\HMG_Zebra

Andrey: У них своя версия - у нас своя версия ! Мне нравится !

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.2.9, которая выйдет послезавтра. Кратко, что нового: - добавлены новые классы MULTITAB [TABSWIDTH <aWidth>] и MULTICOLUMN для элемента управления LISTBOX; - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - модифицировано открытие ключей реестра в режиме чтения для совместимости с Win7 UAC; - обновлена библиотека SQLITE3 до версии 3.8.2 (это dev-версия); - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеках TSBrowse и SQLite3Facade; - обновлена HMGS-IDE до версии 1.2.2; - обновлены некоторые старые примеры. Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.2.9-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg229-mingw.exe и для компилятора XCC из коммерческого дистрибутива xHarbour.com http://hmgextended.com/files/CONTRIB/hmg229-xcc.exe Вероятно, это последняя сборка библиотеки, выполненная мною, поскольку при отсутствии финансирования и приближении ассоциации Украины с ЕС я не нахожу разумных стимулов для продолжения этой работы...

AlexMyr: gfilatov2002 пишет: поскольку при отсутствии финансирования и приближении ассоциации Украины с ЕС я не нахожу разумных стимулов для продолжения этой работы... А Украина тут каким боком?

gfilatov2002: AlexMyr пишет: Украина тут каким боком? Хм.. живу я тут...

AlexMyr: gfilatov2002 пишет: Хм.. живу я тут... тоже живу тут, но если бы шли в ТС, то было бы финансирование и стимул?

Панченко: gfilatov2002 пишет: Новый релиз библиотеки Спасибо за Ваш труд. gfilatov2002 пишет: Вероятно, это последняя сборка библиотеки, выполненная мною Очень жаль. gfilatov2002 пишет: приближении ассоциации Украины с ЕС А вот это не понял ... Какое отношение к библиотеке имеет возможная ассоциация с ЕС?

gfilatov2002: Панченко пишет: Очень жаль Александр, я написал, что существует такая вероятность, а жизнь покажет Панченко пишет: Какое отношение к библиотеке имеет возможная ассоциация с ЕС? Прямое. Посмотрите на сегодняшние протесты в Болгарии, которая находится в ЕС с 2007 года. Так что поживем - увидим...

sashaBG: Григорий ЕС не такое уж зло. Плюсов пока больше чем минусов , например свободное передвижение товаров и рабочей силой . с 2014 г падает запрет на работу на Бритнских островах для нас и для румын . Так как у меня сын там учистя (безплатно) я задумываюсь погостить ему подольше А протесты связаны с наглости управляющих , которые уже 21 года одни и те же , все развороавали и делают вид что все в порядке . Зарплаты самые ниские в еврозоне , и не повышаются из за зговора тех же самых управляющих, мало нормально рабатающих и т.д. и т.п. Цель протеста снять их с власти , созвать его у нас называют "ВЕЛИКОЕ НАРОДНОЕ СОБРАНИЕ" оно всегда собирается в старой столице Болгарии - Велико Тырново, поменять в конституции выборную систему на МАЖОРИТАРНОЙ как во всей европе , а не как сейчас "партийно бандитская" и идти на новые выборы . Что получится не знаю ! ОФФТОП получился точно

Andrey: gfilatov2002 пишет: Вероятно, это последняя сборка библиотеки, выполненная мною, Очень жалко. Спасибо за ваш БОЛЬШОЙ труд !!! Не знаю даже чем помочь, но очень хотелось бы чтобы этот продукт не пропал с рынка !!!

SergKis: sashaBG пишет:ЕС не такое уж зло. Плюсов пока больше чем минусов , например свободное передвижение товаров и рабочей силой Очень большая обманка. ЕС - большое ЗЛО ! в Латвии это уж точно ( хотя мне грех жаловаться) - при вступлении в 3 раза подскочили цены (ес налоги), но не зарплаты - закрыли сахарное производство (требование ес) и связанное с ним сельское хоз-во и механизацию - своей рыбы не стало (норвежская и др. гумно ...), для выхода в море на сейнере должна стоять аппаратура, отпугивающая дельфинов (стоит дороже сейнеров), а есть ли дельфина на Балтике ?! - для выращивания свиней, должны быть кв.метры по норме на каждую, резиновые игрушки по норме и .т.д. За угробленного поросенка до 3-х месяцев платят деньги из ес фондов - как следсвие своего животноводства нет - производства своего практически нет, загублено на корню - все привозное, вывозят только лес, который рубят немерено - безработица особенно среди молодежи офигенная и все кто может делают ноги (даже в Австралию) и возвращаться не собираются. ~ 200000 уехало из 2000000 - все что можно скупили скандинавы, литовцы - своего мало что осталось. Хозяева программное обеспечение, как правило тащат свое, что логично - страну загнали в огромные долги, но у слуг народа как всегда хорошо и кризисы преодолены ... - сейчас переходим на Eur (~ 56% против) цены просто взлетают от этой процедуры не менее 30% - список можно продолжать, но уж писать надоело.

AlexMyr: SergKis пишет: Очень большая обманка. ЕС - большое ЗЛО Извиняюсь что в этой теме, пора или переносить посты в отдельную тему, или заканчивать, но такое ощущение, что Украина в ес с самого начала, уже давно ничего нет своего, а то, что еще осталось, скоро уже не будет. А линия Григория не совсем понятна, библиотека MiniGui - ЕС - Украина - Болгария - ...??? Понятно, что все надоедает, даже при условии когда за это постоянно платят, ... но, это Ваше решение.

gfilatov2002: Andrey пишет: Не знаю даже чем помочь, но очень хотелось бы чтобы этот продукт не пропал с рынка Благодарю за Вашу персональную поддержку! С учетом помощи западных друзей библиотеки и отказа правительства Украины от евроинтеграции в ближайшее время (Украина взяла так называемый тайм-аут) я решил выпустить еще одну рождественскую сборку в декабре

Pasha: gfilatov2002 пишет: С учетом помощи западных друзей библиотеки и отказа правительства Украины от евроинтеграции в ближайшее время (Украина взяла так называемый тайм-аут) я решил выпустить еще одну рождественскую сборку в декабре И это правильно. Спасибо, Григорий. И.. offtop on евроинтеграционная дурь то никуда не делась offtop off

sashaBG: Спасибо Григорий ! Спасибо за твой труд и за дружеское отношение ! MiniGUI - прекрасная и качественная библиотека и ето благодаря твоему большому труду . И правда на РОЖДЕСТВО случаются чудеса ! Давайте жить дружно !

Andrey: Пример \MiniGUI\SAMPLES\Applications\LINK_EXECUTOR\LinkExecutor.prg - не работает ! Для Win8 (и наверно Win7) путь к программе calc - C:\Windows\System32\calc.exe А для 64-bit систем наверно другой... Надо бы еще добавить автозагрузку. Могу помочь, если нужно. Пускай другим легче будет в применении МиниГуи.

Панченко: Григорий, в элементе управления LABEL при указании vCenterAlign текст не переносится, а обрезается. Посмотрите?

gfilatov2002: Панченко пишет: в элементе управления LABEL при указании vCenterAlign текст не переносится, а обрезается Александр! Это нормальное поведение при использовании этого стиля. Если требуется перенос текста, то можно использовать только горизонтальное выравнивание

Панченко: gfilatov2002 пишет: Это нормальное поведение Ясно. А есть ли возможность в CHECKLABEL изменять интервал между PICTURE и текстом при левом расположении изображения? Дело в том, что при расположении нескольких CHECKLABEL в одной строке изображение от CHECKLABEL, стоящего справа, визуально "прилипает" к левому.

gfilatov2002: Опубликован релиз 2.3.0 библиотеки Минигуи. Прямая ссылка на эту сборку для всех заинтересованных ниже http://hmgextended.com/files/CONTRIB/hmg-2.3.0-setup.zip Подробности - на оффициальном сайте библиотеки

Andrey: gfilatov2002 пишет: Опубликован релиз 2.3.0 библиотеки Минигуи. Блин, что я пропустил ? Это Новогодняя сборка ? А где примеры с дедом Морозом или снежинки чтобы на форме спускались ?

Softlog86: Кстати - про снежинки .... ПРОСИМ , ПРОСИМ , ПРОСИМ . (Есть идея четыре сезона сделать - чтоб "тема" автоматом менялась с наступлением поры года :) где снежинки , где цветочки , колоски , дождик :)

Andrey: Softlog86 пишет: Есть идея четыре сезона сделать - чтоб "тема" автоматом менялась с наступлением поры года :) где снежинки , где цветочки , колоски , дождик :) 5 баллов ! Я тоже такое хотел сделать у себя в программе !!!

Softlog86: Ну с фоном для окон всё просто - выбираем нужный паттерн и заливаем .... а вот чтоб анимированные снежинки / дождик .... тут сложнее .

Haz: Григорий , добрый день. Есть предложение по небольшому изменению кода для COMBOBOX. Суть в следующем: Пусть при использовании ValueSource и itemSource задано ITEMSOURCE CUSTOMER->NAME, VALUESOURCE CUSTOMER->ID возвращаемое значение берется корректно как &('CUSTOMER->ID') // строка 188 h_controlmisc.prg, а вот с назначением типа Form_1.Combo_1.Value := nID выходит проблемка т.к. назнчается ВСЕГДА RecNo(), Приходится сначала найти номер записи у которой ID = nID , а потом только присвоить .Value := nRec, хотя логичнее если возвращаем значение из массива данных , то и назначать должны значение из того же массива. предлагаю в h_controlmisc.prg в строке 470 заменить код 470: DO WHILE ! ( WorkArea )->( EOF() ) rcount++ // начало того ЧТО меняем // IF value == ( WorkArea )->( RecNo() ) // EXIT // ENDIF // конец того ЧТО меняем // начало того НА ЧТО меняем IF Empty ( _HMG_aControlCaption [ix] ) // empty ValueSource IF value == ( WorkArea )->( RecNo() ) EXIT ENDIF ELSE // !empty valueSource IF Value == &(_HMG_aControlCaption [ix]) EXIT ENDIF ENDIF // конец того НА ЧТО меняем В результате если я определил данные для valueSource то и получаю и назначаю только из valuesource. Последствия : т.к. изменено значение поиска , то при назначении .Value := 5 будет искаться не Recno() == 5, а &(ValueSource) == 5 и в программах в которых использовался ValueSource нужно отказаться от поиска Recno() перед присвоением .Value (это при существующей логике неизбежно было) , а присваивать значение напрямую

gfilatov2002: Haz пишет: Есть предложение по небольшому изменению кода для COMBOBOX. Очень интересное и логичное предложение, но оно наталкивается на два возражения: 1) текущее поведение COMBOBOX полностью соответствует описанию, данному автором библиотеки: - When ITEMSOURCE property is set to a fieldname, 'Value' property uses the physical record number, as in browse. - If you set the VALUESOURCE property to a fieldname, its content is returned instead the physical record number. Что означает, что при использовании свойства ITEMSOURCE свойство 'Value' всегда является физическим номером записи. А свойство VALUESOURCE используется только при возврате значения вместо физического номера записи. Кроме того, использование точного соответствия == при сравнении строк приведет к дополнительным неявным проблемам, которые отстутствуют при сравнении чисел. 2) новое поведение COMBOBOX потребует переделки логики работы программ, которые написаны с использованием свойства VALUESOURCE Увы, но я вынужден отказаться от такого изменения кода, чтобы не создавать проблем разработчикам и не вносить такую несовместимость. Естественно, Вы можете использовать любые переделки кода исходников в Вашей локальной копии

Haz: gfilatov2002 пишет: новое поведение COMBOBOX потребует переделки логики работы программ, которые написаны с использованием свойства VALUESOURCE Это аргумент ! Не вопрос, буду использовать переходник типа какой-нить самописной функции Value2Recno()

santy: При компиляции последней версии библиотеки 2.3.0 выдает ошибку: h_controlmisc.prg(4677) Error E0021 Circularity detected in #translate: '_MaximizeWindow' h_controlmisc.prg(4681) Error E0021 Circularity detected in #translate: '_MinimizeWindow' h_controlmisc.prg(4685) Error E0021 Circularity detected in #translate: '_RestoreWindow'

gfilatov2002: santy пишет: При компиляции последней версии библиотеки 2.3.0 выдает ошибку Эта ошибка была исправлена в день опубликования этой сборки. Просто скачайте корректную версию по ссылке http://hmgextended.com/files/CONTRIB/hmg-2.3.0-setup.zip

santy: Спасибо, не знал просто.

Andrey: При компиляции последней версии библиотеки 2.3.0 выдает ошибку: Error: Unresolved external '_HB_FUN_RESTORE' referenced from в модуле, который раньше нормально собирался: //////////////////////////////////////////////////////////////////////////// // запрет запуска второй копии программы Function OnlyOneInstance( cAppTitle ) Local hWnd := FindWindowEx( ,,, cAppTitle ) if hWnd # 0 iif( IsIconic( hWnd ), Restore( hWnd ), SetForeGroundWindow( hWnd ) ) ExitProcess( 0 ) endif Return NIL

gfilatov2002: Да, все верно Просто теперь надо добавить знак подчеркивания в имя этой функции [pre2]Function OnlyOneInstance( cAppTitle ) Local hWnd := FindWindowEx( ,,, cAppTitle ) if hWnd # 0 iif( IsIconic( hWnd ), _Restore( hWnd ), SetForeGroundWindow( hWnd ) ) ExitProcess( 0 ) endif Return NIL[/pre2]

Andrey: gfilatov2002 пишет: Просто теперь надо добавить знак подчеркивания в имя этой функции Спасибо БОЛЬШОЕ ! Теперь в примере нужно это исправить: MiniGUI\SAMPLES\BASIC\SPLASHDEMO_3, может и еще где....

gfilatov2002: Andrey пишет: Теперь в примере нужно это исправить Да, конечно. Я уже поправил примеры для новой сборки

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.3.1, которая выйдет на следующей неделе. Кратко, что нового: - исправлено управление всплывающей подсказкой Tooltip для элементов управления Label, RadioGroup и Spinner; - добавлен вывод всплывающей подсказки для элемента управления Image; - добавлена поддержка изменения картинок для элемента управления Tree после его определения; - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - обновлена библиотека SQLITE3 до версии 3.8.3 (это dev-версия); - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеке TSBrowse; - пересобрана HMGS-IDE с текущей версией библиотеки; - добавлены новые и обновлены некоторые старые примеры. Благодарю за внимание!

Andrey: gfilatov2002 пишет: подготовка к опубликованию новой версии 2.3.1, которая выйдет на следующей неделе. Ура !

gfilatov2002: На оффициальном сайте опубликован релиз 2.3.1 библиотеки Минигуи. Прямая ссылка на эту сборку для всех заинтересованных http://hmgextended.com/files/CONTRIB/hmg-2.3.1-setup.zip Желаю удачи в Новом году!

alex_II: После перехода на релиз 2.3.1 получил ошибку: Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland Error: Unresolved external 'GetAdaptersInfo' referenced from C:\MINIGUI\HARBOUR\LIB\HBRTL.LIB|hbsocket

Dima: alex_II возможно надо прилинковать C:\BCC55\Lib\PSDK\iphlpapi.lib

Softlog86: Поставил 2.3.1 стала ругаться : ERROR E0030 Syntax error "Syntax error at '@'" Вот строчка на чего ругается : @ 5,5 image TOVAR_PICTURE OF FORM_1 picture '' ACTION TRIGGER_FOTO() WHITEBACKGROUND ONMOUSEHOVER CURSORSIZEALL() На предыдущей MiniGUI всё собиралось и работало . Изменений про работу IMAGE я не нашел ....

gfilatov2002: Softlog86 пишет: Изменений про работу IMAGE я не нашел Класс WHITEBACKGROUND в элементе управления IMAGE оставлен теперь только для совместимости, поскольку есть новый класс BACKGROUNDCOLOR для его замены. Быстрое исправление Вашего кода см. ниже @ 5,5 image TOVAR_PICTURE OF FORM_1 picture '' ACTION TRIGGER_FOTO() ONMOUSEHOVER CURSORSIZEALL() WHITEBACKGROUND

Andrey: gfilatov2002 пишет: поскольку есть новый класс BACKGROUNDCOLOR для его замены А пример использования этого класса есть ?

gfilatov2002: Andrey пишет: пример использования этого класса есть ? Да, конечно. См. в папке samples\Basic\IMAGE_2

Andrey: gfilatov2002 пишет: См. в папке samples\Basic\IMAGE_2 Это я пробовал. Мне не понятно - ONMOUSEHOVER CURSORSIZEALL()

gfilatov2002: Andrey пишет: Мне не понятно - ONMOUSEHOVER CURSORSIZEALL() И что здесь не ясно - при наведении мыши на картинку изменяется форма курсора И все дела

Andrey: gfilatov2002 пишет: И все дела Спасибо ! Уже этим пользовался, да что-то уже забыл...

krutoff: При попытке сборки библиотек с помощью MakeAllLibs.bat для xHarbour 1.2.3 Intl. (SimpLex) (Build 20130419) у меня возникли ошибки. Может надо другую версию xHarbour. Григорий, Вы не могли бы посмотреть? Error E2194: Could not find file 'h_wrepint.c' Error E2194: Could not find file 'h_wremix.c' Error E2194: Could not find file 'h_wrepdf.c' Error E2194: Could not find file 'hmg_hpdf.c' Еще раз проверил на других версиях и нашел эти же ошибки в 2.2.6.

gfilatov2002: krutoff пишет: Григорий, Вы не могли бы посмотреть? Олег, я рекомендую использовать готовую сборку для компилятора xHarbour, которая находится по адресу: http://hmgextended.com/files/CONTRIB/xhmg231_xhb9978.zip Для справки: в этой сборке используется совместимая с xHarbour версия библиотеки WinReport, которая вызвала у Вас затруднение...

krutoff: Григорий, спасибо огромное! Я по этому адресу http://hmgextended.com/files/CONTRIB уже заходил и смотрел, но там ничего такого не было. (впрочем, как и сейчас я увидел только версию 2.1.8 ... )

nick_mi: Здравствуйте Григорий! При попытке компилировать пример получил ошибку Link error. Для продолжения нажмите любую клавишу . . . C:\...GUI\SAMPLES\Advanced\FlashWindow>Compile.bat C:\MiniGUI\SAMPLES\Advanced\FlashWindow>call ..\..\..\batch\compile.bat demo Harbour 3.2.0dev (r1312060952) Copyright (c) 1999-2013, http://harbour-project.org/ Compiling 'demo.prg'... Lines 20501, Functions/Procedures 2 Generating C source output to 'demo.c'... Done. Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland demo.c: Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland Error: Unresolved external '_HB_FUN_RESTORE' referenced from C:\MINIGUI\SAMPLES\ ADVANCED\FLASHWINDOW\DEMO.OBJ Error: Unresolved external '_HB_FUN_MINIMIZE' referenced from C:\MINIGUI\SAMPLES \ADVANCED\FLASHWINDOW\DEMO.OBJ Подобная ошибка возникает при компиляции C:\MiniGUI\SAMPLES\BASIC\SPLASHDEMO_3\

gfilatov2002: nick_mi пишет: При попытке компилировать пример получил ошибку Эти ошибки в примерах были исправлены в последней версии 2.3.1 Поэтому просто обновите библиотеку В любом случае, благодарю за сообщение (а то создается впечатление, что примеры из поставки никто не смотрит)

Andrey: gfilatov2002 пишет: а то создается впечатление, что примеры из поставки никто не смотрит Еще как смотрим, и показываем другим !

Dima: Andrey пишет: Еще как смотрим +1

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.3.2, которая выйдет послезавтра. Кратко, что нового: - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - мелкие изменения внутренних функций с целью оптимизации скорости исполнения кода; - обновлена библиотека SQLITE3 до финальной версии 3.8.3.1; - обновлена unicode-сборка Харбора версии 3.2.0dev; - добавлены новые и обновлены некоторые старые примеры. Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.2-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg232-mingw.exe и для последней версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg232_xhb9984.zip Благодарю за внимание!

Andrey: Пересобрал несколько программ - полет нормальный !

Andrey: Нет не все работают проги... Вот программа нормально работала на версии 2.2.6 ! А сейчас при нажатии на любую кнопку - вылетает:

gfilatov2002: Andrey пишет: сейчас при нажатии на любую кнопку - вылетает Это означает, что библиотека стала более чувствительной к ошибочным вызовам. Проверьте, требуется ли изменять значение VALUE для элемента управления ListBox в Вашей программе при нажатии на эту кнопку.

Andrey: gfilatov2002 пишет: Проверьте, требуется ли изменять значение VALUE для элемента управления ListBox в Вашей программе при нажатии на эту кнопку. А как исправить ? DEFINE LISTBOX List_1 ...................... OnDblClick List1_OnDblClick(FormaMain.List_1.Item(FormaMain.List_1.value)) OnLostFocus FormaMain.List_1.Value:=NIL;nFocus:=0 OnGotFocus nFocus:=1 END LISTBOX DEFINE LISTBOX List_2 ................ OnDblClick List2_OnDblClick(FormaMain.List_2.Item(FormaMain.List_2.value)) OnLostFocus FormaMain.List_2.Value:=NIL;nFocus:=0 OnGotFocus nFocus:=2 END LISTBOX Посмотрел и другие свои проги, везде оказывается использую: OnDblClick List1_OnDblClick(FormaMain.List_1.Item(FormaMain.List_1.value)) OnLostFocus FormaMain.List_1.Value:=NIL;nFocus:=0

gfilatov2002: Andrey пишет: А как исправить ? FormaMain.List_1.Value:=0 Для следующей сборки добавил контроль передаваемого параметра в функцию _SetValue(), которая вызывала ошибку

Andrey: gfilatov2002 пишет: Для следующей сборки добавил контроль передаваемого параметра в функцию _SetValue(), которая вызывала ошибку Спасибо БОЛЬШОЕ !!!

alex_II: Переход на новую версию прошел нормально. Отличная работа Григорий! Спасибо

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.3.3, которая выйдет на этой неделе. Кратко, что нового: - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - мелкие дополнения в заголовочных файлах для совместимости с ответвлением Харбора версии 3.4; - обновлена библиотека SQLITE3 до финальной версии 3.8.4.1; - обновлена unicode-сборка Харбора версии 3.2.0dev, небольшое исправление в библиотеке TsBrowse; - обновлены некоторые старые примеры. Благодарю за внимание!

Andrey: gfilatov2002 пишет: небольшое исправление в библиотеке TsBrowse; А нельзя ли туда добавить переменную (или 2) ответственные за цвет линии скролинга ? А то у меня никак не получается изменение цвета через свою программу.

gfilatov2002: Andrey пишет: А нельзя ли туда добавить переменную (или 2) ответственные за цвет линии скролинга ? Я еще раз пересмотрел исходники - там собственный ScrollBar не создается, а используется системный Поэтому доступа к цветам скролинга нет...

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.3-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg233-mingw.exe и для последней версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg233_xhb9985.zip Благодарю за внимание!

Andrey: Тестирую новую версию. И сразу вопрос, почему нельзя запустить 2 раза программу \MiniGUI\SAMPLES\BASIC\ExtractIcon\demo2.prg Выдается вот такая ошибка: Вроде же нет в этом исходнике функции проверки второй копии программы ?

Haz: Andrey пишет: Вроде же нет в этом исходнике функции проверки второй копии программы ? SET MULTIPLE OFF WARNING

Andrey: Haz пишет: SET MULTIPLE OFF WARNING Спасибо ! Не знал такую команду... А на русском надпись эту сделать можно ? Обычные юзера же не поймут !

Haz: Andrey пишет: юзера же не поймут зависит от выбранного языка в программе , нужна команда типа LANGSELECT RU ( лень искать, НЕ пользую, но что есть на русском - точно ) А команда живет в справке MiniGui.chm есть SET MULTIPLE Impede attempts to run multiple instances of the program. SYNTAX SET MULTIPLE ON | OFF [ WARNING ]

Vlad04: нужна команда типа LANGSELECT RU SET LANGUAGE TO RUSSIAN

dkartashov: Добрый день. Тестирую новую сборку 2.3.3. Обнаружил ошибку при компиляции тестового примера: SAMPLES\Advanced\REPORT_GENERATOR\ [pre2]Harbour 3.2.0dev (r1403161854) Copyright (c) 1999-2014, http://harbour-project.org/ Compiling 'demo.prg'... Compiling 'h_rptgen.prg'... h_rptgen.prg(504) Error E0030 Syntax error "syntax error at ' PRINTER_PAPER_LETTER '" h_rptgen.prg(504) Error E0022 Invalid lvalue 'String' h_rptgen.prg(505) Error E0022 Invalid lvalue 'String' ...[/pre2] Анализ данного места программы показал, что ошибка вызвана наличием с индексе массива символов табуляции: [pre2]aPaper [ PRINTER_PAPER_LETTER ] := { 215.9 , 279.4 }[/pre2] то есть, перед закрывающейся скобкой "]" набито несколько символов табуляции. При замене символов табуляции на пробелы - ошибки исчезают и пример успешно компилируется.

gfilatov2002: dkartashov пишет: При замене символов табуляции на пробелы - ошибки исчезают и пример успешно компилируется Благодарю за сообщение! Это что-то накосячили в Харборе, откатил его сборку на шаг назад, и пример собрался с символами табуляции тоже Дополнение. Теперь препроцессор Харбора проверяет наличие некорректных символов в квадратных скобках, и символ табуляции внутри скобок теперь вне закона

Andrey: gfilatov2002 , а нельзя ли заменить BCC 5.5.1 на 5.8.2 Дело в том что, BCC 5.5.1 НЕ МОЖЕТ ИСПОЛЬЗОВАТЬ фаил .RES если он больше 1Мб (или чуть меньше), т.е. суммарный объем ресурсов не должен превышать этот размер. (может опции какие надо использовать ? ) НЕ ЛИНКУЕТСЯ ресурсный файл, выдает ошибку: Turbo Incremental Link 5.66 Copyright (c) 1997-2002 Borland Fatal: Access violation. Link terminated. hbmk2[demo]: Error: Running linker. 2 А BCC 5.8.2 прекрасно собирает большие ресурсы. Пробовал даже 15 Мб заталкивать в ресурсы, работает. Картинки бывают большие, т.е. при использовании фона BMP - 1,5 Mb и больше... Труба при сборке, начинаешь уменьшать, т.е. тратишь время на тупую работу... Взял переименовал папку BCC582 в BCC55 и собрал ехе-ник. При выводе hb_compiler() на окно, появляется: Borland C++ 5.5.1 (32-bit) ?

gfilatov2002: Andrey пишет: а нельзя ли заменить BCC 5.5.1 на 5.8.2 Конечно, можно По этому пути пошли, например, разработчики коммерческой библиотеки FiveWin Но есть небольшая проблема: компилятор BCC 5.8.2 требует наличия коммерческой лицензии на использование в отличие от бесплатного BCC 5.5.1, и распространять коммерческий продукт без лицензии на него мы не имеем никакого права Таким образом, более перспективным с точки зрения бесплатного продукта (коим является библиотека минигуи) является использование open source С-компилятора MinGW Andrey пишет: При выводе hb_compiler() на окно, появляется: Borland C++ 5.5.1 (32-bit) ? Это просто указывает на то, что данная сборка Харбора была выполнена с использованием BCC 5.5.1

Andrey: gfilatov2002 пишет: Это просто указывает на то, что данная сборка Харбора была выполнена с использованием BCC 5.5.1 Нет. Я линковал с помощью BCC 5.8.2 ! Andrey пишет: Взял переименовал папку BCC582 в BCC55 и собрал ехе-ник. При выводе hb_compiler() на окно, появляется: Borland C++ 5.5.1 (32-bit)

Dima: Andrey пишет: Нет. Я линковал с помощью BCC 5.8.2 Читай между строк Ты ведь не пересобирал свой Harbour под BCC 5.8.2

Andrey: Dima пишет: Читай между строк Теперь понял...

fokinal21: Всем доброго времени суток! У меня простой, наивный вопрос. Пользуюсь IDE из сборок Григория. Скажите там Debug из меню как-то работает? У меня кроме черного окна ничего не получается. Сплошной шедевр Малевича. Можно, конечно, пользоваться Compile /d, но не хочется прыгать как-то...

Andrey: Andrey пишет: Скажите там Debug из меню как-то работает? Нет, не работает. Нужно программу собирать еще и для отладки, не помню уже опций. fokinal21 пишет: Можно, конечно, пользоваться Compile /d, но не хочется прыгать как-то... Возьми и используй лучше это http://clipper.borda.ru/?1-4-20-00000854-000-0-0-1385633245

fokinal21: Andrey пишет: Возьми и используй лучше это А как прикрутить к сборкам Филатова? Может распишешь?!!!

Andrey: fokinal21 пишет: А как прикрутить к сборкам Филатова? Может распишешь?!!! Сам не пользуюсь. Где то здесь на форуме писалось об этом. Если не найдешь, то спроси у Филатова.

Andrey: gfilatov2002 пишет: Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg233-mingw.exe Собираю пример Z:\HMG\minigui\Samples\FREEVIEW>build.bat, получаю ошибку: Z:\HMG\minigui\Samples\FREEVIEW>call ..\..\buildapp.bat FreeView freeview.hbc windres: can't open bitmap file `bmps\rleft.bmp': No such file or directory

gfilatov2002: Andrey пишет: can't open bitmap file `bmps\rleft.bmp': No such file or directory Вы абсолютно правы - недоглядел. Как вылечить? Просто перетащите эти файлы из аналогичного примера в BCC-сборке

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.3.4, которая выйдет послезавтра. Кратко, что нового: - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - функция BmpSize() теперь поддерживает определение размеров картинки в форматах JPG, GIF, TIF и PNG из ресурсов; - обновлены библиотеки MiniPrint, HbXml и HbPgSql; - обновлена библиотека SQLITE3 до версии 3.8.5dev; - обновлена unicode-сборка Харбора версии 3.2.0dev; - добавлены новые и обновлены некоторые старые примеры. Благодарю за внимание! P.S. Требуется финансовая поддержка заинтересованных в поддержке библиотеки лиц

Andrey: gfilatov2002 пишет: - функция BmpSize() теперь поддерживает определение размеров картинки в форматах JPG, GIF, TIF и PNG из ресурсов; Давно пора ! Ждем с нетерпением !!!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.4-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg234-mingw.exe и для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg234_xhb9990.zip Грузите апельсины бочками (c) О.Бендер

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.3.5, которая выйдет послезавтра. Кратко, что нового: - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - выполнена очистка всего Си-кода от неиспользуемых Windows-констант; - команда DEFINE BKGBRUSH теперь поддерживает картинки в форматах JPG, GIF, TIF и PNG; - обновлена библиотека Bos Taurus до версии 1.0.5 от 2014/04/19; - обновлена unicode-сборка Харбора версии 3.2.0dev и библиотека SQLITE3 до текущей версии 3.8.5dev; - добавлены новые и обновлены некоторые старые примеры. Желаю всем мира, добра и надежды! Нет ничего ужаснее войны и... "разрухи в головах"

Andrey: gfilatov2002 пишет: - команда DEFINE BKGBRUSH теперь поддерживает картинки в форматах JPG, GIF, TIF и PNG; Ура !!! gfilatov2002 пишет: Нет ничего ужаснее войны и... "разрухи в головах" Поддерживаю !

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.5-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg235-mingw.exe и для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg235_xhb9998.zip

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершена подготовка к опубликованию новой версии 2.3.6, которая выйдет завтра. Кратко, что нового: - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - обновлены библиотеки MiniPrint и HbXml; - обновлена библиотека Bos Taurus с учетом последних авторских изменений; - обновлена unicode-сборка Харбора версии 3.2.0dev и библиотека SQLITE3 до финальной версии 3.8.5; - добавлены новые и обновлены некоторые старые примеры. Благодарю за Ваше внимание

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.6-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg236-mingw.exe и компактный архив для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg236_xhb10002.zip Желаю всем мира, добра и терпения

Andrey: Перекомпилировал несколько программ - все Ок ! Большое СПАСИБО за ваш труд !!! Вроде PNG картинки показывать лучше стало ! Нет окантовки черной дурацкой... Пример \samples\Basic\FormStorage - классный !!! То что нужно. Еще бы сделать его трех-оконным и показать как записывать в ОДИН ини-файл размеры окна + цвета объектов.

Andrey: Andrey пишет: Вроде PNG картинки показывать лучше стало ! Нет окантовки черной дурацкой... Рано радовался. Берем пример \MiniGUI\SAMPLES\BASIC\IMAGE_2 - добавляем строчку: DEFINE WINDOW Win_1 ; AT 0,0 ; WIDTH 800 HEIGHT 600 ; TITLE 'Load Image From DISK' ; BACKCOLOR { 0,176,240 } ; MAIN И получаем фигню. Т.е. PNG картинки без фона отображаются ТОЛЬКО на сером фоне !!!

SergKis: Andrey пишет:DEFINE WINDOW Win_1 ; AT 0,0 ; WIDTH 800 HEIGHT 600 ; TITLE 'Load Image From DISK' ; BACKCOLOR { 0,176,240 } ; MAIN здесь запись вроде позиционная, т.е. надо: DEFINE WINDOW Win_1 ; AT 0,0 ; WIDTH 800 HEIGHT 600 ; TITLE 'Load Image From DISK' ; MAIN ; ... BACKCOLOR { 0,176,240 } ; ... "может здесь собака порылась" ?

nick_mi: Что-то не совсем понятная проблема. PING рисуется в указанном примере с заданным цветом фона если в указанном примере модифицировать цвет фона и TRANSPARENT поставить .T. (см пример ниже) фон всегда бедет как у окна. Или я нкеправильно понял проблему ? [pre2] DEFINE IMAGE Image_1 PARENT Win_1 ROW 200 COL 140 WIDTH nWidth HEIGHT nHeight PICTURE aPicture [ i ] STRETCH lStretch TRANSPARENT .T. BACKGROUNDCOLOR win_1.backcolor //aBackgroundColor ADJUSTIMAGE lAdjustImage END IMAGE [/pre2]

Andrey: nick_mi пишет: Или я нкеправильно понял проблему ? НЕТУ ФОНА { 0,176,240 }: И ПОЧЕМУ ЧЕРНАЯ ОКАНТОВКА { 0,176,240 }:

nick_mi: А вы это исправление делали [pre2] DEFINE IMAGE Image_1 PARENT Win_1 ROW 200 COL 140 WIDTH nWidth HEIGHT nHeight PICTURE aPicture [ i ] STRETCH lStretch TRANSPARENT .T. BACKGROUNDCOLOR win_1.backcolor ADJUSTIMAGE lAdjustImage END IMAGE [/pre2] у меня с этой строкой берет фон основного окна

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершается подготовка к опубликованию новой версии 2.3.7, которая выйдет на следующей неделе. Кратко, что нового: - исправлена функция _GetFocusedControl() для элементов управления ComboBox и ComboBoxEx; - ссылку на объект ThisWindow теперь можно использовать внутри структуры DEFINE WINDOW ... END WINDOW (особая благодарность за это - SergKis); - добавлена новая функция InkeyGUI( [<nWait>] ), предложенная SergKis ; - элемент управления ButtonEx теперь поддерживает новый класс HANDCURSOR и события ON MOUSEHOVER и ON MOUSELEAVE; - добавлена поддержка класса HOTTRACK для выделения активной вкладки цветного элемента управления Tab; - обновлена unicode-сборка Харбора версии 3.2.0dev, мелкие исправления в библиотеке HBPrinter, обновлены библиотеки PropGrid и HbXml; - добавлена новая утилита Sqlite browser; - добавлены новые и обновлены некоторые старые примеры. Благодарю за внимание!

Vlad04:

Andrey: gfilatov2002 пишет: Завершается подготовка к опубликованию новой версии 2.3.7 Ждем с нетерпением !

Haz: Григорий, добрый день Просматривал исходник h_tbrowse.prg , а именно метод SortArray и не понял зачем там используется ::SetArray ? ведь при сортировке массив остается формально тот же -размерность массива не меняется, порядок колонок тот же ВОТ кусок кода для сортировки по убыванию (то же и по возрастанию) : ============================================ if ValType(::aColumns[ nCol ]:bArraySortDes) == "B" ::SetArray( ASort( ::aArray,,, ::aColumns[ nCol ]:bArraySortDes ) ) else ::aArray := Asort( ::aArray,,, {|x,y| x[ nCol ] > y[ nCol ] } ) endif ============================================ почему вместо ::SetArray( ASort( ::aArray,,, ::aColumns[ nCol ]:bArraySortDes ) ) не применить более простую (быструю) конструкцию :aArray := Asort( ::aArray,,, ::aColumns[ nCol ]:bArraySortDes ) ? ведь по сути вызов ::SetArray( aArray ) всего лишь и выполняет подобное присваивание + установки по умолчанию

gfilatov2002: Haz пишет: почему вместо ::SetArray( ASort( ::aArray,,, ::aColumns[ nCol ]:bArraySortDes ) ) не применить более простую (быструю) конструкцию Думаю, что Вы абсолютно правы! Блоки кода bArraySortDes и bArraySort - это расширение от Януша Пора, и, видимо, реализовано не очень изящно. Обязательно поправлю уже для следующей сборки

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на оффициальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.7-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg237-mingw.exe и компактный архив для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg237_xhb10003.zip Я подготовил также эту сборку, основанную на компиляторе BCC 5.82 command-line tools и соответствующей ему свежей версии Харбора. Ссылки на эту сборку и компилятор BCC 5.82 по известным причинам смогу предоставить только в частной переписке

Haz: интересует есть ли практический смысл использования BCC 5.82 кроме смены версии. Пару лет назад собрал им проект и кроме увеличения размера разницы не заметил

gfilatov2002: Haz пишет: практический смысл использования BCC 5.82 Андрей сообщил, что BCC 5.82 поддерживает добавление в приложение ресурсов объемом более 1 MB Я заметил следующую тенденцию: BCC 5.02 (выпуск 1997 года) работает под Виндой 95 и выше BCC 5.51 (выпуск 2000 года) работает под Виндой 98 и выше BCC 5.82 (выпуск 2006 года) работает начиная с WinXP и выше

Haz: СПАСИБО gfilatov2002 пишет: Я заметил следующую тенденцию: Если это все, то нет особого смысла gfilatov2002 пишет: поддерживает добавление в приложение ресурсов объемом более 1 MB это решается заменой BRC32 на ресурс компилер от микрософт PS У меня есть еще 6.30 - тоже не заметил разницы

Andrey: Haz пишет: это решается заменой BRC32 на ресурс компилер от микрософт А как это сделать ? Поделись пожалуйста опытом...

Haz: Andrey пишет: Поделись пожалуйста опытом... а чего тут делиться BRCC32.EXE - компилятор ресурсов от Borland RC.EXE - тож самое от Microsoft ( можно любой другой брать т.к. RES он и в африке RES) Набираешь в консоли RC.EXE /? и читаешь справку по командной строке, потом правишь батник сборки проекта под синтаксис RC. PS Если использовать HBmk2 при использовании BCC32 вызывает его компилятор ресурсов, я когда-то правил исходник HBmk2 под синтаксис RC Можно наверное и свою обманку BRCC32 написать , которая принимает параметры командной строки и передает их RC

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершается подготовка к опубликованию новой версии 2.3.8, которая выйдет на следующей неделе. Кратко, что нового: - добавлен новый элемент управления - owner-draw ListBox со встроенными Checkbox-ами; - продолжена оптимизация использования внутренних функций с целью уменьшения ядра библиотеки; - небольшие изменения библиотеки MiniPrint; - обновлена unicode-сборка Харбора версии 3.2.0dev и библиотека SQLITE3 до версии 3.8.6dev; - добавлены новые и обновлены/исправлены некоторые старые примеры. Благодарю за внимание!

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на официальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.8-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg238-mingw.exe и компактный архив для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg238_xhb10008.zip Желаю всем мира, добра и надежды!

Andrey: Григорий, спасибо БОЛЬШОЕ за твой огромный труд !

Haz: Григорий , возможно ли в TsBrowse HMG добавить новый метод ? ( себе добавляю его в новые сборки, но не удобно же ) На базе ::Resize() написал ::RewsizeWin() который позволяет динамически менять само окно TsBrows Вот сам метод * ============================================================================ * METHOD TSBrowse:ReSizeWin() * ============================================================================ METHOD ReSizeWin( nSizeType, nTop, nLeft, nWidth, nHeight ) CLASS TSBrowse Local /*nMin, nMax, nPage,*/ ; nTotPix := 0 MoveWindow ( ::oWnd:hWnd, nLeft, nTop, nWidth, nHeight, .T. ) ::nTop := nTop If Empty( ::aColSizes ) Return Nil EndIf AEval( ::aColSizes, {|n| nTotPix += n } ) If ::lEditing .and. ::aColumns[ ::nCell ]:oEdit != Nil SendMessage( ::aColumns[ ::nCell ]:oEdit:hWnd, WM_KEYDOWN, VK_ESCAPE, 0 ) EndIf If ! Empty( ::nAdjColumn ) ::nAdjColumn := Min( Len( ::aColumns ), ::nAdjColumn ) EndIf ::nRowPos := Min( ::nRowPos, Max( ::nRowCount(), 1 ) ) If ! Empty( ::nAdjColumn ) .and. nTotPix != nWidth ::aColumns[ ::nAdjColumn ]:nWidth := ; ::aColSizes[ ::nAdjColumn ] += ( nWidth - nTotPix ) EndIf ::Super:ReSize( nSizeType, nWidth, nHeight ) ::ResetVScroll() Return ::Refresh(.T.) Вот пример использования , бровс привязан к форме и при изменении размера фориы - меняется размер бровса #include "minigui.ch" #include "tsbrowse.ch" FUNC Main() Local aArray := { ; {'AAAAAAAAAAAAAAAA', 1, Date() }, ; {'BBBBBBBBBBBBBBBB', 2, Date() }, ; {'CCCCCCCCCCCCCCCC', 3, Date() }, ; {'DDDDDDDDDDDDDDDD', 4, Date() }, ; {'EEEEEEEEEEEEEEEE', 5, Date() }, ; {'FFFFFFFFFFFFFFFF', 6, Date() }, ; {'GGGGGGGGGGGGGGGG', 7, Date() } ; } Public oBrw DEFINE WINDOW Form_1 ; AT 0,0 ; WIDTH 400 ; HEIGHT 300 ; TITLE "TsBrowse ReSize Test" ; MAIN ; FONT 'Tahoma' SIZE 9; ON SIZE { || oBrw:ResizeWin( 0, ; GetProperty("Form_1", 'Row') + 5, ; GetProperty("Form_1", 'Col') + 5, ; GetProperty("Form_1", 'Width') - 17, ; GetProperty("Form_1", 'Height') - 45 ) } ; ON MINIMIZE { || oBrw:ResizeWin( 0, ; GetProperty("Form_1", 'Row') + 5, ; GetProperty("Form_1", 'Col') + 5, ; GetProperty("Form_1", 'Width') - 17, ; GetProperty("Form_1", 'Height') - 45 ) } ; ON MAXIMIZE { || oBrw:ResizeWin( 0, ; GetProperty("Form_1", 'Row') + 5, ; GetProperty("Form_1", 'Col') + 5, ; GetProperty("Form_1", 'Width') - 17, ; GetProperty("Form_1", 'Height') - 45 ) } ; DEFINE TBROWSE oBrw ; AT 5,5 ; OF Form_1 ; WIDTH GetProperty("Form_1", 'Width') - 17 ; HEIGHT GetProperty("Form_1", 'Height') - 45 ; FONT "Tahoma" ; SIZE 9 ; GRID oBrw:nAdjColumn := 1 oBrw:SetArray( aArray, .T. ) END TBROWSE END WINDOW ACTIVATE WINDOW Form_1 RETURN NIL

gfilatov2002: Haz пишет: возможно ли в TsBrowse HMG добавить новый метод ? Вынужден Вам отказать, поскольку новый метод практически повторяет уже существующий метод ::Resize() Вместо добавления нового метода предлагаю использовать простую функцию типа [pre2] FUNCTION ResizeWin( oBrw ) Local nTop := 5 Local nLeft := 5 Local nWidth := GetProperty("Form_1", 'Width') - 17 Local nHeight := GetProperty("Form_1", 'Height') - 45 MoveWindow( oBrw:oWnd:hWnd, nTop, nLeft, nWidth, nHeight, .T. ) oBrw:Resize( 0, nWidth, nHeight ) oBrw:ResetVScroll() oBrw:Refresh(.T.) RETURN NIL[/pre2]

Haz: Нет так нет gfilatov2002 пишет: предлагаю использовать простую функцию типа Почти так и делаю METHOD ReSizeWin( nSizeType, nTop, nLeft, nWidth, nHeight ) CLASS TSBrowse MoveWindow ( ::oWnd:hWnd, nLeft, nTop, nWidth, nHeight, .T. ) ::nTop := nTop ::Resize( nSizeType, nWidth, nHeight ) ::ResetVScroll() Return ::Refresh(.T.) PS без выделенной строки будет глюк с Get объектами если на форме не один бровс

Andrey: gfilatov2002 пишет: Local nWidth := GetProperty("Form_1", 'Width') - 17 Local nHeight := GetProperty("Form_1", 'Height') - 45 А зачем это делать ? На ХР будет один размер, на Win8 будет другой размер. Я уже пробовал. Использую теперь, то что SergKis посоветовал. STATIC FUNCTION MyResizeBrowse() LOCAL hWnd := GetFormHandle(ThisWindow) LOCAL nHStBar := GetWindowHeight(GetControlHandle('STATUSBAR', hWnd)) // высота StatusBar nHStBar := 0 // если не используется StatusBar oBrw_5:Move( oBrw_5:nLeft ,oBrw_5:nTop , GetClientWidth(hWnd)-2, ; GetClientHeight(hWnd) - oBrw_5:nTop - nHStBar, .T.) oBrw_5:Paint() // Иначе не перерисовываются вертикальные разделители у бровса CorrectionFirstLast("oBrw_5") MyToolBar(.T.) //----- перерисовать свои кнопки ---- Return nil Может и не прав, но вроде работает. Поправьте меня, если не прав. Может быть лучше эти функции (GetClientWidth() и GetClientHeight() ) добавить в библиотеку, чтобы стандартными были ?

SergKis: Andrey ошибка LOCAL nHStBar := GetWindowHeight(GetControlHandle('STATUSBAR', hWnd)) надо LOCAL nHStBar := GetWindowHeight(GetControlHandle('STATUSBAR', <здесь имя окна, а не hWnd>))

Andrey: SergKis пишет: надо LOCAL nHStBar := GetWindowHeight(GetControlHandle('STATUSBAR', <здесь имя окна, а не hWnd>)) А можно вместо <здесь имя окна, а не hWnd> поставить ThisWindow или _HMG_ThisFormName ?

SergKis: Andrey пишет:А можно вместо если вызов MyResizeBrowse() происходит между DEFINE WINDOW ... END WINDOW то да, ThisWindow.Name или _HMG_ThisFormName, если после END WINDOW до ACTION ..., тогда не через эти переменные.

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершается подготовка к опубликованию новой версии 2.3.9, которая выйдет на следующей неделе. Кратко, что нового: - переработана и дополнена Error-система библиотеки; - теперь команда PRINT IMAGE в библиотеке MiniPrint поддерживает вывод PNG картинок; - небольшие изменения в библиотеке WinReport от автора; - обновлена HMGS-IDE до версии 1.2.3; - обновлена unicode-сборка Харбора версии 3.2.0dev и библиотека SQLITE3 до финальной версии 3.8.6; - добавлены новые и обновлены/исправлены некоторые старые примеры. Благодарю за внимание!

Andrey: gfilatov2002 пишет: - переработана и дополнена Error-система библиотеки; А чуть подробней можно описать ?

Dima: Andrey Подробнее будет видимо в ChangeLog.txt

gfilatov2002: Dima пишет: Подробнее будет видимо в ChangeLog.txt Да, именно так [pre2] * Enhanced: The following additional information is available in the ErrorLog file at the program crash: - system params; - environmental params; - detailed work area items (it may be empty section); - internal error handling params; - list of available Public and Private variables (it may be empty). Based upon a Harbour xhb contribution. The old behaviour is available also via using of the command SET SHOWDETAILERROR OFF on top of a main module. Requested by Honorio A. S. Almeida <info2000informa@ig.com.br>. Contributed by Grigory Filatov <gfilatov@inbox.ru> (see demo in folder \samples\Basic\ShowDetailError) [/pre2]

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на официальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.3.9-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg239-mingw.exe и компактный архив для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg239_xhb10015.zip Благодарю за внимание

Andrey: Пересобрал несколько программ. Полет нормальный !

gfilatov2002: Andrey пишет: Полет нормальный ! Дополнительно в этой сборке добавлен второй параметр в функцию _AutoAdjust(): - это массив с оригинальным разрешением, при котором разрабатывались формы в приложении. Это удобно использовать для автоматического масштабирования элементов управления в окнах на компьютере пользователя при старте приложения. Для проверки я использовал следующий простой пример, который распахивает окно на весь экран (при этом для дизайна формы использовалось минимальное разрешение 640 х 480): [pre2] #include "minigui.ch" Function Main SET AUTOADJUST ON DEFINE WINDOW Form_1 ; TITLE 'Hello World!' ; MAIN ; ON INIT _AutoAdjust( This.Handle, {640, 480} ) @ 200,10 LABEL Label_1 ; WIDTH 620 HEIGHT 24 ; VALUE 'Sample text' ; FONT 'Arial' SIZE 12 CENTERALIGN // здесь на форме располагаются другие элементы управления END WINDOW ACTIVATE WINDOW Form_1 Return Nil [/pre2]

Andrey: gfilatov2002 пишет: Это удобно использовать для автоматического масштабирования элементов управления в окнах на компьютере пользователя при старте приложения. Не понятно как это использовать ? Вот например есть готовое меню для программы - https://cloud.mail.ru/public/ad39650e5d8a%2FButtonEx_OnMouseHover2.7z Как это меню переделать для всех (основных) разрешений экрана. И второй вопрос: по тексту программы - не могу сделать автоопределение имени объекта для контекстного меню. Как его сделать, чтобы понятно было в контекстном меню - какой объект сейчас редактируется ?

gfilatov2002: Andrey пишет: Как это меню переделать для всех (основных) разрешений экрана. Меню для программы с исправлениями выложил по адресу http://file.qip.ru/arch/B66rPqt/Menu_ButtonEx-upd.html Для подстройки на текущее разрешение экрана укажите для основной формы WIDTH GetDesktopWidth() HEIGHT GetDesktopHeight() вместо фиксированных размеров WIDTH 1024 HEIGHT 780 Andrey пишет: Как его сделать, чтобы понятно было в контекстном меню - какой объект сейчас редактируется ? В Вашем примере все надписи лежат на цветной фоновой надписи. Видимо, поэтому и не получается определить какой объект сейчас редактируется

SergKis: Andrey пишет:Как его сделать, чтобы понятно было в контекстном меню - какой объект сейчас редактируется ? В нужных объектах на GotFocus запоминай имя \ индекс контрола в STATIC переменной - будешь всегда знать где был.

Softlog86: Обновился до последней версии MiniGui .... Теперь проект собрать не могу ..... C:\MiniGUI\SAMPLES\BASIC\100>hbmk2.bat 100.hbp Harbour 3.2.0dev (r1409051124) Borland Resource Compiler Version 5.40 Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland Ругается : Error: Unresolved external '_HMG_LoadImage' referenced from C:\MINIGUI\HARBOUR\LIB\MINIPRINT.LIB|c_miniprint hbmk2[100]: Error: Running linker. 2

gfilatov2002: Softlog86 пишет: Обновился до последней версии MiniGui 1. Проверьте дату создания файла библиотеки minigui.lib в папке \minigui\Lib - д.б. 9 сентября 2014 г. 0:18:00 2. пересоберите библиотеку с помощью батника MakeLib.bat из папки \minigui\Source в случае несоответствия версии

Softlog86: minigui.lib 09.09.14 00:18 . всё как и нужно вроде-бы ... пересобираю на всякий случай УРА !

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершается подготовка к опубликованию новой версии 2.4.0, которая выйдет на следующей неделе. Кратко, что нового: - исправление обнаруженных ошибок и неточностей кода; - добавлено новое свойство Closable для окон, которое позволяет сделать неактивным кнопку закрытия окна при использовании команды SET INTERACTIVECLOSE OFF; - изменен алгоритм центрирования окон (теперь учитывается высота панели задач при выводе окна в центре зкрана); - небольшие оптимизации с целью ускорения перерисовки элемента управления Browse; - добавлена поддержка команд WAIT WINDOW и WAIT CLEAR для совместимости с официальной сборкой; - обновлена unicode-сборка Харбора версии 3.2.0dev, а также библиотеки MiniPrint, BosTaurus, MySql и HbSqlDD; - добавлены новые и обновлены/исправлены некоторые старые примеры. Желаю всем мира, добра и процветания! P.S. Ваши комментарии приветствуются, но не обязательны...

Softlog86: gfilatov2002 пишет: позволяет сделать неактивным кнопку закрытия окна ТО чего я жду долгое время

SergKis: gfilatov2002 возможно ли добавить в Browse CELLED | CELLNAVIGATION и NOHEADERS (как в Grid) ?

gfilatov2002: SergKis пишет: возможно ли добавить в Browse CELLED | CELLNAVIGATION и NOHEADERS (как в Grid) Благодарю за запрос, но не вижу в этом смысла, поскольку для этого у нас есть многофункциональный TBROWSE

gfilatov2002: Softlog86 пишет: ТО чего я жду долгое время Мечты сбываются По ходу, вероятно, я буду увеличивать временной интервал между сборками. Ежемесячный новый релиз более характерен для коммерческого продукта с хорошей финансовой основой (нам и не снилось ). Для бесплатных этот срок обычно составляет от двух месяцев (н-р, sqlite) до 6-ти месяцев и более (н-р, freeimage). Кстати, последняя стабильная версия бесплатного Харбора вышла в июле 2011, более 3-х лет тому назад

SergKis: gfilatov2002 пишет:я буду увеличивать временной интервал между сборками Это разумно, а то не успеваешь за полетом новой мысли сборки

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на официальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.4.0-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg240-mingw.exe и компактный архив для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg240_xhb10015.zip В данную сборку добавил также поддержку выполнения завершающих процедур по команде EXIT PROCEDURE <name> (см. пример в папке samples\Basic\MULTI_PRG) и определение будущей Windows 10 в функции WinVersion() Благодарю за внимание

sashaBG: Что заметил: 1. WAIT WINDOW под Windows 8.1 не отображает текст , после того как подергаеш угол окна текст появляется 2. Скомпилировал пример MULTI_PRG MINGW сборкой , кажется EXIT PROCEDURE не срабатывает . Все остальное ОК

gfilatov2002: sashaBG Благодарю за отзыв! 1) Работу WAIT WINDOW под Windows 8.1 не проверял из-за отсутствия у меня этой системы. Похоже, что надо изменить класс AUTOSIZE для текста на обычные ширину и высоту Попробуйте изменить определение метки на [pre2] @ iif( IsVistaOrLater(), 3, 6 ), 10 LABEL Message ; WIDTH GetProperty( cFormName, "Width" ) - 20 HEIGHT 24 VALUE cMessage SIZE 10 CENTERALIGN [/pre2] 2) Вы правы. Я уже сообщал об этом при анонсе сборки на английском форуме: Support of execute the EXIT procedures is available now for Borland C compiler only. An EXIT procedure ClipExit() should be moved from the Minigui core to your application at using of MinGW compiler for proper executing of the local EXIT procedures. Если требуется рабочий пример MULTI_PRG под MINGW, то он у меня есть (могу выложить).

sashaBG: Спасибо Григорий , буду очень благодарен ! Так как я пользуюсь MINGW сборкой.

gfilatov2002: sashaBG пишет: я пользуюсь MINGW сборкой Ниже Вы обнаружите patch библиотеки и рабочий пример. Обратите внимание, что теперь потребуется обязательно включать в каждое приложение процедуру ClipExit(), как это сделано в примере. http://file.qip.ru/arch/AZLOp3Qh/minigui-mingw.html

Andrey: Проблема в новой сборке c BCC 5.5 !!! При использовании ключа -mt, приложение остается в памяти после закрытия программы. На предыдущей версии такого не было. Откатился еще раз и перепроверил. Использую: INIT PROCEDURE MyInitWin(), хотя потом это убрал, все равно приложение остается в памяти, после его закрытия.

sashaBG: Потверждаю . У меня и под BCC55 и под MINGW програма остается в памяти . Если в ON RELEASE добавить ExitProcess() , тогда убирается , но у меня иконка из трея не убирается , если мышкой туда подвигать тогда исчезает

gfilatov2002: sashaBG пишет: Потверждаю . У меня и под BCC55 и под MINGW програма остается в памяти Благодарю за оперативную проверку последних изменений в библиотеке Исправленную сборку выложил по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.4.0a-setup.zip Ниже привожу ее список изменений [pre2] * Fixed: Problem in MT environment after a recent change in Minigui core. Reported by Verchenko Andrey <verchenkoag@gmail.com>. Contributed by Grigory Filatov <gfilatov@inbox.ru> (see demo in folder \samples\Advanced\NETIO_2\Server) * Fixed: Wrong window's height in the function WaitWindow() at Windows 8.1. Contributed by Pierpaolo Martinello <pier.martinello[at]alice.it> (see demo in folder \samples\Basic\DirSelect) * Enhanced: Added support of the AutoIncrement fields in a Browse control. Contributed by Grigory Filatov <gfilatov@inbox.ru> * Updated: Added an additional checking of result type at 'When' and 'Valid' events in a Browse control. Requested by Pedro Chanis <drinol@yahoo.com>. Contributed by Grigory Filatov <gfilatov@inbox.ru> * Updated: ErrorSys.prg for compatibility with Viktor's Harbour fork 3.4.0. Contributed by Grigory Filatov <gfilatov@inbox.ru> * Updated: Harbour Compiler 3.2.0dev (SVN 2014-10-05 11:45): * Updated: HbSqlDD library source code (see in folder \Source\HbSqlDD): - added a new code to set a column type giving the highest priority SQLITE3 declared column types; - declare default size for numeric, blob and any fields larger enough to store data after COPY TO from SQLITE3 database. Contributed by Przemyslaw Czerpak (see demo in folder \samples\Advanced\Sqlit3DD) Contributed by Grigory Filatov <gfilatov@inbox.ru> (look at ReadMe.txt in folder \harbour) * Updated: 'Login to application' sample: minor change. Contributed by Pierpaolo Martinello <pier.martinello[at]alice.it> (see in folder \samples\Basic\Login) [/pre2]

gfilatov2002: Выложил обновление HMG-IDE на официальном сайте библиотеки по адресу: http://www.hmgextended.com/files/HMGS-IDE/ide.zip Также работает update программы через меню Help->Update Благодарю за внимание

Andrey: gfilatov2002 пишет: Исправленную сборку выложил по адресу: Пере собрал несколько программ. "Полет" нормальный ! Спасибо БОЛЬШОЕ, Григорий !!! Только каждый раз приходиться в новую версию программы в папку LIB записывать PROCINFO.LIB из папки SAMPLES. Три раза эта библиотека повторяется в папках SAMPLES....

gfilatov2002: Andrey пишет: Три раза эта библиотека повторяется в папках SAMPLES Понял: перенесу эту библиотеку в папку minigui\lib в следующей сборке

Avf: При копировании программ, в которых осуществляется обмен данными в Интернете (например, IDE ) в некоторых антивирусных программах (например, VBA) стало выскакивать сообщение об обнаружении вируса BScope.Trojan.Agent вне зависимости от компьютера. Если закомментировать строки обмена данными через Инет, то сообщения не будет. С чем бы это могло быть связано ?

Dima: Avf http://clipper.borda.ru/?1-3-40-00000236-000-0-0-1377862671

Avf: http://clipper.borda.ru/?1-3-40-00000236-000-0-0-1377862671 Спасибо, Dima. Проблема понятна. Но почему-то она касается только программ на Harbour/xHarbour ( даже hbmk2.exe )

Marquis31: Косячок-с поймал. Хотел пересобрать с версией 2.4.0 пару приложений, получил сообщение об ошибке: "Error: Unresolved external '_HB_FUN_HB_VAL' referenced from C:\MINIGUI\LIB\MINIGUI.LIB|h_getbox" с 2.3.7 все собралось нормально.

gfilatov2002: Marquis31 пишет: Хотел пересобрать с версией 2.4.0 пару приложений, получил сообщение об ошибке: Не забываем также обновить компилятор Харбор, а не только библиотеку

Marquis031: Так и Харбор взял последний nightly build...

Andrey: Marquis031 пишет: Так и Харбор взял последний nightly build... Попробуй Харбор из поставки МиниГуи и не заморачивайся....

Marquis031: Ай, совсем плохой я стал, слющай. У меня-то BorlandC, надо ж было не nightly build тащить, а сделать "git pull", и пересобрать из исходников. Вот теперь все фунциклирует...

Marquis031: Зарубежный коллега интересуется: "можно ли сделать так, чтобы DATEPICKER сразу открывал окошко с календариком?".

gfilatov2002: Marquis031 пишет: Зарубежный коллега интересуется ... и ему посоветовали использовать элемент управления MONTHCALENDAR

Marquis031: Во я дважды за пару дней протупил... отупеешь тут, в кишках 1С-овских "внешних компонент" ковыряючись...

Marquis031: Кстати, Григорий, Sudip Bhattacharyya вам привет и поклон передает...

santy: Marquis031 пишет: Кстати, Григорий, Sudip Bhattacharyya вам привет и поклон передает. Интересно, а вы с Sudip Bhattacharyya в Индии работаете?

Marquis031: нет, в Сети пересеклись

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершается подготовка к опубликованию новой версии 2.4.1, которая выйдет завтра. Кратко, что нового: - исправление обнаруженных ошибок и неточностей кода; - изменен шрифт по умолчанию в зависимости от используемой OS; - добавлено новое свойство AUTOSIZE для элемента управления CheckBox; - добавлен 6-й параметр в функции GetFile() и PutFile() - номер индекса в фильтре; - обновлен HMGS-IDE до версии 1.2.4: - обновлена библиотека SQLITE3 до финальной версии 3.8.7.1: - обновлена unicode-сборка Харбора версии 3.2.0dev, а также библиотека HbSqlDD; - добавлены новые и обновлены/исправлены некоторые старые примеры. Благодарю за внимание

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на официальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.4.1-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg241-mingw.exe и компактный архив для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg241_xhb10026.zip Благодарю за внимание Дополнение. Как я уже писал ранее, данному проекту требуется финансовая поддержка

Andrey: gfilatov2002 пишет: данному проекту требуется финансовая поддержка Да без вопросов ! Лишь бы ответы были, а то поймаешь затык (хотя сам виноват) и не знаешь как дальше делать.

Andrey: Народ ! Давайте поддержим Григория в его нелегком труде !!! Те кто пишут или обслуживают свои программы на МиниГуи - выделите средства для поддержания проекта. Все знают как на Украине сейчас плохо, давайте поможем Григорию.

fokinal21: Не принадлежу к обществу постоянно использующему МиниГуи, но иногда бывает - что-то чуть-чуть надо и Проект приходит на помощь!Поэтому поддерживаю! Давайте! Вопрос в какой организационной форме. Если в свободном режиме - т.е. вот вам счет - и кто сколько может, то думаю, что не покатит. Такие варианты, если и срабатывают, то в разовом режиме. Может создать что-то типа клуба с небольшими, но регулярными членскими взносами? Или придумайте что-то еще!

Andrey: Заметил такую неприятность - при установке hmg-х.х.х-setup.exe не видятся диски подключенные через SUBST ! Может это как то "вылечить" можно ?

Andrey: ИЗ АРХИВА ! gfilatov пишет: Для начала используй следующую функцию для определения факта использования крупного шрифта: #define LOGPIXELSX 88 //----------------------------------------------------------------------------// FUNCTION LargeFonts() local hDC, nPixelX hDC := CreateDC(«DISPLAY», »», »») -- (427) nPixelX := GetDeviceCaps(hDC, LOGPIXELSX) DeleteDC(hDc) return (nPixelX == 120) А затем в зависимости от этого факта устанавливай размер шрифта окон либо высоту и ширину каждого элемента окна. Что-то под новой версией МиниГуи не компилирует, выдает ошибку: Form_color.prg(427) Error E0030 Syntax error "syntax error at '<'" Замена на ("DISPLAY", NULL, NULL, NULL) - подсмотрел в других исходниках, дает другие ошибки: Error: Unresolved external '_HB_FUN_CREATEDC' referenced from FORM_COLOR.OBJ Error: Unresolved external '_HB_FUN_GETDEVICECAPS' referenced from FORM_COLOR.OBJ Error: Unresolved external '_HB_FUN_DELETEDC' referenced from FORM_COLOR.OBJ Где их брать то ? Или какую lib подсоединить ? Или встроить такую функцию определения в стандартную библу в МиниГуи ? Это было бы лучше !

gfilatov2002: Andrey пишет: Где их брать то ? Попробуй пример ниже [pre]/* * MINIGUI - Harbour Win32 GUI library Demo */ #include "minigui.ch" Function Main Define Window Test ; At 0,0 ; Width 400 ; Height 180 ; Title "Test" ; Main ; Nomaximize ; Define Button Button_1 Row 10 Col 40 Caption 'Test' Height iif( LargeFonts(), 32, 28 ) Action MsgInfo ( LargeFonts(), "Is Used The Large Fonts?" ) End Button On Key ESCAPE Action ThisWindow.Release End Window Test.Center Activate Window Test Return Nil FUNCTION LargeFonts() LOCAL hDC, nPixelX hDC := CreateDC( "DISPLAY", "", "" ) nPixelX := GetDevCaps( hDC ) DeleteDC( hDc ) RETURN (nPixelX == 120) #pragma BEGINDUMP #include <windows.h> #include "hbapi.h" HB_FUNC( CREATEDC ) { hb_retnl( ( LONG ) CreateDC( hb_parc( 1 ), hb_parc( 2 ), hb_parc( 3 ), 0 ) ); } HB_FUNC( DELETEDC ) { hb_retl( DeleteDC( ( HDC ) hb_parnl( 1 ) ) ); } HB_FUNC ( GETDEVCAPS ) { INT ix; HDC hdc; hdc = ( HDC ) hb_parnl( 1 ); ix = GetDeviceCaps( hdc, LOGPIXELSX ); hb_retni( (UINT) ix ); } #pragma ENDDUMP [/pre]

Andrey: gfilatov2002 пишет: Попробуй пример ниже Спасибо БОЛЬШОЕ, то что нужно !

krutoff: Я думаю, что-то типа закрытого клуба надо придумать - кто хочет получать полную поддержку. (свежие версии и т.д.)

gfilatov2002: krutoff пишет: что-то типа закрытого клуба надо придумать А от кого закрываться-то Заинтересованных русскоязычных пользователей библиотеки и десятка не наберется Или я не прав ...

Andrey: Ну тогда сделать членский взнос и получение поддержки через почтовый ящик Григория. А здесь на форуме по мелочи поддержка.... Как такой вариант ? Но вопросов будет целая куча !!!

Vlad04: Но вопросов будет целая куча Я думаю, надо не вопросы разбирать к тому что есть , а задачи сформулировать: какой продукт хотели бы увидеть или что в нем увидеть хотели бы?

Haz: Andrey пишет: Заинтересованных русскоязычных пользователей библиотеки и десятка не наберется Или я не прав ... Не прав, в этой ветке много народу тусуется, но в основном "читатели" или гости или сами разбираются в своих GUIвых проблемах. В целом и сам проект harbour не особо раскручен в зоне RU ( русскоязычных форумов 2-3 ) , отсюда и GUI к нему не всем известны. Мое мнение, что "закрытый клуб" еще более усугубит ситуацию, да и при всем уважении - не хватит Григория на поддержку всего ( пусть и небольшого ) клуба.

marrinass: Haz пишет: ... русскоязычных форумов 2-3 ... Ссылки в студию! Пожалуйста!

gfilatov2002: Vlad04 пишет: какой продукт хотели бы увидеть или что в нем увидеть хотели бы? Именно так, в самый корень проблемы Например, на англоязычном форуме меня убеждают перейти на компилятор MinGW последней версии и не поддерживать старый BCC 5.5.1, которому уже стукнуло 14 лет Haz пишет: не хватит Григория на поддержку всего ( пусть и небольшого ) клуба Абсолютно согласен

Haz: marrinass пишет: Ссылки в студию! Пожалуйста! Пожалуйста 1. Тот что мы сейчас читаем 2. БЭСТ: парочка http://ftp.bestnet.ru/support/forum/index.php?PAGE_NAME=list&FID=11&sphrase_id=158753 http://www.online.spb4plus.ru/index.html?topic7239.htm У Григория когда-то был форум на LivePages ( но сейчас вроде бы уже нет ). Все , больше не знаю русскоязычных

Andrey: gfilatov2002 пишет: меня убеждают перейти на компилятор MinGW последней версии и не поддерживать старый BCC 5.5.1, которому уже стукнуло 14 лет Ни в коем случае ! Для небольших проектов BCC 5.5.1 сгодиться, да и совместимость с другими продуктами нужна. Под MinGW никто библиотек не делает, я мучался для HASP SLDK. Только для Borland и Microsoft ! Еще лучше бы иметь сборку МиниГуи и для компилятора Microsoft, там тоже бесплатные есть. IDE бы приличный для МиниГуи сделать, формы рисовать не на чем, ручками приходиться делать. То что есть, сложно работать, свои функции на форме делаешь, он их режет.

Andrey: Вот еще ссылки: http://www.uncle-ed.narod.ru/ssylki.htm

marrinass: Andrey пишет: Вот еще ссылки: http://www.uncle-ed.narod.ru/ssylki.htm Что за мусор? Речь идёт о русскоязычных форумах. Haz пишет: Пожалуйста 1. Тот что мы сейчас читаем 2. БЭСТ: парочка http://ftp.bestnet.ru/support/forum/index.php?PAGE_NAME=list&FID=11&sphrase_id=158753 http://www.online.spb4plus.ru/index.html?topic7239.htm

Andrey: Понял. Тогда это: http://www.kresin.ru/index.html http://gustow.narod.ru/harbour/MiniGUI_help/welcome.htm http://gustow.narod.ru/tsb_help/topic0.htm http://dimao.blogspot.ru/p/blog-page.html

marrinass: Andrey пишет: Понял. Нет, не понял! Повторюсь - речь шла о форумах, да ещё - русскоязычных!

gfilatov2002: АНОНС * АНОНС * АНОНС * АНОНС * АНОНС Завершается подготовка к опубликованию новой версии 2.4.2, которая выйдет завтра. Кратко, что нового: - добавлена команда SET WINDOW MAIN OFF | ON - расширена команда назначения горячих клавиш с целью возврата успеха или неуспеха этого назначения; - обновлена библиотека SQLITE3 до версии 3.8.8dev: - обновлена unicode-сборка Харбора версии 3.2.0dev; - добавлены новые и обновлены некоторые старые примеры. - приведено решение, как заставить работать клавишу F12 в своей программе (по умолчанию она зарезервирована в Винде для вызова их отладчика). Благодарю за внимание

gfilatov2002: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на официальном сайте библиотеки по адресу: http://hmgextended.com/files/CONTRIB/hmg-2.4.2-setup.zip Также доступна полная сборка для компилятора MinGW по адресу: http://hmgextended.com/files/CONTRIB/hmg242-mingw.exe и компактный архив для свежей версии компилятора xHarbour http://hmgextended.com/files/CONTRIB/xhmg242_xhb10065.zip Благодарю за внимание gfilatov2002 пишет: Как я уже писал ранее, данному проекту требуется финансовая поддержка Увы, но без такой поддержки этот релиз может стать последним...

Andrey: gfilatov2002 пишет: Увы, но без такой поддержки этот релиз может стать последним... Выслал членский взнос на развитие библиотеки. Спасибо БОЛЬШОЕ за ваш труд !!! Народ присоединяйтесь, я знаю что всем не легко. У нас тоже санкции давят на жизнь. Всегда санкции были против народа, а не каких там чиновников и руководства. Украину вообще загнали не известно куда, власть дерется между собой и житья народу не дает. Поддержим лично Григория в нелегком труде программиста....

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