Código: Seleccionar todo
DECLARE FastQRCode IN "QRCodeLib.dll" String,String
DECLARE FullQRCode IN "QRCodeLib.dll" integer,integer,Long,Long,String,integer,integer,Integer,Integer,Integer,Integer,String
DECLARE String QRCodeLibVer IN "QRCodeLib.dll"
Tdata = "www_.validacfd.com"
FastQRCode("www_.validacfd.com", "c:\QRCode.bmp")
FullQRCode(.T.,.F.,RGB(255,255,255),RGB(0,0,0),Tdata,1,4,5,5,300,300,"c:\AlGusto.bmp")
MESSAGEBOX(QRCodeLibVer())