RES: Exemplo programa de acesso a dll da Companytec para leitura do concentrador de bombas de combustível
Marcus GMail
Muito obrigado Eduardo !
Vou testar.
Na falta de solução via dll, usamos o protocolo via IP, com comandos próprios da Companytec e que funcionaram muito bem também.
Se alguém precisar, podemos fornecer exemplos.
Marcus
De: progre...@googlegroups.com [mailto:progre...@googlegroups.com] Em nome de Eduardo Joaquim
Enviada em: segunda-feira, 22 de fevereiro de 2016 20:01
Para: Progress - 4GL <progre...@googlegroups.com>
Assunto: Re: Exemplo programa de acesso a dll da Companytec para leitura do concentrador de bombas de combustivel
Boa tarde Marcus,
segue um exemplo, espero que seja útil para você e demais que consultarem este forum.
/* Para consultar AS funções disponíveis na biblioteca */
/* */
/* DLL Export Viewer v1.63 */
/* Web Site: http://www.nirsoft.net */
/* */
/* Exibe AS funções e parâmetros */
/* http://www.pe-explorer.com/peexplorer-tour-function-view.htm */
/* */
/* */
/* Documentação Da função obtido a partir da consulta no site da microsoft */
/* https://msdn.microsoft.com/pt-br/library/windows/desktop/ms645505%28v=vs.85%29.aspx */
/* */
/* */
/* Orientacao para apresentar valores nulos em bibliotecas externas */
/* https://documentation.progress.com/output/ua/OpenEdge_latest/index.html#page/dvpin/passing-the-unknown-value-and-null-values.html */
/* */
DEFINE VARIABLE Resultado AS INT NO-UNDO.
PROCEDURE MessageBoxA EXTERNAL "USER32.DLL":
DEFINE INPUT PARAMETER windowOwner AS LONG.
DEFINE INPUT PARAMETER Texto AS CHARACTER.
DEFINE INPUT PARAMETER Titulo AS CHARACTER.
DEFINE INPUT PARAMETER Botao AS LONG.
DEFINE RETURN PARAMETER ResultCode AS LONG.
END PROCEDURE.
RUN MessageBoxA (INPUT 0, INPUT 'Texto', INPUT 'Titulo', INPUT 0x00000001, OUTPUT Resultado).
CASE resultado:
WHEN 1 THEN DO:
DISP 'voce clicou em OK'.
END.
WHEN 2 THEN DO:
DISP 'voce clicou em cancel'.
END.
END CASE.
Em quinta-feira, 21 de janeiro de 2016 16:39:55 UTC-2, Marcus escreveu:
Olá,
Procuro por um exemplo de programa pra acesso a dll da Companytec, para leitura do concentrador de bombas de combustivel em Progress ABL/4GL.
Alguém tem ideia ?
Marcus
--
Você recebeu essa mensagem porque está inscrito no grupo "Progress - 4GL" dos Grupos do Google.
Para cancelar inscrição nesse grupo e parar de receber e-mails dele, envie um e-mail para progress_4gl...@googlegroups.com.
Para postar nesse grupo, envie um e-mail para progre...@googlegroups.com.
Acesse esse grupo em https://groups.google.com/group/progress_4gl.
Para mais opções, acesse https://groups.google.com/d/optout.