Página 1 de 6

HMG 3.x + WVG = Harbour Multi GT

Enviado: 27 Mai 2012 18:14
por Imatech
Migração imediata de console para GUI :)

A algum tempo no blog do "Marcos Gambeta" li sobre: "HARBOUR MULTI GT", utilizando Multiplas bibliotecas gráficas... no entanto o exemplo não era funcional e deixei a possibilidade para o futuro (Que chegou)...

Recentemente num post (forum harbour), um usuario que tentava migrar de "xHarbour Console" para "Harbour" tambem no modo Console recebeu um exemplo em HMG para compilar e não conseguiu (obvio: nem tinha HMG). Alguns posts depois recebeu + dicas para instalar e compilar com HMG... Achei muito estranha a situação, pois o programa ficaria o Verdadeiro "FRANKENSTEIN" ( imaginei "HMG + Janela Console" )...

Voltando ao "HARBOUR MULTI GT" - Peguei um exemplo da HMG (Contactos) e implementei algumas rotinas da WVG...

Finalmente cheguei a resultado satisfatório... ;)

Quem quiser pagar para ver: é só baixar o exemplo para a pasta Samples da HMG e testar...

HMG 3.x + WVG = Harbour Multi GT

Enviado: 27 Mai 2012 20:15
por Pablo César
Interessante ! Gostei do seu Utils.prg, parabéns !

É com o HB_GTSYS() que faz pedido padrão de compilação GT ?

E diga-me, quando ou em qual situação é utilizado: ANNOUNCE HB_GTSYS e REQUEST HB_GT_WIN ?

HMG 3.x + WVG = Harbour Multi GT

Enviado: 27 Mai 2012 20:46
por Imatech
Olá amigo Pablo...

É uma pena você ter apagado meus posts semelhantes em outros tópicos...

Acho que seria importante para muitos usuarios a existencia deles...



Mas vamos lá...


demo.hbc

Código: Selecionar todos

gt=gtwvg

Código: Selecionar todos

*----------------------*
*Basta existirem no .prg, veja ao final do main.prg
*----------------------*

ANNOUNCE HB_GTSYS 
REQUEST HB_GT_WIN

*----------------------*
* Atenção: essas requisções não são usadas no exemplo
*----------------------*


HMG 3.x + WVG = Harbour Multi GT

Enviado: 27 Mai 2012 20:59
por Pablo César
É uma pena você ter apagado meus posts semelhantes em outros tópicos...
Não. Uma coisa não tem a ver com a outra. Desculpe, mas temos que seguir as regras do fórum. O seu tópico ficou, eis ele aqui. Mas não por isso temos que repeti-lo em todo que tópico. Senão colocamos ordem, vira bagunça e olha: você me deu trabalho... rs
Acho que seria importante para muitos usuarios a existencia deles...
Acho que você entenderá e verá que ainda assim continua sendo útil.

Eu ja compilei o seu exemplo, entendo que tais requisições não foram utilizadas no seu exemplo. Pensei que essa seria outra forma de incluir a bibliotecas WVG + GT

HMG 3.x + WVG = Harbour Multi GT

Enviado: 27 Mai 2012 21:11
por Pablo César
Acho interessante você postar lá no fórum oficial da HMG e da MiniGUI (este ultimo, mandar email pro Grigory) para que incluam um exemplo seu com inteiração WVG + GT nos exemplos que poderiam fazer parte nos futuros releases de versão.

HMG 3.x + WVG = Harbour Multi GT

Enviado: 28 Mai 2012 14:56
por Imatech
EXEMPLO ATUALIZADO (Sera tambem disponibilizado na versão HMG oficial)


Extrair para raiz do disco onde se encontra a HMG = C:, D:, ETC...

Localização Final:

\HMG\SAMPLES\HMG_WVG




Para compilar (estando na pasta):

\HMG\SAMPLES\HMG_WVG\build demo.hbp

HMG 3.x + WVG = Harbour Multi GT

Enviado: 29 Mai 2012 08:35
por vailton
Tem como disponibilizar o executavel? Eu gostaria de testar o exemplo, mas daqui onde estou não tenho como compilar o aplicativo...
:(

HMG 3.x + WVG = Harbour Multi GT

Enviado: 29 Mai 2012 08:43
por Pablo César
Oi Vailton, segue em anexo o executável do ultimo exemplo do colega do Ronaldo (Imatech, ex Jovemxxx), para a sua apreciação.

HMG 3.x + WVG = Harbour Multi GT

Enviado: 29 Mai 2012 12:30
por Imatech
Professor Vailton...


Saudade de ti para bater papo no messenger...

Nosso amigo Pablo já se adiantou e disponibilizou o arquivo...


Qquer dúvida me chama em PVT


Abraço...

HMG 3.x + WVG = Harbour Multi GT

Enviado: 29 Mai 2012 13:11
por Pablo César
Eu tentei de todas formas: com a função em WIN_KILLPROCESS C do Vailton com função que detecta pelo título da janela, mas nada... parece que estivera faltando o FORM dessa WINDOW. Inclusive tentei pegar o nome interno do HMG através do _HMG_ActiveFormName que equivale a _HMG_SYSDATA [ 223 ] (caso do HMG) mas não deu certo. Quem sabe o mestre Vailton consiga...

Existe um exemplo no ...\harbour\contrib\gtwvg\tests\wvgcuigdialog.prg que ensina como criar um oCRT e que talvez esteja faltando antes algo assim como: Hb_ThreadStart...

HMG 3.x + WVG = Harbour Multi GT

Enviado: 29 Mai 2012 13:29
por Imatech
Olá Pablo...

A intenção do exemplo é essa mesmo: os 2 primeiros Botões expõem o FranksTein que atrapalha o projeto... e não há como sumir com ele...

Os proximos 2 botões sim: utilizam o FrameWork ( oCrt ) criado pela classe WvgCrt, dando assim o necessário controle das "janelas console" de forma muito atrativa...

Qquer dúvida é só perguntar...


Abç...

HMG 3.x + WVG = Harbour Multi GT

Enviado: 06 Mar 2016 17:42
por microvolution
olá pessoal, achei mui interessante este tópico.
Bom, no meu caso, estava usando a HMG 3.0.XX e parei em novembro/2015 para experimentar a GTWVG.
Em fevereiro/2016 (início) comecei a testar também a GTWVW, mas, como ela é pouco referenciada aqui no fórum e também noutros locais - apesar de ter um grupo no yahoo inteirinho só pra ela, mas, esse tal grupo tem poucas postagens, pouquíssimas mesmo.
Agora quero implementar algo semelhante ao título do post, só que no lugar da preferência ser da HMG, é como se o título do tópico fosse.
GTWVG mais HMG 3.0.XX = harbour Multi GT.
Aliás, vou agora mesmo, abrir um novo tópico no local correto, para não infringir aqui as regras do fórum. Ok?
E volto aqui para postar o link...
mas, se alguém entendeu e puder dar uma dica, estamos juntos e misturados, e, não embolados, e no meu caso, estou sempre em construção!!!

HMG 3.x + WVG = Harbour Multi GT

Enviado: 06 Mar 2016 21:57
por JoséQuintas
Achei interessante.
Até tentei testar.

Alguma idéia de como resolver este erro?
errohmg.png
Achei que tinha a ver com ter aumentado uma opção, então reutilizei uma já existente.

Código: Selecionar todos

        MENUITEM '&1 - Outro jeito de usar' ACTION DoPrg( "testewvg" )

HMG 3.x + WVG = Harbour Multi GT

Enviado: 06 Mar 2016 22:01
por JoséQuintas
Numa versão reduzida, também com erro:

Código: Selecionar todos

FUNCTION DoPrg()
   hb_ThreadStart( { || TesteWvg() } )
   RETURN NIL

FUNCTION TesteWvg()
   RETURN NIL

HMG 3.x + WVG = Harbour Multi GT

Enviado: 06 Mar 2016 22:19
por JoséQuintas
Sobre a tela da WVG não fechar nesse exemplo...
É normal. A Tela principal da WVG nunca some.
Pra essa finalidade não é ela que deve ser usada.