Page 1 of 1

Sobre Recursos Borland

PostPosted: Tue Oct 20, 2009 5:43 am
by mlayns
Aun cuando muchos al migrar a 32bits han sugerido eliminar los recursos borland en sus DLL..
cconsiderando la operatividad del ejemplo fwborl.prg he logrado migrar sistemas completos que operan con multiples recursos borland a 32bits... tomando en cuenta algunas consideraciones:
1. En el programa principal
#ifdef __CLIPPER__
hBorland:=LoadLibrary("BWCC.DLL")
RUTAR:=oRt:DLLPTH+"GESM0100.DLL"
SET RESOURCES TO "&RUTAR."
#else
hBorland := LoadLibrary("BWCC32.DLL")
oRt:DLLPTH := oRt:D32PTH
RUTAR:=oRt:DLLPTH+"GESM0100.DLL"
SET RESOURCES TO "&RUTAR.","BWCC32.DLL"
BWCCRegister( GetResources() )
#endif
y al final del programa principal
#ifndef __CLIPPER__
DLL32 FUNCTION BWCCRegister( hInst AS LONG ) AS WORD PASCAL LIB "BWCC32.DLL"
#endif

2. En los otros programas que utilizen DLL propias..

#define oDll0500 oRt:DLLPTH+"CCCP0500.DLL"
Static hDll0500
Function CCCP0500(oRt,OWND,oMobj)
LOCAL hResOld :=GetResources()
LOCAL DllActivo:=Loadlibrary(oDll0500)
hDll0500 := SetResources( DllActivo )
#ifndef __CLIPPER__
BWCCRegister( GetResources() )
#endif

y al salir del prograna... (y retornar a mi principal, u otro intermedio)
sysrefresh()
FreeLibrary(hDll0500)
SetResources(hResOld)

Las DLL a 32bits las construyo empleando rc2dll32.bat proporcionado en FWH\DLL
Compilo los programas a 16 y 32bits y no tengo mayores problemas en el funcionamiento de los sistemas..

Ahora.. mi consulta es referente a una compilacion a 64bits (ante el lanzamiento de Windows 7 nativo de 64 bits)...
alli aun es posible el empleo de recursos borland?? Existe un BWCC64.DLL ??
Borland tiene soporte a 64 bits?? o solo hasta 32 bits...

Re: Sobre Recursos Borland

PostPosted: Tue Oct 20, 2009 8:21 am
by Antonio Linares
Si buscas en google por "BWCC64" no aparece nada, luego parece improbable que exista...

De todas formas las aplicaciones en 32 bits funcionan perfectamente en 64 bits, asi que puedes usar la de 32 bits รณ plantearte dejar de usar la DLL de Borland y cambiar esos controles por otros controles propios de FWH :-)