Tuesday, 28 December 2021

QR Text output x++

qrString        = strFmt("Supplier name: %1", CompanyInfo::findDataArea(_custInvoiceJour.DataAreaId).Name);

                qrString        += strFmt("\nSupplier VAT: %1", CompanyInfo::findDataArea(_custInvoiceJour.DataAreaId).CoRegNum);

                qrString        += strFmt("\nInvoice number: %1", _custInvoiceJour.InvoiceId);

                qrString        += strFmt("\nInvoice Date: %1", _custInvoiceJour.InvoiceDate);

                qrString        += strFmt("\nTotal amount with VAT: %1", _custInvoiceJour.InvoiceAmount);

                qrString        += strFmt("\nVAT amount: %1", _custInvoiceJour.SumTax);


public Bitmap getQR(String255 _qrString)

    {

        str                                 QrCodeBase64String;

        Microsoft.Dynamics.ApplicationSuite.QRCode.Encoder   qrCode;

        System.String                       netString;

        str                                 tempFileName;

        System.Drawing.Bitmap               netBitmap;

        Bitmap                              imageQR;

        FileIOPermission                    perm;

        BinData                             binData;

        container                           imageContainer;

        Str1260                             qrString;

        real                                taxWithoutVat;

        QRCodeGenerator qrGenerator = new QRCodeGenerator();


        qrCode          = new Microsoft.Dynamics.ApplicationSuite.QRCode.Encoder();

        

        netBitmap       = qrCode.Encode(_qrString);

        binData         = new binData();

        QrCodeBase64String  = _qrString;

        tempFileName        = qrCode.GetTempFile(QrCodeBase64String);

        perm  = new FileIOPermission(tempFileName,'RW');

        perm.assert();

        binData.loadFile(tempFileName);

        imageContainer          = binData.getData();


        return imageContainer;

    }


Use bitmap to display QR (Image/bmp) 

No comments:

Post a Comment