Qrcode Quickreport

[analista.edilson]

Bom dia a todos.

 

Estou gerando meu QRCode da NFC-e no quickreport 3.6 pro e delphi 7, porem estou utilizando uma API da google, ou seja, só funciona em maquinas que tem acesso a internet, preciso gerar a imagem do QRCode da NFC-e em maquinas que não tem acesso a internet.

 

Alguem tem uma sugestão que não seja parar de usar o quickrep?

 

Agradeço desde já.

 

 

 

[Juliomar Marchetti]

Bom dia

Acho que o italo já implementou isso usando uma unit que foi incorporado ao projeto pra gerar o QRCode

Atualize o svn e teste novamente e confere a alteração que ele fez!

[analista.edilson]

Valeu pela ajuda, porem encontrei uma solução em um projeto opensource "Quricol", funcionou perfeito.

Editado 14 Abril, 2014 por analista.edilson

[analista.edilson]

Observação tive que fazer algumas adaptações para funcionar com delphi7

[AMOliveira]

Legal Edilson, poderia disponibilizar para o grupo?

[Juliomar Marchetti]

Boa tarde

Vocês chegaram a conferir o esforço que o Italo fez e adicionou o mesmo a emissão em QuickReport?

após atualizar deve ser recompilado os pacotes!!

mesmo assim se quiserem conferir olhe na pasta trunk/Fontes/ACBrNFe2 o arquivo ACBrNFeDANFeQRNFCe.pas

 

veja na linha 762 pra frente 

procedure TfqrDANFeQRNFCe.qrb08_QRCodeBeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
var
 QRCodeBitmap: TBitmap;
 QRCode: TDelphiZXingQRCode;
 Row, Column: Integer;
 Scale: Double;
 cDest, sURL: String;
begin
  inherited;

//  PrintBand := QRNFe.PageNumber = 1;

  QRCodeBitmap := TBitmap.Create;
  try
    QRCode := TDelphiZXingQRCode.Create;
    try
      if FNFe.Dest.idEstrangeiro <> ''
       then cDest := FNFe.Dest.idEstrangeiro
       else cDest := FNFe.Dest.CNPJCPF;
...

[AMOliveira]

Ok valew

[FabricioMedeiros]

Boa tarde Juliomar,

você sabe me informar se tem algum lugar que eu ainda consiga baixar os fontes do Trunk 1 do ACBr ?

Estou precisando de um exemplo de geração do QrCode no QuickReport e vi que você mencionou acima que no trunk/Fontes/ACBrNFe2 tem um exemplo.

Eu até procurei no google pra ver se achava esse repositório antigo do ACBr mas não encontrei.

[Juliomar Marchetti]

No mesmo SVN, basta tu voltar a revision da epocá que vai baixar os fontes do dia.

[FabricioMedeiros]

1 minuto atrás, Juliomar Marchetti disse:

No mesmo SVN, basta tu voltar a revision da epocá que vai baixar os fontes do dia.

Muito obrigado!

[BigWings]

21 minutos atrás, FabricioMedeiros disse:

você sabe me informar se tem algum lugar que eu ainda consiga baixar os fontes do Trunk 1 do ACBr ?

https://svn.code.sf.net/p/acbr/code/tags/ACBrTrunk2015

[FabricioMedeiros]

17 minutos atrás, BigWings disse:

https://svn.code.sf.net/p/acbr/code/tags/ACBrTrunk2015

Muito obrigado!

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.