Unresolved external symbol '_HB_FUN_OLEUNINITIALIZE'.

[George]

Hola foro,
Al recompilar mi aplicacion con FWH 8.12 + xHarbour Builder Sep.2008, estoy recibiendo el siguiente mensaje:
error: Unresolved external symbol '_HB_FUN_OLEUNINITIALIZE'.

Si vuelvo a recompilar con FWH 8.05 y con el mismo xHarbour Builder Sep.2008 no se genera el error anterior.

Alguna sugerencia?

Saludos,

[Antonio Linares]

George,

Prueba a añadir esta función a tu PRG:

Code: Select all  Expand view

#pragma BEGINDUMP

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

HB_FUNC( OLEUNINITIALIZE )
{
   OleUninitialize();
}

#pragma ENDDUMP


[George]

Hola Antonio,

Ahora el programa esta compilando bien sin ningun tipo de mensaje de error.

Sin embargo al ejecutar el programa, cuando trata de abrir un dialogo, se presenta el siguiente mensaje:

Code: Select all  Expand view

Application
===========
   Path and name: C:\_CK_NEW\ck_aug_83.exe (32 bits)
   Size: 3,551,744 bytes
   Time from start: 0 hours 0 mins 12 secs
   Error occurred at: 12/31/2008, 09:44:14
   Error description: Error BASE/1004  Message not found: TDIALOG:BCLRGRAD
Stack Calls
===========
   Called from: D:\xHarbour\source\rtl\tobject.prg => TDIALOG:ERROR(172)
   Called from: D:\xHarbour\source\rtl\tobject.prg => TDIALOG:MSGNOTFOUND(205)
   Called from: D:\xHarbour\source\rtl\tobject.prg => TDIALOG:BCLRGRAD(0)
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:REDEFINE(0)
   Called from: C:\_CK_NEW\TCKCASH.PRG => CHECKCASH:XBROWSE(349)
   Called from: C:\_CK_NEW\MAIN.PRG => FCKSCASH(1217)
   Called from: C:\_CK_NEW\MAIN.PRG => (b)FRAMEBAR(749)
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK(0)
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP(0)
   Called from:  => TWINDOW:HANDLEEVENT(0)
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT(0)
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT(0)
   Called from: C:\_CK_NEW\WINDOW.PRG => _FWH(3299)
   Called from:  => WINRUN(0)
   Called from: C:\_CK_NEW\WINDOW.PRG => TWINDOW:ACTIVATE(950)
   Called from: C:\_CK_NEW\MAIN.PRG => MAIN(123)


Saludos

George

[George]

Antonio,
Yo estaba usando la clase Window.prg del FWH_8.05, con una modificacion que le hice a sugerencia tuya para que no me presentara tan ancho la barra de menu.
Ahora al eliminar el Window.prg modificado (del FWH_8.05) ya no me presenta el error "runtime" anterior.
Sin embargo estoy viendo que algunos botones, de la barra de botones, ahora salen muy arriba y se ven cortado por la mitad. Investigare esto mas profundo a ver si encuentro donde esta el problema,

Saludos,


George

[George]

Rectificando el post anterior las imagenes aparecen cortada no en la barrar de botones, sino, en los bitmaps independienes.
Por ejemplo:

Code: Select all  Expand view

REDEFINE BTNBMP oBtn1 ID 120 OF oDlg  ;
         RESOURCE "B16_PAGEUP" NOBORDER;
         TOOLTIP "Page Up" ;
         ACTION (oBrW:PageUp(), ;
         oBrw:SetFocus(), oBrw:Refresh())



Aqui me aparece solo la mitad de la imagen RESOURCE "B16_PAGEUP"

George

[George]

SOLUCIONADO.
No me habia percatado que ahora tenemos que usar CENTER si queremos que la imagen salga centralizada.

Asi funciona perfecto
[quote]
REDEFINE BTNBMP oBtn1 ID 120 OF oDlg CENTER ;
RESOURCE "B16_PAGEUP" NOBORDER;
TOOLTIP "Page Up" ;
ACTION (oBrw:PageUp(), ;
oBrw:SetFocus(), oBrw:Refresh())

[/code]

George

[Antonio Linares]

George,

Bien!

Gracias por compartir esta informacion