Clipper On Line • Ver Tópico - GTWVG - Expandir a tela para Área do Desktop

GTWVG - Expandir a tela para Área do Desktop

Projeto Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

 

GTWVG - Expandir a tela para Área do Desktop

Mensagempor JoséQuintas » 21 Dez 2015 22:29

Não foi.
Mas testei direto este, mais simples, mostra que realmente é de acordo com o caractere máximo que puder usar.
No segundo, a quantidade de linhas/colunas é mais "widescreen".

#include "hbgtinfo.ch"

PROCEDURE Main
   SetMode(40,132) // 25,85
   SetColor("W/B")
   hb_GtInfo( HB_GTI_FONTNAME, "Lucida Console" )
   CLS
   wvgSetAppWindow():sendMessage( WIN_WM_SYSCOMMAND, WIN_SC_MAXIMIZE, 0 )
   @ 0, 0 TO MaxRow(), MaxCol()
   Inkey(0)
   RETURN


com 25 x 85 colunas

tela25x85.png


com 40 x 132 colunas

tela40x132.png
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor JoséQuintas » 21 Dez 2015 22:45

Faltou dizer: compilei usando hbmk2 test gtwvg.hbc
E como eu disse antes, o tamanho de fonte ao maximizar é escolhido automaticamente, não tem porque configurar.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor JoséQuintas » 21 Dez 2015 23:09

Só comentário:

Achei interessante aquela tela com texto diferente.
Mas provavelmente usa aquele PaintBlock.

Pra quem não entendeu porque desse PaintBlock:

O console sobrepõe tudo. Cada vez que atualiza o texto, em qualquer operação, incluindo um CLS, os gráficos somem.
O "truque" usado nesse caso é ficar repintando o desenho, após "repintar" o texto, é pra isso que serve o PaintBlock e a função relacionada.

Vários controles da WVG/WVT usam esse esquema, por exempo um que desenha botão, ou o que desenha retângulos nos gets.
É refazer desenhos toda vez que refaz o texto.
Até por este motivo é que não dá pra usar uma imagem de fundo, porque o texto sempre cobre tudo.

Já no caso do pushbutton, é uma janela Windows sobre a janela texto.
Por isso um CLS não apaga o pushbutton. Mas não dá pra escrever sobre o desenho, porque o texto está na janela de baixo, atrás do pushbutton.
A diferença da janela do pushbutton é não ter o contorno que toda janela costuma ter. Por isso não se percebe que é outra janela.

Só comentário.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor Jairo Maia » 22 Dez 2015 16:19

Olá Pessoal,

Eolo:
Eolo escreveu:Não sei se tem alguma coisa a ver, mas vou arriscar um palpite.
Eolo, tudo que você disse tem tudo-a-ver. Porém, o interessante é que setar no caso como discutimos nesse tópico, a definição do fonte serve apenas para definir o tamanho da tela. Depois disso, você pode usar tantos quantos fontes diferentes em tipos e cores dentro da mesma tela e sem problemas.

José:
JoséQuintas escreveu:Só comentário:
Bom, você disse tudo e muito mais... Trabalhar com fotos e fontes diferentes num misto console/gráfico requer bastante cuidado e atenção, mas confesso, não é tão difícil e vale a pena. Pelo menos pra mim funciona muito bem.

Outrossim, vou reinstalar o Harbour 3.4 e voltar aqui para discutir mais sobre seus exemplo mais acima, talvez esse realmente seja o caminho para automatizar as configurações.
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Avatar de usuário

Jairo Maia
Colaborador

Colaborador
 
Mensagens: 2733
Data de registro: 16 Ago 2010 13:46
Cidade/Estado: Campinas-SP
Curtiu: 371 vezes
Mens.Curtidas: 305 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor JoséQuintas » 22 Dez 2015 19:50

Dois exemplos radicais da GTWVG, dentro do demowvg.prg

Só usando API Windows

gtwvg.png


Usando estilo diálogo da gtwvg, como "vários aplicativos" rodando simultâneos na mesma janela.

wvg2.png


Nos dois, o problema que vejo é quantidade de fonte extra.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor Nascimento » 22 Dez 2015 23:53

asimoes »disse:
As GT´s trabalham juntas mas com comportamentos diferentes, com HB_GT_WVT nós conseguimos expandir a tela para toda área do desktop sem combrir a barra de tarefas, em compensação não temos o controle do eventos fechar a janela o X da janela que só funciona com HB_GT_WVG


amigo eu uso o "X" da janela com a Wvt normalmente , abandonei o uso da Wvg porque tambem nao consegui o mesmo efeito da Wvt

segue o exemplo aqui.. viewtopic.php?f=4&t=15137&hilit=+gtwvt
A arte de programar é simplesmente fazer seus pensamentos serem interpretados por uma maquina :) clipper 5.3 /harbour/minigui
Avatar de usuário

Nascimento
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 711
Data de registro: 19 Jul 2008 12:11
Cidade/Estado: OLINDA-PE
Curtiu: 110 vezes
Mens.Curtidas: 76 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor JoséQuintas » 23 Dez 2015 07:04

Só tem que lembrar que ao liberar eventos, vai ter que controlar isso nos Inkeys também, incluindo tbrowse, etc.
Tem hora que isso pode atrapalhar, porque o programa tem que estar preparado pra qualquer tecla, até o que não é tecla.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor JoséQuintas » 23 Dez 2015 08:04

No meu caso eu não sigo nada do que consta nos exemplos.
Mas meu uso ainda é limitado.
Vou postar em tópico separado um teste, pra quem quiser ajudar a "incrementar".
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor asimoes » 23 Jan 2016 12:04

Para quem usa GT_WVG e quer expandir a tela da aplicação para área do desktop:

Exatamente nesta ordem:
SETMODE(25, 80)
HB_GtInfo( HB_GTI_RESIZABLE, .F. )
screenWidth := HB_GTINFO( HB_GTI_DESKTOPWIDTH )
screenHeight:= HB_GTINFO( HB_GTI_DESKTOPHEIGHT )
wvt_SetFont( "Lucida Console", Round(( screenHeight / MaxRow() ),0)-4, Round(( screenWidth / MaxCol() ),0), 0 )
WVT_MAXIMIZE()

FUNCTION HB_GTSYS()
   REQUEST HB_GT_WVG_DEFAULT
   REQUEST HB_GT_WVG
   REQUEST HB_GT_WGU
   REQUEST HB_GT_WVG
RETURN Nil
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor fladimir » 08 Jun 2016 13:25

Se abro maximizado não consigo "Restaurar" igual fazemos com janelas Windows tipo maximiza depois vira 2 quadradinhos ai conseguimos RESIZABLE

Ai não consigo usufruir do recurso do Win 7 de quando pressionamos a tecla do Windows (bandeira) e SETA para Direita (ou Esquerda) a janela é posicionada a direita, até funciona mas corta a tela do sistema, não escalona.

Ou seja, se abro maximizado perco esse recurso (bandeira + SETA) pra posicionar a janela a direita ou a esquerda

Agora se abro somente setando a fonte a janela abre em um tamanho sem ser maximizado e permite esse recurso de jogar pra direita ou esquerda (reescalonanado a fonte)

Então gostaria de saber se algum colega já passou por isso ou tem alguma ideia sobre esta necessidade.
Sun Tzu há mais de três mil anos cita nas epígrafes de seu livro “A Arte da Guerra“:

“Concentre-se nos pontos fortes, reconheça as fraquezas, agarre as oportunidades e proteja-se contra as ameaças”.
“Se não é vantajoso, nunca envie suas tropas; se não lhe rende ganhos, nunca utilize seus homens; se não é uma situação perigosa, nunca lute uma batalha precipitada”
.


Até 2017    Desktop Console [ Legado ] Harbour | MinGW | DBF | CDX | FastReport | MySQL


Novos Projetos:

   Desktop Visual           Windev Desktop
   Celular Android/iOS   Windev Mobile
   WEB                            Windev Web


Sejamos gratos a Deus.
Avatar de usuário

fladimir
Colaborador

Colaborador
 
Mensagens: 2434
Data de registro: 15 Nov 2006 19:21
Curtiu: 28 vezes
Mens.Curtidas: 157 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor syslink » 23 Fev 2018 14:02

tô aqui testando a WVG pois parece ser a melhor lib gui que existe no harbour mas não parece q foi esquecida depois q vieram a hmg hmg-e hwgui etc
syslink
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 132
Data de registro: 20 Fev 2018 13:13
Cidade/Estado: joinvile/sc
Curtiu: 3 vezes
Mens.Curtidas: 3 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor syslink » 23 Fev 2018 14:21

os que mais gostei foram os 2 últimos exemplos do Jairo e do José
syslink
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 132
Data de registro: 20 Fev 2018 13:13
Cidade/Estado: joinvile/sc
Curtiu: 3 vezes
Mens.Curtidas: 3 vezes

GTWVG - Expandir a tela para Área do Desktop

Mensagempor microvolution » 23 Fev 2018 14:31

a função que o Jairo criou foi a que eu mais consegui me adaptar, apesar que o botão RESTORE desaparece, mas, tá bom.
Já a do Quintas dá a mensagem de erro: Error BASE/1003 Vari vel nÆo existe: WIN_WM_SYSCOMMAND. Acredito ser a falta de algum #incude.
mas, tá ótimo.
compilando GTWVG de dentro da IDE/HMG 3.4.4 tô satisfeito.
microvolution
Usuário Nível 5

Usuário Nível 5
 
Mensagens: 1175
Data de registro: 02 Set 2011 22:17
Curtiu: 59 vezes
Mens.Curtidas: 17 vezes

Anterior



Retornar para Harbour

Quem está online

Usuários vendo este fórum: Google Adsense [Bot] e 11 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro