REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
REQUEST HB_GT_WVG_DEFAULT
REQUEST HB_GT_WVT
REQUEST HB_GT_WIN
SETMODE(50, 80 )
Wvt_SetFont( "Lucida",14, 15,30 )
! Já tentei diversas combinações umas a tela fica muito pequena, outras come a parte de baixo etc.
No arquivo .hbp uso:
-gtwvg
-gui
Gostaria que pelo menos as letras fossem tipo "negrito" ou conseguir colocar a janela na tela inteira.
Já tentei estes codigos tambem e não ficaram bons:
nScrWidth := Wvt_GetScreenWidth()
if nScrWidth >= 1280
nSize := 28
elseif nScrWidth >= 1200
nSize := 22
elseif nScrWidth >= 1000
nSize := 18
elseif nScrWidth >= 800
nSize := 16
else
nSize := 15
endif
Wvt_SetFont( "Lucida",nSize, 15,30 )
Já tentei usar em tela inteira com o código abaixo, porem é incompativel com SETMODE(50,80) ficando uns buracos na tela. Esse código foi sugerido aqui mesmo no forum:
HB_GtInfo( HB_GTI_ISFULLSCREEN, .F. )
HB_GtInfo( HB_GTI_ISFULLSCREEN, .T. )
Então recorro aos colegas mais experientes para tentar solucionar esta questão.
Ate+
Editei a mensagem pois tinha colocado SETPOS em vez de SETMODE que é o correto.