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

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

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

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

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

Dima: Andrey пишет: Выслал членский взнос на развитие библиотеки Координаты укажи. [pre2] https://www.youtube.com/watch?v=VVcSagzqa-g [/pre2]

gfilatov2002: Andrey пишет: Выслал членский взнос на развитие библиотеки Благодарю за поддержку Просто к сведению. Выпустил сегодня первую бету для следующей сборки. Кратко, что нового: - функции WinAPI, создающие визуальные эффекты, перенесены из примеров в ядро библиотеки. Соответственно, добавлены следующие команды: - SET WINDOW cFormName TRANSPARENT TO nAlphaBlend - SET WINDOW cFormName [ TRANSPARENT ] TO OPAQUE - SET WINDOW cFormName TRANSPARENT TO COLOR aColor - FLASH WINDOW cFormName CAPTION COUNT nTimes INTERVAL nMilliseconds - FLASH WINDOW cFormName TASKBAR COUNT nTimes INTERVAL nMilliseconds - FLASH WINDOW cFormName [ ALL ] COUNT nTimes INTERVAL nMilliseconds - ANIMATE WINDOW cFormName MODE nFlags INTERVAL nMilliseconds - ANIMATE WINDOW cFormName MODE nFlags - обновлена сборка Харбора: Пржемек добавил оптимизацию создания массивов, которая существенно уменьшает генерируемый код. - выполнена проверка работы библиотеки с компилятором MinGW свежей версии 4.9.2, который будет использован в следующей сборке вместо текущей версии 4.6.1; - добавлен пример простой телефонной книги с сортировкой по группе или по имени абонента; - обновлены два примера: Framework и утилита Sqlite browser Пока все

Softlog86: каким образом можно отблагодарить (в денежной форме) ?

gfilatov2002: Softlog86 пишет: каким образом можно отблагодарить Мои персональные данные (для перевода) есть у Андрея. Также принимаю пожертвования через систему PayPal на почтовый адрес: buran1985@gmail.com P.S. Курс гривны к доллару на черном рынке уже 20,50 Слов нет...

Andrey: Dima пишет: Координаты укажи. Не знаю как у вас, а у нас в России это (перевод) просто сделать. Идешь в любой салон сотовой связи "Связной", говоришь что нужно перевести деньги на Украину. Говоришь ФИО кому переводишь, отдаешь деньги и получаешь чек. Перевод идет через систему "Золотая Корона". Отправляешь смс-ку с кодом перевода из чека и получатель может получить деньги. Как и где получают, я не знаю, еще ни разу не получал...

marrinass: gfilatov2002 пишет: Мои персональные данные (для перевода) есть у Андрея. А зачем Андрею лишние телодвижения? Тут, что то не чисто - мужики ...

Softlog86: Да не ..... PayPal для меня проще ...... Лет пять уже всё покупаю через Ebay/Paypal .....

gfilatov2002: Просто к сведению. Выпустил RC 3 для следующей сборки. Финальный релиз запланирован через неделю, на день, когда Microsoft представит новую сборку Windows 10, которая станет «новой главой Windows 10».

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

Softlog86: Если можно вкратце - что новенького ? :)

Haz: gfilatov2002 пишет: Новый релиз библиотеки для компилятора BCC выложил, как и обещал, на официальном сайте библиотеки по адресу: Григорий , СПАСИБО ! Softlog86 пишет: Если можно вкратце - что новенького ? :) 2015/01/21: HMG Extended Edition 2.4.3 Published. * Fixed: Windows problem of overlap between ToolBar with 'Bottom' clause and StatusBar. This correction was moved to MiniGUI core from a sample (introduced in the build 2.3.6). * Modified: A default font size was changed to 9pt for WinVista or upper. It is Microsoft default value of Dialog font size for above systems. - New: Added C-function GetSystemFont() for accurately detect of the system default font name and font size. Added also the separate pseudo-functions GetDefaultFontName() and GetDefaultFontSize() for convenient access to these parameters. Note: This setting may be override with using of SET FONT TO command. * Updated: Synchronized Extended HMG for compatibility with Official HMG: - New: Added Visual Effects on Windows - SET WINDOW cFormName TRANSPARENT TO nAlphaBlend where nAlphaBlend is from 0 to 255 (completely transparent = 0, opaque = 255) - SET WINDOW cFormName [ TRANSPARENT ] TO OPAQUE - SET WINDOW cFormName TRANSPARENT TO COLOR aColor (see demos in folder \samples\Advanced\Transparency) - FLASH WINDOW cFormName CAPTION COUNT nTimes INTERVAL nMilliseconds - FLASH WINDOW cFormName TASKBAR COUNT nTimes INTERVAL nMilliseconds - FLASH WINDOW cFormName [ ALL ] COUNT nTimes INTERVAL nMilliseconds (see demo in folder \samples\Advanced\FlashWindow) - ANIMATE WINDOW cFormName MODE nFlags INTERVAL nMilliseconds - ANIMATE WINDOW cFormName MODE nFlags (see demo in folder \samples\Basic\AnimateWindow) * Updated: Header file i_hmgcompat.ch for compatibility with Official HMG: - added pseudo-functions DoEvents() and SetCursorSystem(). * Updated: Harbour function HB_SETCODEPAGE() guarded as HMG_LEGACY_OFF in Minigui core. This obsolete function was removed in Harbour 3.0 and superseded by hb_cdpSelect(). * Updated: Added codepages setting for Dutch, Turkish and Swedish languages at minigui initialization. It's needed for proper file system actions with national symbols. * Updated: Minigui EXTERN list was generated automatically with using hbmk2 utility. * Updated: HbSQLite3 library: - update for using SQLITE3 version 3.8.8 (from 3.8.8dev). * Updated: Harbour Compiler 3.2.0dev (SVN 2015-01-19 13:24). * New: 'Simple Phone Book' sample. Based upon a contribution of Dragan Cizmarevic <dragancesu(at)gmail.com> * Updated: 'Internet Explorer ActiveX' sample: - silent script errors at loading of the internet pages. * Updated: 'Framework for SDI application' sample. * Updated: 'Clipbrd Clear' sample: added an internal Clipboard Viewer. * Updated: 'Resize It' sample. * Updated: 'Uninstall Editor' sample. * Updated: 'Sqlite browser' utility: minor correction.

gfilatov2002: Softlog86 пишет: что новенького ? 1) исправление конфликта местоположения ToolBar с классом Bottom и статусной строки перенесено из примера в ядро библиотеки; 2) модифицировано определение имени и размера шрифта по умолчанию в зависимости от используемой OS на основе новой функции GetSystemFont(); 3) добавлены команды для создания визуальных эффектов для окон и управления их "прозрачностью"; 4) добавлена установка коловой страницы при старте программы для голландского, турецкого и шведского языка в дополнение к уже имеющимся языкам. Это требуется Харбору для правильной работы с файловой системой, использующей национальные символы; 5) обновлена сборка Харбора и библиотека SQLITE3 до актуальных свежих версий; 6) добавлен один новый и обновлены некоторые старые примеры; 7) другие мелкие изменения в коде ядра. Также для MinGW-сборки использована свежая версия С-компилятора 4.9.2, датированная декабрем 2014, которая взята на сайте http://tdm-gcc.tdragon.net

sashaBG: Обычный BROWSE "Сильно Моргает" , наверное исполняются слишком много REFRESH ? даже и при такой команде. FORM_1.BROWSE_1.VALUE := FILE1->( RECNO() ) И в примерах тоже замечается при передвижении в верх и в низ курсора . Если есть способ подавить етот еффект , поделитесь пожалуйста !

gfilatov2002: sashaBG пишет: Если есть способ подавить етот еффект Да, это возможно за счет замедления перерисовки Listview путем добавления стиля LVS_EX_DOUBLEBUFFER. #define LVS_EX_DOUBLEBUFFER 0x10000 ListView_ChangeExtendedStyle ( GetControlHandle('GridName','FormName'), LVS_EX_DOUBLEBUFFER, NIL ) где используется новая С-функция // ListView_ChangeExtendedStyle ( hWnd, [ nAddStyle ], [ nRemoveStyle ] ) HB_FUNC( LISTVIEW_CHANGEEXTENDEDSTYLE ) { HWND hWnd = (HWND) hb_parnl (1); DWORD Add = (DWORD) hb_parnl (2); DWORD Remove = (DWORD) hb_parnl (3); DWORD OldStyle, NewStyle, Style; OldStyle = ListView_GetExtendedListViewStyle (hWnd); NewStyle = (OldStyle | Add) & ( ~Remove ); Style = ListView_SetExtendedListViewStyle ( hWnd, NewStyle ); hb_retnl ((LONG) Style); } Предупреждение. При использовании этого стиля наблюдается общее замедление работы Browse Благодарю за Вашу поддержку

sashaBG: Компилятор не находит последних двух функции ListView_GetExtendedListViewStyle ListView_SetExtendedListViewStyle Я чегото не добавляю в проект наверно !

gfilatov2002: sashaBG пишет: ListView_GetExtendedListViewStyle ListView_SetExtendedListViewStyle Это макросы, которые д.б. определены в файле bcc55\include\commctrl.h следующим образом #define ListView_SetExtendedListViewStyle(w,s) (DWORD)SNDMSG((w),LVM_SETEXTENDEDLISTVIEWSTYLE,0,(s)) #define ListView_GetExtendedListViewStyle(w) (DWORD)SNDMSG((w),LVM_GETEXTENDEDLISTVIEWSTYLE,0,0) sashaBG пишет: Я чегото не добавляю в проект #include <commctrl.h>

sashaBG: Спасибо Григорий ! Так гораздо лучше , но только BORLAND-ом через MINGW не компилируется ccw.prg:1210:1: warning: implicit declaration of function 'ListView_GetExtendedListViewStyle' [-Wimplicit-function-declaration] ccw.prg:1212:1: warning: implicit declaration of function 'ListView_SetExtendedListViewStyle' [-Wimplicit-function-declaration] hbmk2: Linking... ccw.exe .hbmk/win/mingw/ccw.o:ccw.c:(.text+0x40d): undefined reference to `ListView_GetExtendedListViewStyle' .hbmk/win/mingw/ccw.o:ccw.c:(.text+0x41f): undefined reference to `ListView_SetExtendedListViewStyle' Я заметил что такое моргание в более старых версий не наблюдалось например 2.3.4 , 2.3.5

Dima: sashaBG в Mingw тоже есть commctrl.h gfilatov2002 пишет: #define ListView_SetExtendedListViewStyle(w,s) (DWORD)SNDMSG((w),LVM_SETEXTENDEDLISTVIEWSTYLE,0,(s)) #define ListView_GetExtendedListViewStyle(w) (DWORD)SNDMSG((w),LVM_GETEXTENDEDLISTVIEWSTYLE,0,0) там это один в один

gfilatov2002: sashaBG пишет: Так гораздо лучше Ниже рабочий пример, построенный на тестовой базе с 32 полями из поставки минигуи [pre]#include "minigui.ch" #define LVS_EX_DOUBLEBUFFER 0x10000 Function Main SET MULTIPLE OFF WARNING SET PROGRAMMATICCHANGE OFF SET NAVIGATION EXTENDED SET BROWSESYNC ON DEFINE WINDOW Form_1 ; AT 0,0 ; WIDTH 640 HEIGHT 480 ; TITLE 'MiniGUI Browse Demo' ; MAIN NOMAXIMIZE ; ON INIT OpenTables() ; ON RELEASE CloseTables() DEFINE MAIN MENU POPUP 'File' ITEM 'Set Browse Value' ACTION Form_1.Browse_1.Value := 10 ITEM 'Get Browse Value' ACTION MsgInfo ( Form_1.Browse_1.Value ) ITEM 'Refresh Browse' ACTION Form_1.Browse_1.Refresh() SEPARATOR ITEM 'Exit' ACTION Form_1.Release() END POPUP POPUP 'Help' ITEM 'About' ACTION MsgInfo ("MiniGUI Browse Demo") END POPUP END MENU DEFINE STATUSBAR STATUSITEM 'HMG Power Ready' STATUSITEM '<Enter> / Double Click To Edit' WIDTH 200 STATUSITEM 'Alt+A: Append' WIDTH 120 END STATUSBAR DEFINE BROWSE Browse_1 ROW 10 COL 10 WIDTH 610 HEIGHT 390 HEADERS { 'Field 1' , 'Field 2' , 'Field 3', 'Field 4', 'Field 5' , 'Field 6' , 'Field 7', 'Field 8' , 'Field 9' , 'Field 10' , 'Field 11' , 'Field 12' , 'Field 13' , 'Field 14' , 'Field 15' , 'Field 16' , 'Field 17' , 'Field 18' , 'Field 19' , 'Field 20' , 'Field 21' , 'Field 22' , 'Field 23' , 'Field 24' , 'Field 25' , 'Field 26' , 'Field 27' , 'Field 28' , 'Field 29' , 'Field 30' , 'Field 31' , 'Field 32' } WIDTHS { 100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 ,100 } WORKAREA MuchFields FIELDS { 'c1','c2','c3','c4','c5','c6','c7','c8','c9','c10','c11','c12','c13','c14','c15','c16','c17','c18','c19','c20','c21','c22','c23','c24','c25','c26','c27','c28','c29','c30','c31','c32' } VALUE 1 LOCK .T. ALLOWEDIT .T. ALLOWAPPEND .T. INPLACEEDIT .T. END BROWSE END WINDOW ListView_ChangeExtendedStyle ( GetControlHandle('Browse_1','Form_1'), LVS_EX_DOUBLEBUFFER, NIL ) CENTER WINDOW Form_1 ACTIVATE WINDOW Form_1 Return Nil Procedure OpenTables() Use MuchFields Shared Return Procedure CloseTables() Use Return #pragma BEGINDUMP #include <windows.h> #include <commctrl.h> #include "hbapi.h" // ListView_ChangeExtendedStyle ( hWnd, [ nAddStyle ], [ nRemoveStyle ] ) HB_FUNC( LISTVIEW_CHANGEEXTENDEDSTYLE ) { HWND hWnd = (HWND) hb_parnl( 1 ); DWORD Add = (DWORD) hb_parnl( 2 ); DWORD Remove = (DWORD) hb_parnl( 3 ); DWORD OldStyle, NewStyle, Style; OldStyle = ListView_GetExtendedListViewStyle( hWnd ); NewStyle = ( OldStyle | Add) & ( ~Remove ); Style = ListView_SetExtendedListViewStyle( hWnd, NewStyle ); hb_retnl ((LONG) Style); } #pragma ENDDUMP[/pre] Как говорится, почувствуйте разницу. Ваши комментарии приветствуются...

SergKis: gfilatov2002 пишет:Как говорится, почувствуйте разницу Так очень даже хорошо. А так даже Header убирать можно: #define LVS_EX_DOUBLEBUFFER 0x10000 #define LVS_NOCOLUMNHEADER 0x00004000 ... ListView_ChangeExtendedStyle ( GetControlHandle('Browse_1','Form_1'), LVS_EX_DOUBLEBUFFER, NIL ) SetWindowStyle ( GetControlHandle('Browse_1','Form_1'), LVS_NOCOLUMNHEADER, .T. ) ... gfilatov2002

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