1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
  2. Anuncie Aqui
    Anuncie aqui você Também: fdantas@4each.com.br

Duvida Leitura de DLL

Discussão em 'Progress 4GL' iniciado por fernandofarah, Maio 21, 2015.

  1. fernandofarah

    fernandofarah Membro Participativo

    Bom dia.

    Alguém tem um exemplo de como ler dll para capturar peso de uma balança?
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Qual seria essa DLL ?
  3. rhemati

    rhemati Membro Participativo

  4. fernandofarah

    fernandofarah Membro Participativo

    Pois é.. Eu estou esperando o envio do fornecedor a dll para comunicação. Pensei em ver um exemplo, para ter uma ideia
  5. fernandofarah

    fernandofarah Membro Participativo

    Será feito via serial da máquina, alguém tem algum exemplo?
  6. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    Se for uma porta serial direto no equipamento ......
    Código:
        define input  parameter serial      as character   no-undo.
        define input  parameter delimitador as character   no-undo.
        define output parameter linha       as character   no-undo.
    
        define variable contador as integer     no-undo.
    
        define stream portaCom.
    
        input stream portaCom from value(serial).
        assign linha    = ''
               contador = 0.
    
        repeat:
            readkey stream portaCom pause 1.
            assign linha = linha + chr(lastkey).
            if chr(lastkey) = delimitador then leave.
    
            assign contador = contador + 1.
            if contador > 30 then do:
                assign linha = 'NA'.
                leave.
            end.
        end.
        input stream portaCom close.
    
    rlfritz curtiu isso.

Compartilhe esta Página