Página 1 de 1

MAximinzar com a GTWVW

Enviado: 19 Abr 2007 18:02
por Renato Xavier Corradi
Pessoal, não consigo maximizar a tela dos meus sistemas. Estou usando a GTWVW e gostaria de usar tela inteira, independente da configuração de resolução em que estiver o monitor.

O que acontece hoje é que, se está em alto resolução, a tela do sistema fica pequena... Se está em baixa resolução, a tela do sistema ultrapassa os limites do monitor e não consigo ver partes da tela do sistema....

Se alguém puder dar uma dica, agradeço

Renato

Enviado: 19 Abr 2007 22:13
por angeiras
Ola,

Voce esta usando WVW_MAXIMIZE(0) para maximizar ?

[]s
Manoel Angeiras

Enviado: 20 Abr 2007 12:29
por Luiz
Alem do wvw_maximize(0) você pode tambem pré-definir tamanhos de fonte diferentes para cada resolução, evitando assim que as letras fiquem peguenas ou que a tela não caiba no video, exemplo:

Eu utilizo essa procedure em meus programas para ajustar a fonte.
*(caso eu chame ela sem os parametros, a fonte é definida de acordo com a resolução)

Código: Selecionar todos

PROCEDURE APP_FONT(cFace,nSize,nWidth)
  IF cFace<>nil .or. nSize<>nil .or. nWidth<>NIL
    DEFAULT(@cFACE,'Courier New')
    DEFAULT(@nSize,14)
    DEFAULT(@nWidth,0)
    aFONT[1]:=cFACE
    aFONT[2]:=nSIZE
    aFONT[3]:=nWIDTH
    aFONT[4]:=400
    aFONT[5]:=1
  ELSE
    IF WVW_GETSCREENWIDTH()=640
      aFONT[1]:='Courier New'
      aFONT[2]:=14
      aFONT[3]:=0
      aFONT[4]:=400
      aFONT[5]:=1
    ELSEIF WVW_GETSCREENWIDTH()=800
      aFONT[1]:='Courier New'
      aFONT[2]:=20
      aFONT[3]:=0
      aFONT[4]:=400
      aFONT[5]:=1
    ELSEIF WVW_GETSCREENWIDTH()>=1024
      aFONT[1]:='Lucida Console'
      aFONT[2]:=22
      aFONT[3]:=0
      aFONT[4]:=400
      aFONT[5]:=1
    ENDIF
  ENDIF
  WVW_SetFont(0,aFONT[1],aFONT[2],aFONT[3],aFONT[4],aFONT[5])
RETURN

WvW_SETFONT

Enviado: 07 Nov 2007 11:57
por leandrolinauer
Bom dia, aproveitando os textos eu estou usando com configuração para qualquer tamanho de tela até 1024, só não consegui fazer se tiver usando acima de 1024 , tipo 1280x1024, fica a tela pequena.
Alguem teve problemas deste tipo, tenho dois clientes que tem um monitor LCD 17 polegadas e utiliza esta configuração e a tela fica pequena e o todo o programa do lado esquerdo não ficando centralizado tudo, a única que ficou centralizado foi o comando SetTitle, que deixa toda a tela com o programa preenchida, mas as demais telas wvw_nOpenwindow() ficam do lado esquerdo da tela, não consegui centralizar elas.
Se alguem souber qual configuração da certo com SETFONT acima de 1024 eu ja fiz varias com até LUCIDA CONSOLE,72 não faz nem diferença, será alguma limitação do SETFONT.

Estou usando GTwVw, harbour 0.99.60 simplex.
Grato. :xau

GtWvw

Enviado: 09 Nov 2007 10:58
por leandrolinauer
Resolvido.
Era apenas eu achar um tamanho que não desse errado.
Consegui assim:

Código: Selecionar todos

Function GtWindows()
IF GTINFO(GTI_DESKTOPWIDTH) > 1024
   WVW_SETFONT(,"LUCIDA CONSOLE",29,15,400) // pra acima de 1024
   SETCOLOR('G+/N')
   @ WVW_MAXMAXROW(), 0 TO 25,WVW_MAXMAXCOL() 
   WVW_SBCREATE() 
ElseIF GTINFO(GTI_DESKTOPWIDTH) >= 1024 
   WVW_SETFONT(,"LUCIDA CONSOLE",28,12,400) 
   SETCOLOR('G+/N')
   @ WVW_MAXMAXROW(), 0 TO 25,WVW_MAXMAXCOL() 
   WVW_SBCREATE() 
ELSEIF GTINFO(GTI_DESKTOPWIDTH) >= 800
   WVW_SETFONT(,"LUCIDA CONSOLE",20,09,400)
   SETCOLOR('G+/N')
   @ 25, 0 TO 25,WVW_MAXMAXCOL()+1
   WVW_SBCREATE()
ELSEIF GTINFO(GTI_DESKTOPWIDTH) >= 640
   WVW_SETFONT(,"LUCIDA CONSOLE",17,7,400) //win98
   SETCOLOR('G+/N')
   @ 25, 0 TO 25,WVW_MAXMAXCOL()+1 
   WVW_SBCREATE()
END IF
WVW_SETCODEPAGE(,255) 
SETMODE(WVW_MAXMAXROW()+1,WVW_MAXMAXCOL()+1)
Public w_MxR:=WVW_MAXMAXROW()
Public w_MxC:=WVW_MAXMAXCOL()+2
WVW_SIZE_READY(.T.) 
WVW_SETMAINCOORD(.T.)
wVw_enablemaximize(,.F.)
wVw_maximize(0) 
wVw_CenterWindow(,.F.,.F.)
Return .T.
Espero poder ter ajudado.
:|<

Enviado: 14 Fev 2008 10:08
por ronnimadeira
Está dando o seguinte erro.

Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_WVW_SIZE_READY' referenced from C:\XHARBOUR\
PRG\FERREIRA\OBJ\TELA_CHEIA.OBJ

Enviado: 14 Fev 2008 16:35
por sygecom
ronnimadeira escreveu:Está dando o seguinte erro.

Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_WVW_SIZE_READY' referenced from C:\XHARBOUR\
PRG\FERREIRA\OBJ\TELA_CHEIA.OBJ
Compile junto com sua app a seguinte função:

Código: Selecionar todos

#pragma BEGINDUMP

#include "hbapi.h"

HB_FUNC( WVW_SIZE_READY )
{
   BOOL bIsReady;
   static BOOL s_bIsReady = FALSE;
   bIsReady = s_bIsReady;
   if (ISLOG(1))
   {
      s_bIsReady = hb_parl(1);
   }
   hb_retl(bIsReady);
}
#pragma ENDDUMP