Отправлено: 08.12.20 16:17. Заголовок: HB_GTI_MAXIMIZED

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

 Отправлено: 08.12.20 17:30. Заголовок: Dima Может это подо..

Dima
Может это подойдет

 
 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 */ 
 

 Отправлено: 16.12.20 20:22. Заголовок: SergKis пишет: Може..

SergKis пишет:

цитата:

Может это подойдет

Похоже не пашет hb_gtinfo( HB_GTI_MAXIMIZED, .T. ) при REQUEST HB_GT_WVG_DEFAULT

 Отправлено: 16.12.20 22:45. Заголовок: Тогда может так /* ..

Тогда может так

 
 /* 
  * 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 
 

Примеры contrib\gtwvg\demowvg.prg и demowvg1.prg

 
    wvt_SetGUI( .T. ) 
    WvtSetKeys( .T. ) 
    Popups( 1 ) 
    wvt_SetMouseMove( .T. ) 
    wvt_SetFont( "Courier New", 18, 0, 0 ) 
  
    CLS 
    wvt_ShowWindow( SW_RESTORE ) 
 

 Отправлено: 16.12.20 23:00. Заголовок: PS 2012-01-16 17:32 ..

PS

 
 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. 
 

 Отправлено: 19.12.20 12:55. Заголовок: SergKis Задачка у м..

SergKis
Задачка у меня консольная и хотелось бы заставить это
работать в следующем контексте.

 
 #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 
  
 

 HBP файлик 
 C:\hb32mingw\contrib\gtwvg\gtwvg.hbc 
  
 -workdir=obj 
 -otest.exe 
 -gui 
  
 -gtwvt 
 -gui 
  
 test.prg 
  
 

 Отправлено: 19.12.20 15:27. Заголовок: Dima пишет Не работа..

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 - консоль. Так, вроде, было

 Отправлено: 19.12.20 16:04. Заголовок: SergKis пишет: Ведь..

SergKis пишет:

цитата:

Ведь надо, что бы работала Wvt_DrawImage, а она в WVG работает, а вWVT нет, правильно ?

Верно.

SergKis пишет:

цитата:

Что то я запутался, какой режим нужен WVT или WVG ?

WVT устроил бы НО бухи хотят картинок на начальной заставке программы , вот
поэтому и прицепил REQUEST HB_GT_WVG_DEFAULT


Ладно , проехали.
Спасибо !

 Отправлено: 19.12.20 16:10. Заголовок: Закинул на FTP к теб..

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

 Отправлено: 19.12.20 17:16. Заголовок: Dima пишет "кин..

Dima пишет

цитата:

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

Если работа программы на Windows, то можешь оба драйвера собирать в прогу и основные режимы на wvt, а с картинками перезапускать прогу в те же координатах окна поверх предыдущего с wvg окном, что бы сильно не переводить все на wvg

 Отправлено: 19.12.20 17:53. Заголовок: SergKis Я придумал ..

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

 Отправлено: 19.12.20 18:12. Заголовок: Dima :sm36:..

Dima

 Отправлено: 19.12.20 18:36. Заголовок: Dima Если gtWvg.lib..

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

 Отправлено: 21.01.21 14:30. Заголовок: Можно сделать так - ..

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