HMG | EXECUTAR MÓDULO CONSOLE DENTRO DE FORM WINDOW MAIN

[marcosgambeta]

SET MIXEDMODE é o mesmo que REQUEST HB_GT_WIN_DEFAULT

Baseado nesta informação, é importante lembrar: gtwin é uma janela de texto mesmo, mas gtwvt é uma janela gráfica onde se emula o modo console.

Então, gtwvt é uma opção melhor para se trabalhar do que gtwin.

E a gtwvg, se 'despenarmos' ela, removendo os recursos extras, vira basicamente uma gtwvt no final.

[JoséQuintas]

E a gtwvg, se 'despenarmos' ela, removendo os recursos extras, vira basicamente uma gtwvt no final.

Sim, basicamente a GTWVG é uma janela GTWVT com opção de desviar eventos Windows.

Então, gtwvt é uma opção melhor para se trabalhar do que gtwin.

Não.
Dá no mesmo.
O problema é..... depende do que o usuário está aprontando nos fontes.

Aproveitando pra corrigir uma informação:

No final das contas, o Microvolution está usando HMG, GTWIN, GTWVG e GTWVW ao mesmo tempo.

Com certeza, além dos problemas normais, tem as diferenças dos fontes dele.
Por isso o melhor é tratar um problema de cada vez, porque vão ter muitos.

[JoséQuintas]

Aproveitando....

Se ainda tem a minha HMG aí, coloque os fontes aqui pra eu copiar de volta, porque eu realmente apaguei tudo pra recomeçar, mas cheguei à conclusão que meu caminho anterior é que estava certo.

[JoséQuintas]

Esquece....
o github ainda tem lá alguns como excluídos e restaurei.

[JoséQuintas]

Também faço minha bagunça, fazer o que.....
Recuperei todos hmg que tinha excluído, pra ver qual interessa.

[microvolution]

No final das contas, o Microvolution está usando HMG, GTWIN, GTWVG e GTWVW ao mesmo tempo.

discordo.
só se estou usando sem saber.
Quando começamos, foi com a GTWVG que o nobre professor nos ensinou o básico que migramos. Depois descobrimos que a HMG 3.4.x vinha com a GTWVG como integrante. Então, começamos a compilar via IDE mas mantendo somente WVG. Aos poucos fomos colocando a #include HMG.CH para testar as MSGINFO, etc da HMG, o que deu certo. E, finalmente, pra não perder muito tempo, queríamos aprender a fazer um FORM WINDOW MAIN, com MENUs, etc...
mas pra isso, precisava mexer no código inteiro, pra criar uma variável lógica que se o usuário decidisse (no caso eu mesmo) usar somente GTWVG... teria apenas as telas CONSOLE simuladas gráficas da WVG com mensagens da HMG.
E, se optasse por usar tela HMG como principal, teria aí o SPLASH, LOGIN e FORM WINDOW MAIN e MENU MAIN gráficos da HMG com chamadas às telas CONSOLE WVG, com retorno à HMG DEFINE WINDOW MAIN.
Então, não estou usando esse tanto de LIBs gráficas como o nobre falou. A não ser que seja de forma inconsciente. Aliás, nem sei comando e funções de nenhuma dessas extras que o nobre acrescentou, a não ser um pouco de WVGCRT, WVGDIALOG, WVGMESSAGEBOX, PUSHBUTTON da GTWVG e LABEL, TEXTBOX, DEFINE WINDOW, MAIN MENU, da HMG. Que eu saiba só sei isso e mais nada.

E a gtwvg, se 'despenarmos' ela, removendo os recursos extras, vira basicamente uma gtwvt no final.

rsrsrsrs despenarmos kkkk

Também faço minha bagunça, fazer o que....

então... não sou eu o bagunceiro kkkk

Se ainda tem a minha HMG aí, coloque os fontes aqui pra eu copiar de volta

claro que tenho. Acho que tenho 2. Uma que funcionou a compilação e o nobre mandou eu jogar fora, mas, não o fiz e a última que dá um monte de erros e não compila rsrsrsrs
quer que eu envie ZIP aqui mesmo ou no wetransfer?

[microvolution]

Quintas, meu nobre, os arquivos não carregaram por aqui... então lhe enviei via https://wetransfer.com
mandei para o seu email: vendas@jpatecnologia.com.br

a minha HMG aí, coloque

enviado...
o link é: https://we.tl/t-9g7QqhY8GZ caso não receba o email, e serve pra qualquer um baixar nos próximos 7 dias

[microvolution]

ou esse link pra baixar a HMG.JPA(não está compilando) e HMG.JPA com acentuação errada, mas, compilando: https://wetransfer.com/downloads/846b98 ... 024/32ec5f
voltando aqui...
Ademais, analisando aqui o código fonte da H_EVENTC.PRG, os erros sempre finalizam nas seguintes linhas:

Código: Selecionar todos

123      lProcessMessage := .F.
124      IF EventProcessAllHookMessage (nIndex) == .T.
125         lProcessMessage := .T.
126      ELSEIF EventProcessHMGWindowsMessage (nIndex) == .T. .AND. IsHMGWindowsMessage == .T.
127         lProcessMessage := .T.
128      ELSEIF EventProcessKeyboardMessage   (nIndex) == .T. .AND. IsKeyboardMessage   == .T.
129         lProcessMessage := .T.
130      ELSEIF EventProcessMouseMessage      (nIndex) == .T. .AND. IsMouseMessage      == .T.
131         lProcessMessage := .T.
132      ENDIF

acabou de acontecer agora ERROR BASE/1070 ERRO NOS PARÂMETROS: ==
linha 130 acima finalizou;

executei novamente, deu o mesmo erro, agora na linha 128;

novamente executei, e agora finalizou na linha 126.

Vai aqui um chutão mesmo bem do outro campo e com os olhos vendados, quem sabe sai um gol:
Se comentar essas linhas no fonte original e compilar a LIB HMG.3.5 será que o erro para?

Se, a tentativa é possível, como faço para compilar a LIB ? não faço a menor ideia.

[JoséQuintas]

Depois descobrimos que a HMG 3.4.x vinha com a GTWVG como integrante. Então, começamos a compilar via IDE mas mantendo somente WVG. Aos poucos fomos colocando a #include HMG.CH para testar as MSGINFO, etc da HMG, o que deu certo.

Não está fazendo telas em HMG, ou WVG, partiu pra misturar recursos.

Está fazendo uma colcha de retalhos, que depois não vai conseguir consertar mais.

[microvolution]

depois não vai conseguir consertar mais.

pra que isso não SEJA feito assim "por rumo" e "como um louco", eu tenho o seguinte no sistema:

Código: Selecionar todos

IF HMG 
... (executa de tal forma)
ELSE
... (executa apenas WVG)
ENDIF

bom, vejam no outro fórum que o Dr. Soto me passou umas ideais pra tentar fazer, mas, ainda não resolveu...
mas, não é uma colcha de retalhos.

[JoséQuintas]

Menu
A - Modulo lançamentos em GTWVG
B - Modulo lançamentos em HMG
C - Modulo lançamentos em HWGUI

[microvolution]

Menu
A - Modulo lançamentos em GTWVG
B - Modulo lançamentos em HMG
C - Modulo lançamentos em HWGUI

isso é no seu JPA?

[JoséQuintas]

Não, é uma sugestão do que deveria fazer, cada módulo só trabalhando com uma lib, sem misturar recursos.
E se funcionou, jogar o outro módulo fora, ficar só com o que vai ser definitivo.

[microvolution]

cada módulo só trabalhando com uma lib

mas, penso q é exatamente isso q estou fazendo

[microvolution]

pimba!
tenho a impressão que consegui resolver...
vou fazer os testes finais.