PC Toledo

Comecei a fazer testes com a gtwvw, a que vém junto no harbour 3.0.
Compilou normalmente em msvc, os exemplos rodaram, e até já compilei meu sistema com ela.
Pelos testes básicos funciona.

Duas dúvidas básicas pra testar na prática:
- Como corrigir os caracteres do @ box
- Como pegar resolução da tela

Resolvido.

Ainda não resolvido completamente.
O problema agora está em uso remoto, porque pega a resolução da tela e não da janela remota.
Até tentei olhar fontes da wvt, porque ela pega se ajusta corretamente mesmo remoto, mas foge do meu conhecimento.
Alguma idéia?

Sei lá... uma sugestão apenas. Guarde a configuração local em arquivo e carregue-las mesmo sendo em forma remota.

Não dá. O arquivo local seria.... remoto... e estaria configurado para o servidor, e não para o acesso remoto.

JoséQuintas escreveu:Não dá. O arquivo local seria.... remoto...

Mesmo que você grave previamente e direcione o arquivo como C:<nome_arquivo> ?

Veja... no acesso remoto podemos escolher a resolução que será usada na conexão.
E não vou ser o único a acessar remoto.
Acho que seria mais fácil ter uma função pra identificar resolução da área de trabalho, do que identificar máquina ou configuração do acesso remoto.
Se salvar em C:, vai ser o C: do servidor, e isso não identifica a máquina remota, ou a resolução remota.
O mais curioso é que não uso monitor no meu servidor. E olhando a configuração de tela mostra como 1024x768.
Não faço idéia de onde a wvw pega a resolução.

Suponhamos que cada máquina que irá acessar, possa ser identificada. Daí então você poderá gravar as configurações no C: em determinada pasta e em sub=pasta formada pelo nome de identificação da máquina remota. Daí será fácil saber em qual pasta pegar o arquivo de configuração, diferenciando-a pela identificação/nome_pasta.

Quando postei a última resposta acabei me perguntando: como o programa de uma máquina pega a resolução da outra máquina?
Após alguns testes, cheguei nesta, com o SetMode() no final e não no início.
Agora deu certo.

nFontHeight := Int( ( WVW_GetScreenHeight() - 76 ) / 40 )
nFontWidth := Int( ( WVW_GetScreenWidth() - 1 ) / 120 )
WVW_SetFont(,"Lucida Console", nFontHeight, nFontWidth )
WVW_SetCodePage(, 255)
SetMode(40,120)

Não entendi. Mudando pra gtwvw o RUN deixou de funcionar.
Como já estava usando gtwvt, parte gráfica não deveria fazer diferença nisso.