PC Toledo

... com vocês, coloquei aqui na HWGUI porque foi esse o teste que eu fiz.

=====================
Prompt: considere o compilador harbour com a lib gráfica hwgui , instalados e funcionando, também consider o sistema operacional linux.

Crie na pasta atual um exemplo contendo:

1) um formulário ...

... do produto.

Como eu disse antes, se o dlgauto já cria tela pra qualquer coisa, foi só ir usando.
E usando chamadas genéricas pra qualquer lib.

Virou um testador de LIBs.
Será que a LIB faz ? Será que precisa algo especial ? Como é em cada LIB ? Será que tem recurso que facilita ?
Será que ...

Tá praticamente igual em qualquer lib, esta em fivewin, dá pra notar pequenas diferenças no visual que pertencem a fivewin.
Seria como pedidos, e produtos do pedido.
Tem os ícones pra mexer nos produtos do pedido - adicionar, excluir ou editar.
Sempre automático, conforme configuração.

Em lib com recurso a mais, ou recurso que eu soube usar, eu acrescentei recurso.
Essa tela é HMG Extended.
Acrescentei imagem em cada aba da tab
Acrescentei o botão de pesquisa nos campos chave.
Alguns "GETs." foram substituídos pela opção de checkbox, ou calendário, ou outro.

... sempre tem a Dialog, o Parent, nome/variável do controle, "linha", "coluna", "altura", "largura", texto do button, ícone, e a ação.
Não importa a LIB.


GUI():ButtonCreate( xDlg, xParent, @xControl, nRow, nCol, nWidth, nHeight, cCaption, cResName, bAction )


É aí que entra uma classe pra cada ...

... SEQUENCE/ENDSEQUENCE pegando o aplicativo inteiro.
Não vai dar erro, então não vai capturar nada.
O erro vai ser na execução das rotinas de API, e a LIB é quem faz.
Teoricamente vai dar no mesmo, igual já acontece.

Talvez selecionar partes da LIB pra tentar capturar isso.

Num exagero, talvez tentar ...

... SEQUENCE/ENDSEQUENCE pegando o aplicativo inteiro.
Não vai dar erro, então não vai capturar nada.
O erro vai ser na execução das rotinas de API, e a LIB é quem faz.
Teoricamente vai dar no mesmo, igual já acontece.

Talvez selecionar partes da LIB pra tentar capturar isso.

Num exagero, talvez tentar ...

API Windows é complicada.
Envolve várias partes da LIB ao mesmo tempo.
Meu conhecimento não é suficiente pra mexer com isso.

Só sei que se mudar a primeira dialog pra CLIPPER, aí aborta o programa.
Isso indica problema, mas sem mensagem nenhuma de erro, fica impossível saber aonde mexer.
Até tentei ...

Agora vamos às pendências/falhas, por ser diferente por LIB/DBF/MySQL:

- precisa browse diferente pra DBF e pra SQL, nem toda lib tem recurso para os dois
- Acionar uma pesquisa em browse, pode ser por tecla ou button, nem toda lib tem recurso pra isso, e em algumas isso falha
- ao teclar enter no ...

... tanto faz se é DBF ou MySQL, muda o jeito de buscar informação, mas não a lógica do que precisa ser feito.

Já temos algo mais completo: cadastros com pesquisa de códigos relacionados
E tanto faz qual seja a LIB, não tem muita opção de fazer diferente, só tem o fonte de cada lib construir as telas.

Estou meio sem inspiração, e vi que tá faltando coisa no dlgauto.
Talvez porque tem todas as LIBs juntas, ou porque tem DBF e MySQL, que dependem de solução diferente.
Talvez todos possam ajudar a continuar o que falta, já que qualquer lib serve.

Basicamente é o que fazemos no dia a dia.

Como ...

... sefazclass/blob/master/.github/workflows/buildall.yml

Nesse workflow é criado harbour, hmg3, hmg extended, oohg, hwgui, dlgauto com cada lib, sefazclass, e outros.
Fica tudo em zip nos workflows, como se fossem pendrives, e os zips ficam no github em separado do projeto.
Assim tá sempre ...

... de linha com comandos maiores, utilize o PowerShell.


Então, limite existe, se é o seu caso ou não, não sei dizer.

Alternativa:
Dividir em libs, lembrando que se não chamar o programa diretamente ele não vai entrar no EXE.
do( "algumprograma" ) isso não vai puxar o "algumprograma" da lib
Já ...

... prg algumfonte.prg


A intenção aqui seria ver se somem/aparecem as funções do gasp40hb.

Outro teste NÃO CONVENCIONAL:

hbmk2 gasp40hb.prg -hblib -hbx=lista.hbx


-hblib é pra gerar lib
-hbx é pra criar um hbx com a lista de funções encontradas na compilação
Olhando o hbx vai ter a visão do ...

... CASE cLetra == Chr(10)
CASE cLetra == Chr(13)
CASE cLetra $ "0123456789"
OTHERWSIE
? Asc( cLetra ), cLetra, Substr( cTxt, cLetra:__EnumIndex() - 10, 20 )
ENDCASE
NEXT
Inkey(0)
RETURN


Mas faz o teste de colocar a lib do gas duas vezes pra ver se aparece duplicado.