HMG 3.x + WVG = Harbour Multi GT

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

Claudio Soto
Colaborador
Colaborador
Mensagens: 566
Registrado em: 27 Ago 2012 12:31
Localização: Uruguay
Contato:

HMG 3.x + WVG = Harbour Multi GT

Mensagem por Claudio Soto »

JoséQuintas escreveu:Só vou me convencer disso quando criar uma lib.
Se daqui a um ano eu ainda estiver usando Harbour, talvez descubra.
Ou se é assim, talvez melhor criar os controles no Delphi, e só usá-los no Harbour, sem criar nada no Harbour.
Sinceramente te deseo la mejor de las surtes, desde mi humilde opinión lo mejor es empezar por entender como se programa en Windows, y un buen punto de partida es el clásico libro de Charles Petzold.
PD: yo empece a aprender a programar en Windows empleando la primera edición de este libro, y a programar en clipper con el libro Clipper 5.0 de Ramalho, ambos en idioma portugués de la editorial MAKRON Books do Brasil, no me acuerdo si los encargué de San Pablo o de Porto Alegre, eso fue alla por el 92.
Tambien tengo libros de C/C++ y Assember encargados de la misma editorial.
Y el primer computador que tuve fue un TK-90 que mi padre me lo compro en Brasil cuando yo tendría unos 10 o 11 años de edad.

Como pueden ver mis conocimientos computacionales se iniciaron con mercadería de contrabando de Brasil, por suerte creo que el delito ya prescribió. :D
Saludos.
Dr. Claudio Soto
(Uruguay)
http://srvet.blogspot.com
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

HMG 3.x + WVG = Harbour Multi GT

Mensagem por JoséQuintas »

Obrigado pelo livro.
Ele até mostra um erro comum, que eu também cometi, que causa um loop infinito na parte gráfica.

Com certeza não sei mexer com linguagem C.
Mas tem quase tudo pronto no Harbour.
No momento tentando entender a parte de registrar classe no Windows.
Tem função pronta pra isso, mas por enquanto um controle novo só funcionou com classe já existente.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1231
Registrado em: 02 Set 2011 22:17
Contato:

HMG 3.x + WVG = Harbour Multi GT

Mensagem por microvolution »

Pessoal boa noite!
Na página deste link, postei a compilação do meu projeto 100% em harbour + gtwvg usando a compilação (F5) da IDE/HMG 3.4.2.
Só pra relembrar, todos os comandos gráficos da GTWVG funcionaram perfeitamente dentro da IDE/HMG, como já mostrei e mostro novamente na tela seguinte:
16-0313 - compilação hmg 4.png
Agora, na imagem abaixo, além de ser compilação na IDE/HMG com recursos da GTWVG (idênticos), já consegui executar um módulo com os formulários da HMG. Vejam, por favor:
16-0313 - compilação hmg 6-hmg-gtwvg2.png
Agora, que já foi feito, me falta entender alguns coisas. Que me lembro, são elas:
- como parar ou pausar o sistema para que a tela anterior (esta de fundo) eu não tenha acesso ?
- quando clico no X desta janela de formulário criada na HMG, o sistema fecha e não retorna à janela anterior ou, como ainda está provisório, deveria votar para a tela de fundo (que é da GTWVG). No lugar disso o sistema se auto-encerra.
As linhas que fazem o formulário são (apesar que todos muito mais que nós, vamos postar para todos que estão aprendendo com a gente):

Código: Selecionar todos

   DEFINE WINDOW Form_Main          AT 0,0       WIDTH 640          HEIGHT 480          VIRTUAL WIDTH 1300          VIRTUAL HEIGHT 800          TITLE 'Orçamento FDL GUI'          MAIN
                        @ 30,50 LABEL Label_1 ;
                        VALUE 'Empresa           : ' ;
                        AUTOSIZE ;
                        ACTION MsgInfo('acesse www.mvinfo.wmx.net.br')  ;

                        @ 50,50 LABEL Label_2 ;
                        VALUE 'Registro          : '   ;
                        ACTION MsgInfo('acesse www.mvinfo.wmx.net.br')  ;
                        AUTOSIZE ;

                        @ 70,50 LABEL Label_3 ;
                        AUTOSIZE ;
                        VALUE 'Versão do SiCCoSV   : ' ;
                        ACTION MsgInfo('acesse www.mvinfo.wmx.net.br')  ;
            
                        @ 90,50 LABEL Label_4 ;
                        AUTOSIZE ;
                        VALUE 'Data de Instalação: '  ;
                        ACTION MsgInfo('acesse www.mvinfo.wmx.net.br')  ;
            
                        @ 110,50 LABEL Label_5 ;
                        AUTOSIZE ;
                        VALUE 'Data de Validade  : '  ;
                        ACTION MsgInfo('acesse www.mvinfo.wmx.net.br')  ;
   END WINDOW
   CENTER WINDOW Form_Main
   ACTIVATE WINDOW Form_Main
Agora, os senhores devem estar se perguntando. Como foi possível juntar a GTWVG e a HMG?
Bom, como num outro tópico, foi a nossa insistência, em dizer que sim, é possível!
As únicas linhas que fazem essa ligação (permitem acionar a HMG) é:

Código: Selecionar todos

   #ifndef gt1
      #include "HMG.CH"
   #endif
Bom, agora, se gostaram, testem aí e acho que já estamos juntando:
- o útil ao agradável!
- a fome com a vontade de comer!
- a faca e o queijo!
etc
Professores JQUINTAS, JAIRO, TOLEDO, ASIMOES, ITAMAR, PABLO, EOLO, etc... cada um dos senhores em particular, gostam de uma LIB ou GT. Agora todos nós podemos gostar de todas, e, como disse o professor JQUINTAS, é hora de unirmos mais nossas forças para que todos usem todas as LIBs, pois cada uma tem uma coisa melhor ou pior que a outra, tem algo prático, que na outra não tem.
Por exemplo, pra quem quer migrar em modo gráfico sem muito alterar os códigos, acho que é a GTWVG, pois não tem muita dificuldade - até pra nós que somos leigos;
Agora, a MINIGUI, tem formulários complexos, e, quem quiser usufruir deles, terá que redesenhar todos os @say/gets e substituí-os ("no braço mermo rsrs") pelos @label/etc...
Então, se gostaram, comentem, compartilhem, e, testem os exemplos.
Caso queiram, se não conseguirem, mas acho que conseguem muito melhor que nós, posto um exemplo simples.
Nota de Moderação:
por Toledo: O Fórum é feito por todos, e não apenas por alguns participantes.
Evite enviar mensagens exclusiva para um participante ou convidar alguns membros para participar de um assunto discutido em um tópico, isto acaba forçando a participação de alguém ou espantando os que foram excluídos, e quem sabe alguém que poderia ter uma solução para o assunto em discussão. E um outro problema é que deixa em uma situação chata quem foi relacionado e não participou.
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1231
Registrado em: 02 Set 2011 22:17
Contato:

HMG 3.x + WVG = Harbour Multi GT

Mensagem por microvolution »

JoséQuintas escreveu:No momento tentando entender a parte de registrar classe no Windows.
bom dia! talvez estou perguntando por perguntar, pois não entendi nada de "classes ainda", pois no Delphi com vem tudo pronto, não me ative ao estudo "desse treco ainda". Como aqui no harbour é muito complexo não consegui ainda absorver nada. Então, minha "la pregunta": Do que se trata o que o professor disse "ENTENDER REGISTRAR CLASSE NO WINDOWS"?
Viu também, que descobrimos como fazer para funcionar GTWVG e HMG juntos na IDE/HMG?
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

HMG 3.x + WVG = Harbour Multi GT

Mensagem por JoséQuintas »

registrar classe no Windows não tem a ver com classe do Harbour.
Isso tem a ver com criar uma biblioteca nova, ou criar componentes que uma biblioteca não tem.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1231
Registrado em: 02 Set 2011 22:17
Contato:

HMG 3.x + WVG = Harbour Multi GT

Mensagem por microvolution »

xiiiiiiiiiii
se aqui tivesse opção de postagem de vídeo, veria como fiquei "descabelado, zói torto e bicudo e xorano", pois piorou ainda mais a minha compreensão... mas, perguntei só pra ver se eu entenderia... rsrsrs
JoséQuintas escreveu:registrar classe no Windows não tem a ver com classe do Harbour.
Isso tem a ver com criar uma biblioteca nova, ou criar componentes que uma biblioteca não tem.
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1231
Registrado em: 02 Set 2011 22:17
Contato:

HMG 3.x + WVG = Harbour Multi GT

Mensagem por microvolution »

pessoal boa noite!
tô com meus dedos coçando pra citar nomes... mas minha simplicidade estraga... entao deixa prá lá.
Bom, a todos os amantes da GTWVG e também os amantes da IDE/HMG, venho informar-lhes que consegui driblar o sistema e usar ambas as libs GRÁFICAS ao mesmo tempo, e, pelo que vi, posso alternar e usar em quaisquer módulos, uma ou outra.
Vejam a imagem, da tela com a GTWG CONSOLE (na verdade é gráfico com a aparência de CONSOLE) e o DEFINE WINDOW da HMG:
16-0314 - compilação hmg 7-hmg-gtwvg.png
Portanto, estamos à disposição para demais esclarecimentos... como diz o ditado:
"água mole pedra dura, tanto bate até que fura!"
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

HMG 3.x + WVG = Harbour Multi GT

Mensagem por JoséQuintas »

como disse o professor JQUINTAS, é hora de unirmos mais nossas forças para que todos usem todas as LIBs, pois cada uma tem uma coisa melhor ou pior que a outra, tem algo prático, que na outra não tem.
Não foi assim que eu quis dizer, mas tudo bem, é válido.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Responder