PC Toledo

Caros colegas, estou com problema de tela ao tentar migrar a versao do xharbour.

Quando compilo usando xharbour 0.99.3 com gtwvw, numa resolucao de tela de 800x600, as seguinte configuracoes ficam perfeitas:
- wvw_setfont(0,"Times News Roman",18,08,400,0)
- setmode(30,100)
O resultado é uma tela inicial do programa que toma quase todo o desktop do windows, fica muito bom.

O problema esta quando eu mudo a versao do xharbour para a 0.99.70, as mesmas configuracoes de tela nao cabem dentro da resolucao 800x600, ai eu preciso mudar para:
- wvw_setfont(0,"Times News Roman",19,07,400,0)
- setmode(30,100)
só que o resultado nao é muito bom, a tela inicial do programa nao fica tomando o desktop todo, o que me deixou mais indiguinado é que as outras resolucoes nao variam com as versoes, por exemplo, na resolucao 1024x768 as configuracoes de tela nao precisao mudar, a seguinte configuracao fica igual nas duas versoes:
- wvw_setfont(0,"Times News Roman",23,10,400,0)
- setmode(30,100)

Infelizmente existe ainda muita gente que usa a resolucao 800x600, é a mais usada, entaum se eu nao conseguir resolver este problema, terei muitos clientes descontentes com a nova versao do sistema.

Alguem pode me dar uma luz, por que existe esta variacao?? existe alguma outra configuracao na gtwvw??

Já tentei mudar de fonte, mas o problema persiste.

Bom, para resolução 800x600, tente usar a WVW_SetFont(,'Ms Sans Serif', 16, 8 ).


Coloque e verifique se você aprova.

Agora, eu tô te passando o que vi por aí... tbem nem faço idéia de como realmente funciona a função WVW-SetFont como trabalhar corretamente seus argumentos.

Abraços.

Bom achei isso num forum que nao lembro, teste ai e depois diga como ficou, alias é essa configuracao que to usando.
setcolor('N/W,N/GR*,,,N/W*')
cls
screenWidth := Wvt_GetScreenWidth()
wvw_SetPaintRefresh(150)
if screenWidth >= 1920
WVt_SetFont("Courier New",40,21)
ELSEIF screenWidth >= 1600 // 1280 *960
WVt_SetFont("Courier New",32,18)
elseif screenWidth >= 1280 // 1280 *960
Wvw_SetFont(,"Courier new",20,13) //
15*80=1200 36*25=900
elseif screenWidth >= 1024 // 1024*760
Wvw_SetFont(,"Courier new",20,12.5)
// WVW_SetFont(,"Lucida Console",26,14)
elseif screenWidth >= 800
Wvw_SetFont(,"Courier new",18,10)
// Wvw_SetFont(,"Terminal",20,8)
// WVW_SetFont(,"Lucida Console",20,-8)
else
Wvw_SetFont(,"Courier new",14,8)
endif

Olá Lucimauro,
Apenas para lembrar que no seu exemplo tem funções da GTWVT misturado com a GTWVW, no caso teria que linkar as duas para poder funcionar, e pelo que percibi o colega "TerraSoftware" esta querendo para GTWVW.