create object y Ocx

[Adolfo]

Estimados...

Tengo un OCX de 32 bits que resgistre sin problemas en windows 64 bits

Try
xCtrl:=CreateObject(OCXSAM350.Ocxsam350Ctrl.1)
Catch
MsgAlert("Error de carga de controlador")
Return Nil
End

MsgAlert(ValType(xCtrl)) // Devuelve "O", correcto
// Aqui Todo Correcto

MsgAlert(xCtrl:Fecha) //-> WinOle 1007 error de argumento

xCtrl:AboutVox() //-> WinOle 1009 No exported Method


Segun Manuales los variables son FECHA,HORA, ESTADO....
Funciones serian, INIT, FINI, ABOUTBOX....
Si reviso su nombre en el editor de registro, esta bien, si reviso sus variables y funciones con OleView y OleBrow, hay coincidencia en nombres de variables y funciones, o sea todo correcto....

Y aqui estoy sin pillarle la vuelta, Cualquier consejo, ayuda sera bienvenida..

Gracias
Desde Chile
Adolfo

[Antonio Linares]

Prueba con "Date" en vez de "Fecha"

Escribiste AboutBox() con "v", o es al escribirlo en tu mensaje ?

[Antonio Linares]

Puedes inspeccionarlo con la utilidad que publiqué aqui:

viewtopic.php?p=144649#p144649

[Adolfo]

Gracias por la respuesta Antonio...

Si ya lo inspeccione con OleBrow...

SI, tenia un error de tipeo, ahora AboutBox, retorna el mismo error 1007, de error de argumento, a pesar que OleBrow dice :
STDCALL dispatch FUNX void AboutBox()

EL ocx fue creado en Chile, todos las variables estan en español.

Algun otro consejo..

Desde Chile
Adolfo

[Antonio Linares]

Prueba a pasarle valores distintos a AboutBox()

[Adolfo]

Probe con

AboutBox()
AboutBox("C")
AboutBox(1)
AboutBox(Chr(13))
AboutBox(Nil)

El mismo error... WinOle 1007 Argument Error:AboutBox

Y ni siquiera puedo obtener el codigo de estado del periferico que se encuentra en la variable ESTADO

Aqui el OCX https://dl.dropboxusercontent.com/u/26565274/ocxsam350.ocx

El nombre del OCX es "OCXSAM350.Ocxsam350Ctrl.1"
En los Win64 se copia en Windows/Syswow64, y se registra son REGSVR32 OCXSAM32, en consola con derechos de administrador
Por si alguien puede a lo menos obtener el valor de las variables o ejecutar el AboutBox

Gracias de antemano

Desde Chile
Adolfo

[Antonio Linares]

Adolfo,

A mi me aparece este error al intentar registrarlo:

[Adolfo]

Antonio...

La llamada al simbolo de sistema debe ser con derechos de administrador, es decir, ejecutar como administrador.

Si no sale ese error.

Probado en Win7 y win10, y lo registra sin problemas asi.

[armando.lagunas]

adolfo, puede que si o puede que no, pero te puede ayudar:

una vez registré un ocx en syswow64, pero también tuve que hacerlo en el system32, así que copia y registra tu ocx en system32, fue la única forma para que funcionara un programa hecho en otro lenguaje.

saludos

[Adolfo]

Tenia un bat que lo instalaba...

Revisandolo, esta copiado en Windows/system32 y en windows/syswow64, pero la llamada al regsvr32 se hace desde el directorio syswow64


copy ocxsam350.ocx c:\windows\system32
copy ocxsam350.ocx c:\windows\syswow64
cd c:\windows\syswow64
regsvr32 ocxsam350
echo FINALIZADO

No se si sera necesario, pero vale la pena intentarlo asi.
Boton derecho sobre el bat, ejecutar como administrador.

Desde Chile
Adolfo

[Antonio Linares]

Lo he intentado como indicas y sigue dando error

[Antonio Linares]

[Adolfo]

Lo he probado en 4 Pc's...
Windows Xp, Win7, win8.1, Win 10

Sin errores de instalacion, he aqui el lugar donde encontre la solucion al primer problema que tuve.

http://answers.microsoft.com/en-us/windows/forum/all/the-module-msinetocx-failed-to-load/7903439e-1af2-4a05-8883-73bb0bce3bd9?auth=1

Me parece extraño que no te funcione Antonio.
Con que mas puedo cargar un OCX aparte de createobject(), se puede transformar en LIB y llamarla desde adentro, porque al fin y al cabo un ocx es otra forma de DLL, o estoy muy equivocado.

Saludos y gracias nuevamente.

Desde Chile
Adolfo

[Antonio Linares]

Solo lo puedes usar con CreateObject()

[Antonio Linares]

Adolfo,

Revisa este ejemplo:

viewtopic.php?p=98762#p98762