Форум » [x]Harbour » HB_GTI_MAXIMIZED » Ответить

HB_GTI_MAXIMIZED

Dima: Не работает hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) если REQUEST HB_GT_WVG_DEFAULT ежели REQUEST HB_GT_WVT_DEFAULT , работает , но тогда не пашет Wvt_DrawImage Куда копать ?

Ответов - 13

SergKis: Dima Может это подойдет[pre2] 2013-11-06 23:09 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) * include/hbgtinfo.ch + added new hb_gtInfo() switch: HB_GTI_CLOSEMODE It controls close event (i.e. ALT+F4 and/or [x] button in MS-Windows) behavior: == 0 - terminate application >= 1 - generate HB_K_CLOSE == 2 - disable close button hbgtinfo.ch #define HB_GTI_CLOSEMODE 74 /* Close event: 0 terminate application, >=1 generate HB_K_CLOSE, 2 disable close button */ [/pre2]

Dima: SergKis пишет: Может это подойдет Похоже не пашет hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) при REQUEST HB_GT_WVG_DEFAULT

SergKis: Тогда может так[pre2] /* * ShowWindow() Commands */ #define SW_HIDE 0 #define SW_SHOWNORMAL 1 #define SW_NORMAL 1 #define SW_SHOWMINIMIZED 2 #define SW_SHOWMAXIMIZED 3 #define SW_MAXIMIZE 3 #define SW_SHOWNOACTIVATE 4 #define SW_SHOW 5 #define SW_MINIMIZE 6 #define SW_SHOWMINNOACTIVE 7 #define SW_SHOWNA 8 #define SW_RESTORE 9 #define SW_SHOWDEFAULT 10 #define SW_FORCEMINIMIZE 11 #define SW_MAX 11 [/pre2] Примеры contrib\gtwvg\demowvg.prg и demowvg1.prg[pre2] wvt_SetGUI( .T. ) WvtSetKeys( .T. ) Popups( 1 ) wvt_SetMouseMove( .T. ) wvt_SetFont( "Courier New", 18, 0, 0 ) CLS wvt_ShowWindow( SW_RESTORE ) [/pre2]


SergKis: PS[pre2] 2012-01-16 17:32 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) * contrib/gtwvg/gtwvg.c * contrib/gtwvg/gtwvg.h * contrib/gtwvg/hbgtwvg.ch + Implemented: HB_GTI_MAXIMIZABLE message. hb_gtInfo( HB_GTI_MAXIMIZABLE, TRUE/FALSE ) -> lPrevState TODO: implement in GTWVT if deemed fit. [/pre2]

Dima: SergKis Задачка у меня консольная и хотелось бы заставить это работать в следующем контексте. [pre2] #include "hbgtinfo.ch" REQUEST HB_GT_WVT REQUEST HB_GT_WVT_DEFAULT // если REQUEST HB_GT_WVT_DEFAULT // заменить на REQUEST HB_GT_WVG_DEFAULT // то установка hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) // не работает set cons off hb_gtInfo(HB_GTI_FONTNAME, 'Lucida Console') hb_gtInfo(HB_GTI_FONTQUALITY,4) WVT_setmode(25,80) hb_dispoutat(maxrow(),0,padc("TEST",maxcol()+1),"n/w*") wait ********* Func WVT_setmode(nrow,ncol) hb_gtInfo( HB_GTI_FONTWIDTH,5) hb_gtInfo( HB_GTI_FONTSIZE,8) hb_gtInfo( HB_GTI_FONTWIDTH, INT(HB_GtInfo(HB_GTI_DESKTOPWIDTH) /nCol) ) hb_gtInfo( HB_GTI_FONTSIZE, INT(HB_GtInfo(HB_GTI_DESKTOPHEIGHT) /nRow)) //Hb_GtInfo( HB_GTI_PALETTE,{0, 8716288, 34048, 8750336, 133, ; // 8716421, 34181, 13027014, 6316128, 16711680, ; // 6356832, 16777056, 2490616, 16736511, 65535, 16777215}) // палитра как в WVG SetMode(nRow,nCol) cls hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) return nil [/pre2] [pre2] HBP файлик C:\hb32mingw\contrib\gtwvg\gtwvg.hbc -workdir=obj -otest.exe -gui -gtwvt -gui test.prg [/pre2]

SergKis: Dima пишет Не работает hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) если REQUEST HB_GT_WVG_DEFAULT ежели REQUEST HB_GT_WVT_DEFAULT , работает , но тогда не пашет Wvt_DrawImage Что то я запутался, какой режим нужен WVT или WVG ? Ведь надо, что бы работала Wvt_DrawImage, а она в WVG работает, а вWVT нет, правильно ? Для WVT ставим hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) Для WVG ставим hb_gtinfo( HB_GTI_MAXIMIZABLE, .T. ) для работы кнопки max\norm окна. С этими режимами не работаю, есть только hbedit в wvt и там hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) работает. Большего не скажу по режимам. GtWvg только исходники смотрел, не запускал. GtWvt - это window окно, а GtWin - консоль. Так, вроде, было

Dima: SergKis пишет: Ведь надо, что бы работала Wvt_DrawImage, а она в WVG работает, а вWVT нет, правильно ? Верно. SergKis пишет: Что то я запутался, какой режим нужен WVT или WVG ? WVT устроил бы НО бухи хотят картинок на начальной заставке программы , вот поэтому и прицепил REQUEST HB_GT_WVG_DEFAULT Ладно , проехали. Спасибо !

Dima: Закинул на FTP к тебе "кино" , что бы понял чего хотят и как оно выглядит :) Это WVG

SergKis: Dima пишет "кино" , что бы понял чего хотят и как оно выглядит :) Это WVG Если работа программы на Windows, то можешь оба драйвера собирать в прогу и основные режимы на wvt, а с картинками перезапускать прогу в те же координатах окна поверх предыдущего с wvg окном, что бы сильно не переводить все на wvg

Dima: SergKis Я придумал как Начальный экран с картинками показываем как и показывали.......далее картинки не нужны и можно пересесть на чистый WVT Для этого HB_GTRELOAD( "WVT" ) + доп настройки Работает однако :)

SergKis: Dima

SergKis: Dima Если gtWvg.lib подключить к MiniGui, то можно получить в одном модуле в mixed сборке все три варианта окон, т.е. окно wvt (в нем менять по надобности на wvg) и окна MiniGui типов (moda поверх wvt, к примеру). Интересно, однако

Sergy: Можно сделать так - запускать в WVT, раз все настроено, а по мере надобности - открывать доп. окно сверху с драйвером WVG, вывести в него картинку, после чего закрыть.



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