PC Toledo

Baixei a SefazClass e tentei compilar o exemplo test da pasta tests e apresentou os seguintes erros:

c:/hb32/lib/win/mingw/libpng.a: error adding symbols: Malformed archive
collect2.exe: error: id returned 1 exit status
hbmk2[test]: erro: executando linkeditor. 1

Softwhouse escreveu:Baixei a SefazClass e tentei compilar o exemplo test da pasta tests e apresentou os seguintes erros:

c:/hb32/lib/win/mingw/libpng.a: error adding symbols: Malformed archive
collect2.exe: error: id returned 1 exit status
hbmk2[test]: erro: executando linkeditor. 1

Não tem a ver com a sefazclass, está avisando que a lib PNG, que é uma lib do Harbour pra imagem, está com defeito.

Vi alguma coisa sobre isso no harbour-users.

Ok, substituí o arquivo no harbour e compilou. Parece que esse problema no Harbour já vem de anos. Entretanto, só consigo fazer a movimentação no menu do aplicativo digitando os números, somente até a opção 9. Não conheço a biblioteca gráfica que usou, tem alguma coisa a ver com ela ?

Softwhouse escreveu:só consigo fazer a movimentação no menu do aplicativo digitando os números, somente até a opção 9. Não conheço a biblioteca gráfica que usou, tem alguma coisa a ver com ela ?

Quando diz aplicativo, se refere ao programa teste?
A sefazclass por si só não depende de biblioteca gráfica, e não modifica nada nesse sentido.

Sim, o programa test da pasta tests.

Código: Selecionar todos

...
      @ Row() + 1, 5 PROMPT Str( OPC_ENVIO_USUARIO, 2 )   + "-Envio de XML do usuário (disco)"
      @ Row() + 1, 5 PROMPT Str( OPC_MANIFESTACAO, 2 )    + "-Manifestacao Destinatario (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_DOWNLOAD_NFE, 2 )    + "-Download DFE (Documentos) (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_CERT_REMOVE, 2 )     + "-Remove Certificado"
      @ Row() + 1, 5 PROMPT Str( OPC_STATUSGERAL, 2 )     + "-Status Geral"
      MENU TO nOpc

É um menu bem básico, usando o PROMPT do Harbour.
Deveria funcionar com as setas.

Não funciona com as setas, somente digitando o numero, reconhece somente o primeiro dígito. Se teclar 10 vai para o 1, 11 idem, 20 vai para o dois.

Softwhouse escreveu: 20 vai para o dois.

Mas não existe digitação "20".
Só indo com setas mesmo.
Se entrar o mouse automático, seria clicar duas vezes na opção.

No código vai até a 24. Mouse não funciona.

Código: Selecionar todos

CLS
      @ Row() + 1, 5 PROMPT Str( OPC_DANFE, 2 )           + "-Teste Danfe (path atual)"
      @ Row() + 1, 5 PROMPT Str( OPC_CERTIFICADO, 2 )     + "-Seleciona certificado (atual=" + aVarList[ VAR_CERTIFICADO ] + ")"
      @ Row() + 1, 5 PROMPT Str( OPC_CERT_VALIDADE, 2 )   + "-Validade do certificado"
      @ Row() + 1, 5 PROMPT Str( OPC_UF, 2 )              + "-UF (atual=" + aVarList[ VAR_UF ] + ")"
      @ Row() + 1, 5 PROMPT Str( OPC_AMBIENTE, 2 )        + "-Ambiente (atual=" + iif( aVarList[ VAR_AMBIENTE ] == WS_AMBIENTE_PRODUCAO, "Produção", "Homologação" ) + ")"
      @ Row() + 1, 5 PROMPT Str( OPC_NFCE, 2 )            + "-Nota (atual=" + iif( aVarList[ VAR_NFCE ] == "S", "NFCE", "NFE" ) + ")"
      @ Row() + 1, 5 PROMPT Str( OPC_STATUS_NFE, 2 )      + "-Consulta Status NFE"
      @ Row() + 1, 5 PROMPT Str( OPC_STATUS_CTE, 2 )      + "-Consulta Status CTE"
      @ Row() + 1, 5 PROMPT Str( OPC_STATUS_MDFE, 2 )     + "-Consulta Status MDFE"
      @ Row() + 1, 5 PROMPT Str( OPC_CADASTRO, 2 )        + "-Consulta Cadastro NFE (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_PROTOCOLO_NFE, 2 )   + "-Protocolo NFE (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_PROTOCOLO_CTE, 2 )   + "-Protocolo CTE 3.00 (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_PROTOCOLO_MDFE, 2 )  + "-Protocolo MDFE 3.00 (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_DESTINADAS, 2 )      + "-Consulta Destinadas (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_VALIDA_XML, 2 )      + "-Valida XML (Basico) (disco)"
      @ Row() + 1, 5 PROMPT Str( OPC_ASSINA_TESTE, 2 )    + "-Assinatura - arquivo teste"
      @ Row() + 1, 5 PROMPT Str( OPC_ASSINA_USUARIO, 2 )  + "-Assinatura - arquivo do usuário (disco)"
      @ Row() + 1, 5 PROMPT Str( OPC_CONSULTA_RECIBO, 2 ) + "-Consulta Recibo - número do usuário"
      @ Row() + 1, 5 PROMPT Str( OPC_ENVIO_TESTE, 2 )     + "-Envio de XML de teste"
      @ Row() + 1, 5 PROMPT Str( OPC_ENVIO_USUARIO, 2 )   + "-Envio de XML do usuário (disco)"
      @ Row() + 1, 5 PROMPT Str( OPC_MANIFESTACAO, 2 )    + "-Manifestacao Destinatario (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_DOWNLOAD_NFE, 2 )    + "-Download DFE (Documentos) (digitado)"
      @ Row() + 1, 5 PROMPT Str( OPC_CERT_REMOVE, 2 )     + "-Remove Certificado"
      @ Row() + 1, 5 PROMPT Str( OPC_STATUSGERAL, 2 )     + "-Status Geral"
      MENU TO nOpc

Testei aqui, com setas funciona, compilado com Harbour 3.4.
E se nas propriedades da janela, DESMARCAR o modo de edição rápida, funciona o mouse.
É que senão o Windows usa o mouse pra copiar/colar partes da janela, e não repassa para o programa.

Se preferir, compile adicionando gtwvg.hbc, assim não depende da janela console.

Obrigado Quintas, adicionando a gtwvg.hbc funcionou, desabilitando o modo de exibição rápida não. Compilei com Harbour 3.2

PC Toledo

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass

Erro compilação SefazClass