Sure did. I will try it again, for fun.jassing wrote:did you create the lib as indicated before your 1st post?
** still no go **
I have the DLL, created the lib.. do I need to register the DLL or the lib .. ?
Sure did. I will try it again, for fun.jassing wrote:did you create the lib as indicated before your 1st post?
Thanks, it turns out that I was libbing a different version of the DLL than the one in that google docs download. Should be noted.applePi wrote:Hi
here is what i have done since i have beta 8 also and works okay.
1- download QrcodeXtra.7z from https://docs.google.com/leaf?id=0B_EW83 ... ist&num=50 mentioned above, you may need google chrome
2-and as jack said copy qrcodelib.dll to C:\PureBasic\Compilers and from prompt : polib qrcodelib.dll /machine:ix86 /out:qrcodelib.lib
so now the qrcodelib.dll and qrcodelib.lib in c:\purebasic\compilers folder.
3- edit the code above line 20 so it is:
ImportC "qrcodelib.lib"
instead of ImportC "..\Lib\qrcodelib.lib"
run it click on size
Code: Select all
ImportC "qrcodelib.lib"
QRcode_encodeString8bit(Text.p-ascii, Version.l, QRecLevel.l) As "_QRcode_encodeString8bit"
QRcode_free(*Qrcode.QRCode) As "_QRcode_free"
EndImport
Code: Select all
ImportC "D:\MyPB_pgms\QrCode\qrcodelib.lib"
QRcode_encodeString8bit(Text.p-ascii, Version.l, QRecLevel.l) As "_QRcode_encodeString8bit"
QRcode_free(*Qrcode.QRCode) As "_QRcode_free"
EndImport
Code: Select all
[ERROR] Invalid memory access. (read error at address 18446744073709551615)
Code: Select all
*Qrcode = QRcode_encodeString8bit(content, 0, EC_Level)
Sorry, I do not understand what you mean.loulou2522 wrote:Dige,
How can i integrate the swiss croos image at the center of the qrcode.
Thanks in advance
How can i owerwrite the generated image ? Please can you give me an example.infratec wrote:That's easy:
Create the QR code with highest 'errorlevel'.
This allows 30% damages.
Than you can overwrite the generated image with your logo.
(If it is not using more than 30% of the code)
But you have to test the readability
Code: Select all
If OpenWindow(0, 0, 0, 400, 100, "ImageGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
If LoadImage(0, #PB_Compiler_Home + "Examples\Sources\Data\PureBasicLogo.bmp")
If CreateImage(1, 80, 50, 24, #Red)
If StartDrawing(ImageOutput(0))
DrawImage(ImageID(1), 80, 15)
StopDrawing()
EndIf
EndIf
ImageGadget(0, 10, 10, 0, 0, ImageID(0))
EndIf
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf