如何使用ZXing找出二维码方向？

Question

我正在使用VCL 和 Delphi Rio从Spelt/ZXing.Delphi使用 ZXing 移植 Delphi

我正在使用快速富士通扫描仪扫描文档，实际上是收据。这是一个巨大的数量。

问题是，除了纸张的方向之外，ZXing 总是读取上面的二维码（这完全没问题）。

但是，出于存档目的，最好将文档保存在正确的水平位置。

这是我用来获取 qrcode 值的代码：

function TFormMain.DecodificaQRCodeImagemScanneada(ImagemScanneada: TBitmap): String;
var
  scanBitmap: TBitmap;
  ResultadoLeitura: TReadResult;
  ScanManager: TScanManager;
begin
  result := '';
  try
      ScanManager := TScanManager.Create(TBarcodeFormat.Auto, nil);
      scanBitmap := TBitmap.Create;
      scanBitmap.Assign(ImagemScanneada);
      ResultadoLeitura := nil;
      ResultadoLeitura := ScanManager.Scan(scanBitmap);
      if (ResultadoLeitura <> nil) then
      begin
        result :=  ResultadoLeitura.Text;
      end;
  finally
    ResultadoLeitura.Free;
    scanBitmap.Free;
    ScanManager.Free;
  end;
end;

我想知道是否有办法获取二维码的方向，将其用作扫描收据位置的指示器。因此我可以旋转位图并使所有收据以相同的方式定向。