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

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

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

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

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

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

 Отправлено: 12.06.13 14:28. Заголовок: Andrey пишет: А как..

Andrey пишет:

цитата:

А как ?

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

 Отправлено: 12.06.13 14:58. Заголовок: Dima пишет: Можно н..

Dima пишет:

цитата:

Можно найти уже готовую картинку с прозрачным фоном.

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

 Отправлено: 12.06.13 15:01. Заголовок: Andrey пишет: Возни..

Andrey пишет:

цитата:

Возник вопросик по PNG картинкам

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

 Отправлено: 12.06.13 15:13. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

Отпишись, если заметишь разницу...

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

 Отправлено: 12.06.13 16:03. Заголовок: Andrey пишет: Можно..

Andrey пишет:

цитата:

Можно ли эту окантовку совсем убрать ?

а если ее залить прозрачным ?

 Отправлено: 12.06.13 16:07. Заголовок: Dima пишет: а если ..

Dima пишет:

цитата:

а если ее залить прозрачным ?

Попробуй... Пример смотри \MiniGUI\SAMPLES\BASIC\IMAGE_2 !

 Отправлено: 12.06.13 16:11. Заголовок: Andrey пишет: Можно..

Andrey пишет:

цитата:

Можно ли эту окантовку совсем убрать ?

Да. Как я уже писал ранее

gfilatov2002 пишет:

цитата:

попробуй Options->Stretch при включенном пункте Transparent

 Отправлено: 12.06.13 16:37. Заголовок: Не получается... Или..

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

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

gfilatov2002 пишет:

цитата:

попробуй Options->Stretch при включенном пункте Transparent

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

 Отправлено: 12.06.13 18:55. Заголовок: Рано радовался.... П..

Рано радовался....
Переделал пример на другой цвет фона и вот что получается:


Или вот еще:


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

 Отправлено: 13.06.13 07:10. Заголовок: версия 2.2.3

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

 Отправлено: 13.06.13 10:07. Заголовок: alex_II пишет: Erro..

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

 Отправлено: 14.06.13 07:37. Заголовок: Всё ОК :sm36: Спаси..

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

 Отправлено: 14.06.13 08:16. Заголовок: Григорий, описание C..

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

 Отправлено: 14.06.13 13:05. Заголовок: Панченко пишет: Мож..

Панченко пишет:

цитата:

Может подправите это дело

Сделал в новой сборке

Исправленный релиз библиотеки для компилятора BCC выложил по адресу:

http://hmgextended.com/files/CONTRIB/hmg-2.2.3a-setup.zip

Этот релиз библиотеки для компилятора BCC добавил также по адресу:

http://minigui.mylivepage.ru/file/?fileid=8723

Надеюсь на конструктивную критику...

 Отправлено: 14.06.13 13:29. Заголовок: gfilatov2002 пишет: ..

gfilatov2002 пишет:

цитата:

Сделал в новой сборке

Спасибо за оперативность.

 Отправлено: 19.06.13 12:17. Заголовок: Что-то я делаю не та..

Что-то я делаю не так?

В примере при 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

Заранее благодарен.

 Отправлено: 20.06.13 11:24. Заголовок: Исправленный релиз б..

Исправленный релиз библиотеки для компилятора BCC снова выложил по адресу:

http://hmgextended.com/files/CONTRIB/hmg-2.2.3b-setup.zip

Этот релиз библиотеки для компилятора BCC добавил также по адресу:

http://minigui.mylivepage.ru/file/?fileid=8724

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

 Отправлено: 20.06.13 11:29. Заголовок: Danilevich пишет: в..

Danilevich пишет:

цитата:

в главное окно в следующий GETBOX этот ALT+T попадает как "мусор"

Да, это известная "фича" у GETBOX

Как вариант исправления/обхода этого глюка я добавил следующие две строки в конце функции showMemo()

цитата:

... DoMethod(cWindowName,"Activate") DoMethod("Form_1","GetBox_1","Setfocus") SetProperty("Form_1","GetBox_1","Value","") return

 Отправлено: 27.06.13 20:55. Заголовок: Спасибо Григорий, н..

Спасибо Григорий,

но у меня только вот так идет:

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)