Mensajes

ya pero como te comenté lo que pretendo usar es obtener el stream, no el archivo.

Private Declare Sub GetPngStream _
                Lib "Resources\quricol32.dll" _
                Alias "GetPNGW"

esta "quricol32.dll" si que funciona, no como la dll anterior, no obstante esta dll solamente codifica, no decodifica imágenes con código QR...

No obstante muy buen ejemplo.

ya pero como te comenté lo que pretendo usar es obtener el stream, no el archivo.

Private Declare Sub GetPngStream _
                Lib "Resources\quricol32.dll" _
                Alias "GetPNGW"

No obstante muy buen ejemplo.

amigo, ante la  imposibilidad de hacerlo funcionar, he optado pro usar esta otra dll para codificar texto a QR. Dede archivo  lo he conseguido pero la dll tiene una función llamada 'GetPNGW' o 'GetBitmapW' que no sé bien como usar desde vb6.

La dll se llama 'quricol32.dll', se habla de ella aquí:

https://perevoznyk.wordpress.com/2013/09/11/quricol-2-0-qr-code-generator/

http://delphi32.blogspot.com.es/2011/11/quricol-qr-code-generator-library.html

a ver si me puedes ayudar. Lo que pretendo es obtener el bitmap, no es archivo, y procesarla por medio de GDI+. No sé bien como llamar a esa función y como manejar el resultado.

Estoy intentando con 'GetPNGW' y para empezar no tengo claro como declarar la llamada:

Código [Seleccionar] Expandir


Private Declare Sub GetPngStream _
                Lib "Resources\quricol32.dll" _
                Alias "GetPNGW" ( _
                ByVal Stream As variant, _
                ByVal text As String, _
                ByVal Margin As Integer, _
                ByVal PixelSize As Integer)


concretamente el parámetro Stream...

si, puedo compilar otros sources. No sé lo que pasa para que no funcione, pero tienen que ser bien raro....

el problema no puede estar en nesa 'stdole2.tlb'. En todos los proyectos que tengo, está como referencia. Y la dll la registro con el comando que este source trae. Esta dll no funciona en mi windows 8.1 x64, pero por qué ¿?

amigo, todo lo que has dicho coincide y está bien. Esa stdole.tlb está en...

Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation

y está en el registro tal y como has dicho. Lo he vuelto a hacer todo de nuevo. Y sale el mismo error tanto al encode como al usar decode. No me lo explico !

claro que hice lo del 'regasm'. Y cada vez que lo he  hecho, el comando dice que ha registrado la dll correctamente. Pero luego  al rular el código vb6, da error, leyendo y codificando. No me lo explico !
Mira, estoy usando windows 8.1 x64, no sé si tendrá algo que ver en esto...
de todas maneras, podrías  compilar el código que te funciona y enviarlo, más que nada para probar a ver...

al usar regasm, el resultado es este:

Código [Seleccionar] Expandir


Z:\qrcode\QRCodeVB6\lib>Regasm ThoughtWorks.QRCode.dll /tlb: ThoughtWorks.QRCode
.tlb /codebase
Microsoft (R) .NET Framework Assembly Registration Utility 2.0.50727.4927
Copyright (C) Microsoft Corporation 1998-2004.  All rights reserved.

RegAsm : warning RA0000 : Registering an unsigned assembly with /codebase can ca
use your assembly to interfere with other applications that may be installed on
the same computer. The /codebase switch is intended to be used only with signed
assemblies. Please give your assembly a strong name and re-register it.
Types registered successfully
El exportador de la biblioteca de tipos detectó una advertencia al procesar 'Tho
ughtWorks.QRCode.Codec.Util.DebugCanvas.drawMatrix(matrix), ThoughtWorks.QRCode'
. Advertencia: No se admite el cálculo para matrices anidadas.
Assembly exported to 'Z:\qrcode\QRCodeVB6\lib\ThoughtWorks.QRCode.tlb', and the
type library was registered successfully

Z:\qrcode\QRCodeVB6\lib>pause
Presione una tecla para continuar . . .


editado: mira esta la captura del error que da programa al darle al botón 'encode'.


la linea del código donde da el error es esta:

picEncode.Picture = qrEncoder.EncodeVB6(txtEncodeData.Text)

Cómo es posible que te funcione a ti ?

pero amigo, lo que me interesa está en la carpeta QRcodeVB6.
en el artículo del sitio que comenté el que lo ha creado habla de unas modificaciones que hizo a la dll en c# para poder usar dicha dll desde vb6. Y ese es el problema, yo no consigo que funcione. Y ello pese a que he seguido todas las indicaciones del citado artículo...

he subido el archivo rar a mega.. https://mega.nz/#!cxhiBYBY!OXBO6LCPh9MH6Vg0drmLaQ6X5AaUg4NpeYwrxCMltNI

de todas maneras lo curioso de todo esto del QR.. he encontrado varias dlls que puedo usar, pero joder, ninguna permite la decodificación, o sea, solamente generan imágenes qr un ejemplo es la famosa qrcodelib.dll

No sé, tal vez alguno de vosotros sepa de alguna dll, o de algún class específico para vb6 que pudiese yo usar para generar y leer códigos qr localmente ?

amigos quiero hacer  un programita para codificar y decodificar códigos QR. He visto dlls y cosas por ahí, pero casi ninguna permite decodificar, o sea leer.
Sin embargo he encontrado esta información, y pese a que parece que debería funcionar, pues no lo hace.

Tal vez algún experto de los que andan por aquí sabría  decir por qué no funciona ? y dónde  está el error.

http://coding4ever.net/blog/2012/06/01/menggunakan-library-net-di-vb-6/

aquí está el proyecto que compartió... http://www.4shared.com/file/PCRQSJzV/QRCode.html

gracias por adelantando

ese es el problema, la zona de memoria está en la .rdata. Me pregunto si programáticamente se puede hacer esa zona RW