New User? Sign Up  |  Sign In  |  Help
Barcode support and
tutorials from IDAutomation
and the community.
Click for the BBB Business Review of this Computers Hardware, Software & Services in Tampa FL
Resolved Questions Bookmark and Share
Brov84

Call Encode Function with Delphi (IDAutomationQRCODE.dll)

Good day,
I'm trying to use QR-Font and Encoder to generate a QR Code in Delphi.
But I'm not sure the correct syntax.

By referring to example in VB, I try to modify it to Delphi format to call the EncQR in IDAutomationQRCODE.DLL.

function EncQR(DataToEncode: AnsiString; ProcTilde: Integer; EncMode: Integer; Version: Integer; ErrorCorrectionLevel: Integer): AnsiString;
stdcall;external 'c: IDAutomationQRCODE.dll';

During the compiling, i receive an error "The procedure entry point EncQR not be located in dynamic library".
Can you give me some advise? what is the proper way to work with in Delphi?

Thank you very much.

Regards,

Operating System: Windows 7

Application: Delphi XE3

08-22-13     2219 day(s) ago    

  Report Abuse

 

Brov84

Best Answer

I solve the problem. I imported the Type Library(installed with the package of IDAutomation on the pc) with Delphi with the wizard, and then you can create a Package Library.

After that use the code below:


procedure TfMain.btnConvertiClick(Sender: TObject);
var
qrCode: TQRCode;
begin
qrCode := TQRCode.Create(Self);
sData := 'http://www.test.it/prodotti/tattoo-e-trasferibili/';
iTilde := 1;
iEncodeMode := 0;
iVersion := 0;
iErrConLev := 2;
qrCode.FontEncode(sData,iTilde,iEncodeMode,iVersion,iErrConLev,sReturn);
txtRisultatoCodifica.Lines.Text := sReturn;
end;

Posted 2218 day(s) ago

()
()
  Report Abuse
 
Find Interesting
 
Email to Others
 
Bookmark
 
Subscribe to Answer Alert
No comments yet.     Be the first to comment.
Other Answers (1)

Ben
Unfortunately, IDAutomation cannot support our components within Delphi. However, we can present information that may help guide you to a possible solution.


Though I am not sure if this is completely related but the error message might have a solution on Microsoft's knowledge base.

Posted 2218 day(s) ago

()
()
   Report Abuse
Email this question link to friends
You must enter an email address, if name is entered or vice-versa for each friend.
Friend #1 -
Friend #2 -
Friend #3 -
Friend #4 -
Friend #5 -
  Your comment on this question
  |         |  
bold  italic  underline  strike       big  small       superscript  subscript 
  Allows to add a link. Added links would only be converted to actual clickable link, when the domain of the link is white-listed by administrator.
Caption :
Link URL :
(Must starts with "http://")
Add  |   Cancel
  Allow to insert an image. Must be among the following file types - *.jpg, *.gif, *.png & *.bmp.
Image Url :   Upload New
(Image url must always starts with " http:// ")
Width : pixels
(Must not be greater than 450px. Enter 0px for no resize)
Add  |   Cancel
  Allow to insert YouTube video. Insert the video embed code.
Embed Code :
Add  |   Cancel
Up to 5000 Characters are allowed. Current Count: 0
  Your comment on this answer
  |         |  
bold  italic  underline  strike       big  small       superscript  subscript 
  Allow you to add a link. Added links would only be converted to actual clickable link, when the domain of the link is white-listed by administrator.
Caption :
Link URL :
(Must start with "http://" or "https://")
Add  |   Cancel
  Allow to insert an image. Must be among the following file types - *.jpg, *.gif, *.png & *.bmp.
Image Url :   Upload New
(Image url must always start with "http://" or "https://")
Width : pixels
(Must not be greater than 450px. Enter 0px for no resize)
Add  |   Cancel
  Allow to insert YouTube video. Insert the video embed code.
Embed Code :
Add  |   Cancel
Up to 5000 characters are allowed. Current Count: 0

You may answer and comment on any thread according to the Terms and Conditions.

 © Copyright 2019 IDAutomation.com, Inc., All Rights Reserved. Legal Notices.

 Barcode Fonts | Components | Scanners | Support | Contact Us
Training Videos on YouTube Join us on Google Plus Join us on LinkedIn Follow us on Twitter Like us on Facebook