Page 1 of 1

activeX Error

PostPosted: Wed Sep 20, 2006 10:31 pm
by tomafa
Tengo la siguiente duda por que me sale el error, con la libreria activeX
Error: 'C:\ACTIVEX.LIB' contains invalid OMF record, type 0x21 (possibly COFF),

PostPosted: Thu Sep 21, 2006 12:50 pm
by Antonio Linares
Porque esa librería es para Microsoft ó PellesC, pero no para Borland. Borland usa formato OMF, no COFF.

PostPosted: Thu Sep 21, 2006 2:06 pm
by tomafa
entonces que hago para poder interactuar con control que tengo Activex para ejecutarlo en mi programa utilizo fwh y harbour, alguna sugerencia
gracias....

PostPosted: Thu Sep 21, 2006 4:21 pm
by Antonio Linares
FWH soporta controles ActiveX, con eventos, desde la versión 2.7 marzo 2006. No hace falta ninguna librería adicional.

PostPosted: Thu Sep 21, 2006 6:01 pm
by tomafa
gracias por tu respuesta, pero que estoy haciendo mal, te muestro parte del codigo

DEFINE WINDOW oWnd

cCaption := "Esta es una Prueba...."

MyFrame := TActiveX():New( oWnd, "MyFramePanel.MyFrame" )
MyFrame:nTop := 10
MyFrame:nWidth := 250
MyFrame:nLeft := 80
MyFrame:nHeight := 200

MyFrame:Do( "Caption", cCaption )

si quito la linea marcada, me corre el programa, pero al colocar la linea, no me hace nada, lo hecho de mil formas, y no se que estoy haciendo mal, no tengas un ejemplo, utilizo verce para compilar, que estoy haciendo mal, gracias....

Antonio

PostPosted: Thu Sep 21, 2006 8:04 pm
by Antonio Linares
Prueba con MyFrame:SetProp( "Caption", cCaption )

PostPosted: Thu Sep 21, 2006 10:20 pm
by tomafa
hice lo que me indicaste, me genera el ejecutable, pero no pasa nada y si quieres te paso la OCX y el programa indicame cono lo subo y te lo paso, llevo esta semana tratando de ejecutar esta aplicacion y no veo resultados espero exista la solucion....




Antonio Díaz

Saludos y Gracias por tu respuesta

PostPosted: Fri Sep 22, 2006 3:36 am
by Antonio Linares
Antonio,

Que OCX es ?

PostPosted: Fri Sep 22, 2006 2:15 pm
by tomafa
jcFrame.ocx esta es la libreria dime como la subo o te la mando a tu correo,

gracias por tu apoyo


Antonio[/b]

PostPosted: Fri Sep 22, 2006 3:13 pm
by Antonio Linares
Antonio,

No nos envies nada de momento, gracias. Tienes la documentación de ese OCX ? Algún ejemplo de uso ?

PostPosted: Fri Sep 22, 2006 4:40 pm
by tomafa
la documentacion como tal, no la tengo, pero conosco las propiedades y los metodos de la libreria, estuve haciendo pruebas, lo que encontre es que instale una version más reciente de harbour, no se que hice, pero me esta ejecutando el programa, solo que el problema es que lo quiero hacer por medio de un dialogo y este no me despleja el control que esta pasando en una ventana normal si me despleja el control pero en un dialogo no.


saludos

PostPosted: Fri Sep 22, 2006 5:36 pm
by Antonio Linares
Pon aquí el código que estás usando para crearlo en el diálogo.

PostPosted: Fri Sep 22, 2006 6:14 pm
by tomafa
DEFINE DIALOG odlg TITLE "PRUEBA ACTIVEX"

oAgentS:= TActiveX():New( odlg, "MyFramePanel.MyFrame" )

oAgentS:nTop := 10
oAgentS:nWidth := 250
oAgentS:nLeft := 80
oAgentS:nHeight := 200

oAgentS:SetProp( "Caption" , "Litio" )
oAgentS:SetProp( "Font" , aFont )
oAgentS:SetProp( "Appearance" , 5 )
oAgentS:SetProp( "CaptionEffect", 1 )

ACTIVATE DIALOG odlg
este es el ejemplo, una pregunta, como puedo manipular las font del objeto, si al desplejar con un ?msgstop( oAgentS:getProp( "font"), aparece como objeto y quiero cambiar el tamano, y el tipo de letra, este es el codigo como creo con dialogo, pero no me hace nada, con windows si me lo ejecuta.

Saludos Antonio Díaz


)

PostPosted: Fri Sep 22, 2006 7:13 pm
by tomafa
Antonio:


en donde puedo encontrar la classe tactivex.prg


saludos


Antonio Díaz

PostPosted: Fri Sep 22, 2006 10:07 pm
by Antonio Linares
En FWH a partir de FWH 2.7