FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour FiveWin con xHarbour Comercial + GTWVW
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
FiveWin con xHarbour Comercial + GTWVW
Posted: Fri Jul 09, 2010 10:54 AM

Hola Antonio,

Tengo el programa rodando en xHarbour Commercial con la libreria grafica GTWVW, seria posible abrir ventanas de FiveWin dentro del programa ?

Muchas Gracias.
Pere Cordonet

Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Fri Jul 09, 2010 05:13 PM

Pere,

FWH no depende de ninguna librer铆a GT, por lo que deber铆as poder usarlo conjuntamente con tu aplicaci贸n.

Lo 煤nico a tener en cuenta es que cuando se cierra la primera ventana creada en FWH, FWH entiende que quieres salir de la aplicaci贸n. EN todo caso, tendrias que crear una primera ventana con DEFINE WINDOW oWnd aunque no llegases a mostrarla con ACTIVATE WINDOW oWnd. Pru茅balo

regards, saludos

Antonio Linares
www.fivetechsoft.com
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Mon Jul 12, 2010 05:29 PM
Muchas gracias, por responder.

Tengo un problema al momento de Linkar el programa:

Me sale este error.

xLINK: error: Unresolved external symbol '?hb_oleVariantToItem@@YAJPAU_HB_ITEM@@PAUtagVARIANT@@@Z referenced from Fivehcm.lib(ACTX.obj)'.

Buscando por el foro he visto que se podia solucionar con este post:
http://forums.fivetechsupport.com/viewtopic.php?f=6&t=16792&p=87166&hilit=hb_oleVariantToItem#p87166

Pero despu茅s de linkar otra vez, sale este otro:

G:\Clients\GENXHB\FUNC_C\DFTsClient.C(626): error: Missing name for parameter 1 to function 'hb_oleVariantToItem'.
G:\Clients\GENXHB\FUNC_C\DFTsClient.C(626): error: Missing name for parameter 2 to function 'hb_oleVariantToItem'.

Despu茅s he probado de poner nombre en el primer y segundo parametro ejemplo a y b.
Code (fw): Select all Collapse
int hb_oleVariantToItem( void *a, void *b )
{
聽 聽return 0;
}


Otra vez sale este error:

xLINK: error: Unresolved external symbol '?hb_oleVariantToItem@@YAJPAU_HB_ITEM@@PAUtagVARIANT@@@Z referenced from Fivehcm.lib(ACTX.obj)'.

Puedo hacer otra cosa?

Muchas gracias.
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Mon Jul 12, 2010 06:14 PM
Pere,

La funci贸n ser铆a as铆:
Code (fw): Select all Collapse
HRESULT hb_oleVariantToItem( PHB_ITEM pi, VARIANT * pv )
{
   return S_OK;
}
regards, saludos

Antonio Linares
www.fivetechsoft.com
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Tue Jul 13, 2010 06:49 AM
Buenos dias Antonio,

He creado un archivo llamado FuncFive.C con el siguiente contenido:
Code (fw): Select all Collapse
#pragma BEGINDUMP

#include <windows.h>
#include <hbapi.h>

HRESULT hb_oleVariantToItem( PHB_ITEM pi, VARIANT * pv )
{
聽 聽return S_OK;
}

#pragma ENDDUMP


Lo he a帽adido en el proyecto y he recompliado todo el proyecto, me da el siguiente error:
Code (fw): Select all Collapse
Type: C >>>xcc.exe -Fo"I:\CLIENTS\COMERCIAL\STOCKS\OBJ\FuncFive.obj" -Ot 聽 -I"G:\CLIENTS\GENXHB\LIBEXT\Include" -I"I:\xHB\include" -I"I:\xHB\c_include\Win" -I"I:\HWGUI\INCLUDE" -I"I:\xHB\include" -I"I:\xHB\c_include" -I"I:\xHB\c_include\win" -I"I:\xHB\c_include\msvc" "G:\Clients\GENXHB\FUNC_C\FuncFive.C"<<<

xLINK: error: Unresolved external symbol '?hb_oleVariantToItem@@YAJPAU_HB_ITEM@@PAUtagVARIANT@@@Z referenced from Fivehcm.lib(ACTX.obj)'.

xLINK: fatal error: 1 unresolved external(s).


A ver si sabes donde puede venir el error.
Muchas Gracias.
Pere.
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Tue Jul 13, 2010 07:10 AM

Pere,

Ese c贸digo no lo puedes meter dentro de #pragma BEGINDUMP ... ENDDUMP pues la funci贸n se espera en modo C++.

Tendr铆as que crear un FuncFive.cpp y compilarlo, pero la limitaci贸n del compilador de PellesC, que es el que usa xharbour comercial, es que no soporta C++ (salvo que lo hayan cambiado, pero no nos consta).

Te sirve el compilador de C de Microsoft. El de Borland, no, pues son formatos incompatibles. Lo vamos a preparar aqui y te damos el OBJ.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Tue Jul 13, 2010 07:14 AM

Aqui los tienes:

http://www.mediafire.com/?zjgx1nmyyjy

http://www.mediafire.com/?zz2bol1ju1m

regards, saludos

Antonio Linares
www.fivetechsoft.com
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Tue Jul 13, 2010 10:40 AM
Muchas gracias por tu ayuda.

Ahora, el programa he logrado arrancarlo sin ningun error.

Al principio del programa, como me dijiste cree un objecto TWindow si mas parametros que las posicions y con la caracter铆stica PIXEL.
Code (fw): Select all Collapse
oWndFW:= TWindow():New( 0, 0 , 600, 800,,,,,,,,,,,,,,,,, .T.)

Atenci贸n si hacer ACTIVATE WINDOW oWndFW ejecuto el resto de codigo, de momento va perfecto.

Cuando creo una funci贸 para ver una ventada de FW con el siguiente codigo:
Code (fw): Select all Collapse
# include "FiveWin.ch"

Function FWAcumula()
Local oWnd
DEFINE WINDOW oWnd FROM 10,10 TO 600,800 PIXEL OF oWndFW
@ 10, 10 SAY "FIVEWIN" PIXEL 
ACTIVATE WINDOW oWnd 

Return nil


En la funci贸n entra, pero no aparece nada de nada, pasa por encima de todas las instrucciones.

Nota: la Variable oWndFW esta declarada como publica, asi se podra acceder desde qualquier punto de la aplicaci贸n.

Gracias por todo.
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Mon Jul 19, 2010 02:48 PM

Hola Antonio,

Podria decirme por donde puedo mirarme algo ?

Que tipo de tests puedo hacer ?

Que variables hay que debugar?

Esperando noticias,Muchas Gracias.
Pere.

Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Mon Jul 19, 2010 03:05 PM

Pere,

Si oWndFW no esta creada con FWH entonces cambia esta l铆nea:

DEFINE WINDOW oWnd FROM 10,10 TO 600,800 PIXEL // OF oWndFW

regards, saludos

Antonio Linares
www.fivetechsoft.com
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Mon Jul 19, 2010 04:44 PM
Hola Antonio

Una respuesta muy r谩pida.

He estado unos dias de vacaciones, me han ido muy bien.

Cuando cambio la l铆nea que me has puesto se sale un error que pone:


Gracias.
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Mon Jul 19, 2010 06:10 PM

Pere,

No te indica la lista de llamadas desde donde se genera el error ?

Lo que normalmente le decimos el "calls stack"

regards, saludos

Antonio Linares
www.fivetechsoft.com
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Tue Jul 20, 2010 06:46 AM
Buenos dias, Antonio.

No hay ninguna pila de llamadas ya que este error es un error irrecuperable desde xHarbour.

Voy a incluir en mi proyecto el archivo window.prg de fivewin, y intentar茅 localizar el punto.

Atenci贸n, estoy utilizando la versi贸n: 10.2 de FiveWin.

Pila de llamadas :


Variables locales de la funci贸n _FWH:


A ver que me pudes decir..

Muchas Gracias otra vez.
Pere
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Tue Jul 20, 2010 07:21 AM

Pere,

Puedes poner una imagen de como se ve tu aplicaci贸n justo antes de que se genere el error ? gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com
pcordonet
Posts: 111
Joined: Sat Jan 30, 2010 08:35 AM
Re: FiveWin con xHarbour Comercial + GTWVW
Posted: Tue Jul 20, 2010 07:25 AM
Aqui est脿
Static archive 路 New replies & topics via GitHub Discussions