FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Nueva Clase TActiveX en FWH 12.06
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Nueva Clase TActiveX en FWH 12.06
Posted: Fri Jun 29, 2012 10:33 AM

Hemos implementado una nueva Clase TActiveX en FWH 12.06 que debe resolver algunos problemas con Harbour.

Confiamos en publicarla este fin de semana :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Sun Jul 01, 2012 11:07 AM
Hola Antonio,

Por favor, 驴podr铆as comprobar si este c贸digo funcioan con FW 12.06?.

Ahora mismo funciona correctamente.

Code (fw): Select all Collapse
#include "fivewin.ch"



FUNCTION main()


  local cUrl := "https://www.google.es/"
  local cParams := "#hl=es&gs_nf=1&cp=5&gs_id=m&xhr=t&q=fivewin&pf=p&biw=1024&bih=502&sclient=psy-ab&oq=fivew&gs_l=&pbx=1&bav=on.2,or.r_gc.r_pw.r_cp.r_qf.,cf.osb&fp=531bac45c1a76a40"


  NavegadorWeb( "Titulo Ventana", cUrl, cParams )



RETURN NIL
// ------------------------------------------------------------------------




// ---------------------------------------------------------------------------
FUNCTION NavegadorWeb( cTituloVentana, cServidor, cParametros )


 LOCAL oDlg, oActiveX, lSave := .F.




 // Evito TAB
 //SetKey(VK_TAB, { || Nil })




 DEFINE DIALOG oDlg RESOURCE "NAVEGADORWEB" TITLE cTituloVentana


   REDEFINE ACTIVEX oActiveX ID 201 OF oDlg PROGID "Shell.Explorer"


   REDEFINE BUTTON ID 101 OF oDlg  ACTION( oActiveX:Do( "ExecWB", 6, 1 ) )
   REDEFINE BUTTON ID 102 OF oDlg  ACTION( lSave := .T., oDlg:End() )
   REDEFINE BUTTON ID 103 OF oDlg  ACTION( msgalert("Ayuda") )




   ACTIVATE DIALOG oDlg CENTERED ;
      ON INIT oActiveX:Do( "Navigate2", cServidor + cParametros )



Return nil
// ---------------------------------------------------------------------------



rc:

Code (fw): Select all Collapse
NAVEGADORWEB DIALOG -1, -27, 501, 310
STYLE 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_TABSTOP
CAPTION "FOLDER"
FONT 8, "MS Sans Serif"
{
 CONTROL "", 201, "TActiveX", 0 | WS_CHILD | WS_VISIBLE, 9, 6, 482, 269
 PUSHBUTTON "&Imprimir", 101, 314, 284, 54, 14
 PUSHBUTTON "&Salir", 102, 377, 284, 54, 14
 PUSHBUTTON "&Ayuda", 103, 439, 284, 54, 14
}



Muchas gracias.
Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Sun Jul 01, 2012 11:10 AM
Te lo subo tambi茅n a Internet:

http://ul.to/8cdvshc7


El foro cambia el c贸digo de
oActiveX:Do
por oActiveX:Do
Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Mon Jul 02, 2012 10:45 AM

Hola Antonio,

Por favor, 驴lo has podido verificar?.

Muchas gracias,

Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Mon Jul 02, 2012 12:41 PM

Lucas,

Aun estamos haciendo pruebas. Nos falta completar algunos m茅todos.

En FWH 12.06 vamos a incluir la anterior clase TActiveX, que funciona muy bien, y la nueva THActiveX que puede solucionar algunos problemas que pueden presentarse ocasionalmente.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Mon Jul 02, 2012 01:36 PM

Antonio,

Estupendo, creo que es la mejor decisi贸n.

Por cierto, 驴para cu谩ndo estar谩 disponible FW 12.06?.
Un saludo,

Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Mon Jul 02, 2012 06:28 PM

Hemos incluido un ejemplo completo del uso del scheduler de CodeJock y estamos finalizando las pruebas con la versi贸n demo de CodeJock y listo, publicaremos la 12.06 :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 07:48 AM

Antonio,

Por favor, 驴podr铆ais tambi茅n adjuntar la dll de la trial version de Codejock?.

Muchas gracias.

Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 09:07 AM

El problema es que con la versi贸n de pruebas no funciona, posiblemente porque indicamos mal la licencia demo.

Con la versi贸n comercial y su licencia, funciona correctamente :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 09:34 AM

Antonio,

En la versi贸n demo no hay que indicarle ning煤n c贸digo.

Hay que registrar la DLL y da 30 d铆as de evaluaci贸n. Y salta siempre el aviso al inicio de que es una demo.

驴Se puede poner el calendario en Castellano?.

Muchas gracias.

Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 09:57 AM

Lucas,

Asi es como funciona con la versi贸n comercial:

CreateObject( "CodeJock.CalendarGlobalSettings.15.0.1" )

Qye cadena hay que usar para la versi贸n demo ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 10:52 AM
Antonio,

Creo que el OCX de la demo es distinto:

"15.0.1")


Hay que ajustar eso a la versi贸n demo disponible.
Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 10:59 AM

Esa es la cuesti贸n, cual ? :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 11:09 AM

Antonio,

Cuando se registra un .ocx con regserver32. 驴c贸mo se ven los instalados en el sistema?.

Muchas gracias.

Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nueva Clase TActiveX en FWH 12.06
Posted: Tue Jul 03, 2012 11:12 AM

Si tienes instalado Office (yo no lo uso, uso Google Docs) puedes entrar en el entorno de programaci贸n y desde ahi puedes revisarlos

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion