QRCODE no Damdfe

[marcelojsilva]

Bom Dia!

Estou imprimindo o Qrcode no Damdfe da MDFe usando a dica aqui no forum

Porém no manual : Para o QR Code do DAMDFE será utilizado Nível M. Quando usa a linha 'destacada', não consigo mais ler o Qrcode;

Como vcs estão tratando essa questão?

procedure TFrEmisMDFE.QrCodeToCanvas(AWidth, AHeight: Integer; ATexto:String; ACanvas: TCanvas);
var
  bitmap: TBitmap;
  qr: TDelphiZXingQRCode;
  r: Integer;
  Integer;
  scala: Double;
begin
  bitmap := TBitmap.create;
  try
    qr := TDelphiZXingQRCode.create;
    try
      qr.CorrectionLevel:= qrclM;
      qr.QuietZone:= 1;
      qr.Data := WideString(ATexto);
      // ajuta o tamanho do bitmap para o tamanho do qrcode
//      bitmap.SetSize(qr.Rows, qr.Columns);
      bitmap.Width:= qr.Columns;
      bitmap.Height:= qr.Rows;
      // copia o qrcode para o bitmap
      for r := 0 to qr.Rows - 1 do
        for c := 0 to qr.Columns - 1 do
          if qr.IsBlack[r, c] then
            bitmap.Canvas.Pixels[c, r] := clBlack
          else
            bitmap.Canvas.Pixels[c, r] := clWhite;

      // prepara para redimensionar o qrcode para o tamanho do canvas
      if (AWidth < bitmap.Height) then
      begin
        scala := AWidth / bitmap.Width;
      end
      else
      begin
        scala := AHeight / bitmap.Height;
      end;

      // transfere o bitmap para a imagem
      ACanvas.StretchDraw(Rect(0, 0, Trunc(scala * bitmap.Width),
        Trunc(scala * bitmap.Height)), bitmap);

    finally
      qr.Free;
    end;
  finally
    bitmap.Free;
  end;
end;

[Italo Giurizzato Junior]

Bom dia Marcelo,

Da forma que foi implementando sem essa modificação funciona ou ocorre algum erro?

[marcelojsilva]

Boa tarde, Italo!

Funciona sim, mas no manual da MDFe tem uma observação :

Para o QR Code do DAMDFE será utilizado Nível M.

O código implementado está no nivel L

Podemos deixar com foi implementado?

[Italo Giurizzato Junior]

Boa tarde Marcelo,

Ao mudar para o nível M ao gerar o QR-Code, conforme eu entendi a leitura do QR-Code não funciona.

Por outro lado se deixar do jeito que foi implementado, a leitura do QR-Code funciona sem nenhum problema.

Logo podemos concluir que não devemos alterar para o nível M.

A não ser que as pessoas incumbidas de realizar a fiscalização vão utilizar algum aplicativo capaz de ler o QR-Code gerado com nível M.

[marcelojsilva]

Vc entendeu certo, é isso mesmo!

Então vamos deixar do jeito que está, pois acredito que não deve fazer diferença para leitura do QrCode.

Obrigado!

[Italo Giurizzato Junior]

Obrigado por reportar.

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