Error al usar la funcion VersionLib (COVE) con VB6

[tostinni]

Hola,
Cree un pequeño ejemplo de codigo para probar la version de demo del COVE.

Código: Seleccionar todo

Private Declare Function VersionLib Lib "COVELib.dll" () As String
Private Sub cmdVersion_Click()
   MsgBox VersionLib
End Sub


Desgraciadamente al ejecutarse envia un error de aplicacion:

La instruccion en "0x046107f4" hace referencia a la memoria en "0x00000000. La memoria no se puede "written"

Y se cierra todo el programa.
Alguien encontro y resolvio algo asi ?

Estoy programando en VB6 sobre Win2000 o WinXP.

Saludos

[Dado]

Veamos, hice una compilacion especial para ver si me ayudas a revisar si esto ya funciona.

Haz la misma prueba de tratar de leer la version de la libreria.

Me informas de dos resultados porfavor.

- Si truena o no el programa

- Que cadena es la que muestra el mensaje de version

[tostinni]

Con esta no truena pero me reenvia una cadena vacia.

Saludos

[Dado]

Con esta no truena pero me reenvia una cadena vacia.

Saludos

Bueno, marcador 1-1 (un error corregido y nos falta otro je je je)

Aqui te incluyo otra compilacion, porfavor prueba de nuevo, hago lo mejor para que ya quede lista y te pueda funcionar. Gracias.

NO HAER CASO A ESTA NOTA es solo para recordar como lo compile......function VersionLib : PChar Result := PChar('COVELib V1.1 - DEMO');

[tostinni]

Muchas gracias por tus esfuerzos, esta version tambien me reenvia cadena vacia, de hecho con tu programa de prueba tambien

Saludos

[Dado]

Pues se me agotaron las ideas, asi que contacte a un colega que sabe de Visual Basic y me dijo que te dijera "que uses la referencia ByVal"

La verdad no le entendi, una disculpa pero yo nunca he programado en Visual Basic, pero literalmente me dijo "tu dile que lo use ByVal y que con eso debe funcionar"

Hasta me da pena darte una asesoria asi, pero espero que tu entiendas mas de lo que trato de decirme este cuate............te servira de algo? prueba con todas las dll

[tostinni]

ByVal sirve para mencionar que pasas un parametro por valor al contrario de ByRef que es lo que toma VB por defecto.
No veo como utilizar esto ya que tu funcion VersionLib no usa parametros, pero bueno sigo con mi desarollo aver como me va con la nueva version del COVE.

Saludos y muchas gracias por tus esfuerzos.