FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour create object y Ocx
Adolfo
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
create object y Ocx
Posted: Sun Apr 03, 2016 08:42 PM

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

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Sun Apr 03, 2016 08:49 PM

Prueba con "Date" en vez de "Fecha"

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

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Sun Apr 03, 2016 08:55 PM

Puedes inspeccionarlo con la utilidad que publiqué aqui:

viewtopic.php?p=144649#p144649

regards, saludos

Antonio Linares
www.fivetechsoft.com
Adolfo
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: create object y Ocx
Posted: Sun Apr 03, 2016 09:03 PM

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

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Sun Apr 03, 2016 09:11 PM

Prueba a pasarle valores distintos a AboutBox()

regards, saludos

Antonio Linares
www.fivetechsoft.com
Adolfo
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: create object y Ocx
Posted: Sun Apr 03, 2016 09:41 PM
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
;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 07:54 AM
Adolfo,

A mi me aparece este error al intentar registrarlo:

regards, saludos

Antonio Linares
www.fivetechsoft.com
Adolfo
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 11:31 AM

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.

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
armando.lagunas
Posts: 346
Joined: Mon Oct 05, 2009 03:35 PM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 12:51 PM

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

SkyPe: armando.lagunas@hotmail.com

Mail: armando.lagunas@gmail.com
Adolfo
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 01:18 PM

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

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 03:58 PM

Lo he intentado como indicas y sigue dando error

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 04:00 PM
regards, saludos

Antonio Linares
www.fivetechsoft.com
Adolfo
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 09:11 PM
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
;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 09:28 PM

Solo lo puedes usar con CreateObject()

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: create object y Ocx
Posted: Mon Apr 04, 2016 09:36 PM

Adolfo,

Revisa este ejemplo:

viewtopic.php?p=98762#p98762

regards, saludos

Antonio Linares
www.fivetechsoft.com
Static archive · New replies & topics via GitHub Discussions