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

Автор

Сообщение

gfilatov
модератор
Пост N: 699 Зарегистрирован: 25.05.05

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

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

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

Готовится к опубликованию новая сборка №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 [только новые]

Andrey_IV

Пост N: 31 Зарегистрирован: 20.04.07

Отправлено: 23.10.19 02:28. Заголовок: BCC 5.82 Кодировка Win-1251 в файле ресурсов

Всем доброго времени суток!

В BCC 5.5 (да и в BCC 5.6), если в файле ресурсов .RC писал русскими буквами в кодировке Win-1251 - то на экране все отображалось корректно
Когда попробовал в компилировать программу в BCC 5.82 - получил крякозябры. Попробовал забить вместо латинских, русскими в примере:
C:\MiniGUI\SAMPLES\BASIC\TEST_APPLICATION\demo.rc - та-же история. Крякозябры вместо русских букв.
Это только в файле ресурсов. Если просто в .PRG пишу русскими - все нормально.
Это вообще можно победить ?
Не может-же быть такого, что компилятор не дружит с кодировкой Win-1251 ТОЛЬКО в ресурсах.
Или может ???

Dima
администратор
Пост N: 7129 Зарегистрирован: 17.05.05

Отправлено: 23.10.19 12:17. Заголовок: Andrey_IV пишет: Эт..

Andrey_IV пишет:

цитата:

Это вообще можно победить ?

Можно
Andrey_IV пишет:

цитата:

C:\MiniGUI\SAMPLES\BASIC\TEST_APPLICATION\demo.rc - та-же история

Нет там ни какой истории , demo.rc в кодировке 866 , переведи в 1251 и будет как надо

gfilatov2002
moderator
Пост N: 1614 Зарегистрирован: 11.02.10

Отправлено: 23.10.19 12:54. Заголовок: Andrey_IV пишет: По..

Andrey_IV пишет:

цитата:

Попробовал забить вместо латинских, русскими в примере:
C:\MiniGUI\SAMPLES\BASIC\TEST_APPLICATION\demo.rc

Сделал такую проверку также

цитата:

#include "resource.h"

// Application icon.
IDI_APPICON ICON "Application.ico"

// Our main menu.
IDR_MAINMENU MENU
{
POPUP "&Файл"
{
MENUITEM "В&ыход", ID_FILE_EXIT
}
POPUP "&Помощь"
{
MENUITEM "&О программе", ID_HELP_ABOUT
}
}

и этот пример нормально показывает меню по-русски

Andrey
постоянный участник
Пост N: 6491 Зарегистрирован: 12.09.06

Отправлено: 23.10.19 13:40. Заголовок: SergKis пишет: Рабо..

SergKis пишет:

цитата:

Рабочая версия на vc есть. Версия с bcc 55 использовалась как пример исследования новшеств.

Давайте тогда перейдём полностью на MSVC ?

Andrey_IV

Пост N: 32 Зарегистрирован: 20.04.07

Отправлено: 24.10.19 10:00. Заголовок: BCC 5.82 Кодировка Win-1251 в файле ресурсов - УТОЧНЕНИЕ

Не точно выразился

1) Кодировка RC-файла конечно-же Win-1251
2) Речь идёт не об этом блоке RC-файла, который привёл в приме Григорий
[quote]`
{
POPUP "&Файл"
{
MENUITEM "&Выход", ID_FILE_EXIT
}
POPUP "&Помощь"
{
MENUITEM "&О программе", ID_HELP_ABOUT
}
}
[quote]`
а вот об этом (то, что в проводнике "Свойства файла", закладка "Подробно" -
в общем информация "О программе" (проверял в Windows 7).
Возьмем файл: C:\MiniGUI\SAMPLES\Applications\SysInfo\SysInfo.rc
Меняю кодировку на Win-1251, пишу на русском (извините - просто пример)
[quote]`
1 VERSIONINFO
FILEVERSION 1,1,0,0
PRODUCTVERSION 1,0,0,0
FILEOS 0x4
FILETYPE 0x1
{
BLOCK "StringFileInfo"
{
BLOCK "040904b0"
{
VALUE "FileDescription", "Системная информация\000"
VALUE "FileVersion", "1.1.0.0"
VALUE "InternalName", "SysInfo\000"
VALUE "LegalCopyright", "Freeware 2003-2012\000"
VALUE "LegalTrademarks", "Harbour"
VALUE "OriginalFilename", "SysInfo.exe"
VALUE "CompanyName", ""
VALUE "ProductName", "Утилита MiniGUI"
VALUE "ProductVersion", "1.0.0.0"
VALUE "Comments", "Создано Григорием Филатовым <gfilatov@inbox.ru>\000"
}
}

BLOCK "VarFileInfo"
{
VALUE "Translation", 0x0409 0x04B0
}
}

[quote]`
Компилирую, в проводнике в свойствах файла
в описании файла и в названии продукта вижу крякозябры

Пробовал менять Английский на Русский
// BLOCK "040904b0"
BLOCK "041904e3"
и
// VALUE "Translation", 0x0409 0x04B0
VALUE "Translation", 0x0419 0x04E3

Ничего не даёт

Dima
администратор
Пост N: 7132 Зарегистрирован: 17.05.05

Отправлено: 24.10.19 20:32. Заголовок: Там вроде нужно прик..

Там вроде нужно прикручивать windows manifest и кодировка в rc должна быть utf-8

gfilatov2002
moderator
Пост N: 1615 Зарегистрирован: 11.02.10

Отправлено: 25.10.19 09:34. Заголовок: Всем кому это интересно

Обновил сборку 19.10 (Update 1) с учетом последних наработок

Базовый дистрибутив находится по адресу

http://hmgextended.com/files/CONTRIB/hmg-19.10-setup.exe

Что нового:
Скрытый текст

цитата:

* Fixed: Problem with a handling of 'Transparent' property of a label
which was placed on top of an image (introduced in the build 19.10).
Bug was reported by Valtecom Jose Martins.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
* Modified: ButtonEx: using of the Harbour function hb_tokenCount()
instead of a local implementation.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(see demo3.prg in folder \samples\Basic\ButtonEx)
* Enhanced: Added the Metro color's constants to the header file
include\i_color.ch.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
* Updated: HBPrinter library v.2.48:
- modified toolbar buttons placing in the Preview form and a look
of Options dialog;
- updated Greek language translation.
Based upon a contribution of Pete D. <pete_westg/at/yahoo.gr>.
Revised by Grigory Filatov <gfilatov@inbox.ru>
(see demo in folder \samples\Advanced\HBPrinter)
* Updated: Harbour Compiler 3.2.0dev (SVN 2019-09-11 10:16):
* Updated: OpenSSL wrapper for using of the version 1.0.2t.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(look at ReadMe.txt in folder \harbour)
* New: 'Circle Progress Animation' sample.
Contributed by Grigory Filatov <gfilatov@inbox.ru>
(see in folder \samples\Basic\CircleProgressAnimation)

gfilatov2002
moderator
Пост N: 1616 Зарегистрирован: 11.02.10

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

Обновил сборку 19.10 (Update 2) с учетом последних наработок

Базовый дистрибутив для BCC 5.8.2 находится по адресу

http://hmgextended.com/files/CONTRIB/hmg-19.10-setup.exe

Что нового:
Скрытый текст

  * Updated: HbSQLite3 library: 
            - update for using SQLITE3 version 3.31.0dev (from 3.30.1). 
            Contributed by Grigory Filatov <gfilatov@inbox.ru> 
   * Updated: Harbour Compiler 3.2.0dev (SVN 2019-09-11 10:16): 
            * the hbrdd and hbrtl core libraries were compiled with the default 
              switch -l for a smallest size. 
            Note: the minimal supported platform is Windows XP now. 
            The recommended platforms are Windows 7 and later. 
            Contributed by Grigory Filatov <gfilatov@inbox.ru> 
            (look at ReadMe.txt in folder \harbour) 
   * Updated: HMGS-IDE v.1.4.3.7 Project Manager and Two-Way Visual Form Designer: 
            * Changed: the default C-compiler is BCC 5.8 now instead of BCC 5.5. 
            * Updated: in mpmc.prg use Harbour contrib hbziparc library instead 
              of obsolete ziparchive library. 
            Contributed by Grigory Filatov <gfilatov@inbox.ru> 
            (see demo in folder \Ide\Samples\Zip) 
   * Updated: MPM and MPMC utilities will use Harbour contrib hbziparc library. 
            Contributed by Grigory Filatov <gfilatov@inbox.ru> 
            (see in folders \Utils\MPM and \Utils\MPMC)

rvu

Пост N: 186 Зарегистрирован: 05.11.05

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

gfilatov2002 пишет:

цитата:

Может я чего то не понял, но точно такая же ограниченная гарантия есть у BCC 5.5

А как связаны ограниченная гарантия и авторские права? Меня тоже авторские права интересуют. Хочется чистоты.

И какую версия они сами сейчас раздают?

https://www.embarcadero.com/free-tools/ccompiler/free-download

gfilatov2002
moderator
Пост N: 1622 Зарегистрирован: 11.02.10

Отправлено: 15.11.19 12:59. Заголовок: rvu пишет: какую ве..

rvu пишет:

цитата:

какую версия они сами сейчас раздают?

Они раздают бесплатно 32-битный компилятор BCC 10.1, который основан на LLVM/Clang C 3.3.1 и датирован 2016 годом.

Проблема в том, что собрать Харбор для этого компилятора стандартным образом не получится.
После многих попыток мне, правда, удалось это сделать.
Результат см. ниже

цитата:

Harbour 3.2.0dev (r1902111251)
Copyright (c) 1999-2019, https://harbour.github.io/

Harbour Build Info
---------------------------
Version: Harbour 3.2.0dev (r1902111251)
Compiler: LLVM/Clang C 3.3.1 (35832.6139226.5cda94d) (32-bit)
Platform: Windows 7 6.1 SP1
PCode version: 0.3
ChangeLog last entry: 2019-02-11 13:51 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
ChangeLog ID: 1d06956f746c166a6c53f00036a261952796fca6
Built on: Feb 12 2019 21:44:56
Extra C compiler options: -DHB_GC_AUTO -DHB_GUI
Build options: (Clipper 5.3b) (Clipper 5.x undoc)
---------------------------

Andrey
постоянный участник
Пост N: 6525 Зарегистрирован: 12.09.06

Отправлено: 27.11.19 01:16. Заголовок: Всем привет. Пример ..

Всем привет.
Пример MiniGUI\SAMPLES\BASIC\Button_Hotkey
Туда бы добавить для наглядности небольшое добавление:

      @ 100, nX BUTTONEX button_1 ; 
          CAPTION " 1 " ; 
          ACTION _wPost( 10, This.button_1.Index ) ; 
          WIDTH nW ; 
          HEIGHT 28 ; 
          TOOLTIP "HotKey 1 or F1" ; 
          HOTKEY { 1, F1 }

Если массив нельзя, то тогда бы сделать перечисление клавиш:

      ON KEY F1     ACTION _wPost( 10 , .... здесь не знаю как .... ) 
       ON KEY F2     ACTION _wPost( 10 , .... здесь не знаю как .... ) 
       ......

Юзера просят горячие клавиши сразу по F1/F2 ... ну или просто по 1/2 ....
Я понимаю что горячая клавиша ОДНА, но блин нашему юзеру всё мало....
Просто в старых программах сделал так, теперь просят такого же в МиниГуи.

SergKis
постоянный участник
Пост N: 2963 Зарегистрирован: 17.02.12

Отправлено: 27.11.19 02:01. Заголовок: Andrey пишет O..

Andrey пишет

цитата:

ON KEY F1 ACTION _wPost( 10 , .... здесь не знаю как .... )
ON KEY F2 ACTION _wPost( 10 , .... здесь не знаю как .... )
......

так же

 
       ON KEY F1     ACTION _wPost( 10 , This.button_1.Index )  
       ON KEY F2     ACTION _wPost( 10 , This.button_1.Index )  
        ......

создается в событии 10 среда This для button1, как и для ACTION кнопки, по указанному индексу

SergKis
постоянный участник
Пост N: 2964 Зарегистрирован: 17.02.12

Отправлено: 27.11.19 02:13. Заголовок: PS т.е. если делать ..

PS
т.е. если делать _wPost(10), то в событии 10 This.Name - имя окна, ThisWindow.Name - тоже,
если делать _wPost( 10 , This.button_1.Index ), то в событии 10 This.Name - имя кнопки,
ThisWindow.Name - имя окна

Andrey
постоянный участник
Пост N: 6526 Зарегистрирован: 12.09.06

Отправлено: 27.11.19 09:26. Заголовок: SergKis пишет: ON K..

SergKis пишет:

цитата:

ON KEY F1 ACTION _wPost( 10 , This.button_1.Index )
ON KEY F2 ACTION _wPost( 10 , This.button_1.Index )
......

Чуток ошибся:

 
     ON KEY F1     ACTION _wPost( 10 , This.button_1.Index )   
     ON KEY F2     ACTION _wPost( 10 , This.button_2.Index )   
     ON KEY F3     ACTION _wPost( 10 , This.button_3.Index )

А если будут две формы и будут такие же кнопки, то горячие клавиши будут различаться ?

This.button_1.Index - это для каждого окна своя кнопка ?

SergKis
постоянный участник
Пост N: 2965 Зарегистрирован: 17.02.12

Отправлено: 27.11.19 12:16. Заголовок: Andrey пишет Чуток о..

Andrey пишет

цитата:

Чуток ошибся:

Именно так и хотел написать, о назначении ОДНОГО события для button_1 разным клавишам, т.е.
одной кнопке назначаем нажатия "1", "F1", "CTRL+F1", "SHIFT+F1", "CTRL+1", ...
и при всех нажатиях будет исполнен блок кода события 10 со средой This, для кнопки "button_1"
То что ты добавил\исправил на F2 - это может быть доп. множество клавиш для др. кнопки "button_2"

цитата:

А если будут две формы и будут такие же кнопки, то горячие клавиши будут различаться ?
This.button_1.Index - это для каждого окна своя кнопка ?

На каждой форме-окне контролы могут называться одинаково, они, как и события "привязаны" к своему окну.
Т.е. если создаешь окно по переменной cForm := <имя> и DEFINE WINDOW &cForm ...
то сменив имя окна-формы => получишь новое окно, на котором имена контролов будут одинаковы с первым и
события совпадут. Если в них исп. public (не static) функции они будут вызываться одни и те же при наступлении
события, но внутри будут иметь разную среду This для окна, This.Name контрола совпадать, ThisWindow.Name разное

gfilatov2002
moderator
Пост N: 1626 Зарегистрирован: 11.02.10

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

Подготовил 1-й релиз-кандидат для новой сборки 19.12 со следующим списком изменений (кратко):
Скрытый текст

 
 * Fixed: The 'OnChange' event fired by a mouse click in a Browse control 
   without changing of the row. It exists in the official version too. 
  
 * Fixed: A potential RTE at using of a TRANSPARENT checkbox control into 
   SplitChild window. 
  
 * Revised GdiPlus.dll system library handling: 
   - added the new function 
     HMG_SaveImage( FileName, cOutName [, cEncoder] [, nJpgQuality] ; 
       [, aOutSize] ), 
     where cEncoder parameter may be "BMP", "JPEG", "PNG", "GIF" or 
     "TIFF" value ("BMP" is a default). 
  
 * The Image control supports now ICON images from the resources via 
   using of a dynamic loading of the system library GdiPlus.dll. 
  
 * The CHECKBOX, FRAME and RADIOGROUP controls supports the FontColor 
   and BackColor properties in the THEMED Operating Systems. 
   It was a postponed user's request. 
  
 * The PROGRESSBAR control supports the ForeColor and BackColor 
   properties at a definition in the THEMED Operating Systems. 
  
 * The function InputWindow() supports now an optional 11th logical 
   parameter to use a Switcher control for a managing of the logical 
   variables (default value is false). 
  
 * The internal function ErrorMessage() will return an information 
   about the mistaked arguments of calling function from error object. 
  
 * The minor modification of a data value position in the BAR GRAPH. 
  
 * Updated header file i_hmgcompat.ch for compatibility with Official HMG. 
  
 * Updated HMGS-IDE v.1.4.3.8 and Sqlite3 library. 
  
 * Added the new interesting samples and updated some Basic and 
   Advanced samples.

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

SergKis
постоянный участник
Пост N: 2997 Зарегистрирован: 17.02.12

Отправлено: 11.12.19 15:44. Заголовок: gfilatov2002 Предла..

gfilatov2002
Предлагаю добавить

 
 HB_FUNC ( ENUMWINDOWS ) 
 { 
    PHB_ITEM pArray = hb_itemArrayNew( 0 ); 
  
    EnumWindows( ( WNDENUMPROC ) EnumWindowsProc, ( LPARAM ) pArray ); 
  
    hb_itemReturnRelease( pArray ); 
    pArray = NULL; 
 } 
 тогда можно получать handle внешних программ так (эту ф-ю можно не вкл. lib) 
 *-----------------------------------------------------------------------------* 
 STATIC FUNCTION HandlesHbWin( cText, cClass, lUpper ) 
 *-----------------------------------------------------------------------------* 
    LOCAL i, h, t 
    LOCAL aWnd := EnumWindows() 
    LOCAL aTmp := aWnd 
    LOCAL aRet := {} 
  
    IF ! empty(cClass) 
       AEVal( aWnd, {|hw| iif( GetClassName(hw) == cClass, AAdd( aTmp, hw ), )} ) 
    ENDIF 
  
    IF ! empty(cText) .and. HB_ISCHAR(cText) .and. Len(aTmp) > 0 
       lUpper := ! empty( lUpper ) 
       IF lUpper 
          cText := upper( cText ) 
       ENDIF 
       FOR EACH h IN aTmp 
           t := GetWindowText( h ) 
           IF lUpper ; t := upper( t ) 
           ENDIF 
           IF cText $ t ; AAdd( aRet, h ) 
           ENDIF 
       NEXT 
    ELSE 
       aRet := aTmp 
    ENDIF 
  
 RETURN aRet 
 т.е. 
 aHandle := HandlesHbWin( , 'Form1_Main' )  // окна hmg с именем Form1_Main, по доп. cText выделить нужное 
 aWvt := HandlesHbWin( cText, 'Harbour_WVT_Class' ) // handles wvt окон  
 aDos := HandlesHbWin( 'DOSBox ', 'SDL_app' ) // handles загруженных DosBox программ 
 и .т.д.

gfilatov2002
moderator
Пост N: 1633 Зарегистрирован: 11.02.10

Отправлено: 11.12.19 18:40. Заголовок: SergKis пишет: Пред..

SergKis пишет:

цитата:

Предлагаю добавить

HB_FUNC ( ENUMWINDOWS )

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

Но вроде уже живет эта функция в примерах:
- SAMPLES\Advanced\ProcInfo;
- SAMPLES\Advanced\ExternalApp_2

Кстати, там еще д.б. сишная дополнительная функция EnumWindowsProc, которая заполняет массив pArray

SergKis
постоянный участник
Пост N: 2998 Зарегистрирован: 17.02.12

Отправлено: 11.12.19 19:58. Заголовок: gfilatov2002 пишет Н..

gfilatov2002 пишет

цитата:

Но вроде уже живет эта функция в примерах

Не увидел, пропустил. Хорошо, что есть в примерах, мне не хватило в lib.
Пришлось позаниматься управлением внешних программ из hmg.
Предложил по причине, что она более удобна, во многих случаях, чем та которая есть в hmg FindWindow

gfilatov2002
moderator
Пост N: 1634 Зарегистрирован: 11.02.10

Отправлено: 11.12.19 21:01. Заголовок: SergKis пишет: Пред..

SergKis пишет:

цитата:

Предложил по причине, что она более удобна

Буду рассматривать эту функцию для следующей сборки.
Поскольку подготовка декабрьского релиза уже завершена, и эта сборка будет опубликована завтра.

Ответов - 300 , стр: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 All [только новые]

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

Тему читают:

- участник сейчас на форуме

- участник вне форума

Все даты в формате GMT 3 час. Хитов сегодня: 676
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет

Создай свой форум на сервисе Borda.ru
Форум находится на 59 месте в рейтинге
Текстовая версия