FiveTech Support Forums

Al iniciarme en FWH me han surgido los primeros problemas de principiante:

a) No funciona tema XP, a pesar de incluir en el RC 1 24 "wxp.man"
Si en el programa pongo #ifdef__THEMAXP__ me devuelve .f.

b) En todos los ACTIVATE DIALOG tengo (oDlg:lHelpIcon:=.f.) que funcionaba en Clipper+FW23.- Pero en FWH 2.7 sale el icono ?

c) Al compilar en samples\testfold.prg me da Error ID 790.- Testfold RC 17 19:Expecting class name or ID

d) Al compilar samples\win32 error VARIABLE DOES NOT EXIST: IDOK que es el recurso.

Alguna ayuda?

Un saludo desde Málaga

Manuel

Manuel,

> a) No funciona tema XP, a pesar de incluir en el RC 1 24 "wxp.man"
> Si en el programa pongo #ifdef__THEMAXP__ me devuelve .f.

Desde el programa debes llamar a la función IsAppThemed(), una vez tengas construida la ventana principal, y te devolverá .T. si el fichero de temas del RC ha sido incluido en el EXE.

La forma idónea de incluirlo en el fichero RC es esta, para que el editor de recursos no intente abrirlo:

Manuel,

> b) En todos los ACTIVATE DIALOG tengo (oDlg:lHelpIcon:=.f.) que
> funcionaba en Clipper+FW23.- Pero en FWH 2.7 sale el icono ?

Te enviamos por email una corrección en las librerías.

Manuel,

> c) Al compilar en samples\testfold.prg me da Error ID 790.- Testfold
> RC 17 19:Expecting class name or ID

Aqui compila bien. Estás usando el brc32.exe de Borland ?

Asegúrate de que estás usando los ficheros de cabecera correctos de FWH y no otros antiguos. Esa línea en concreto usa el define FOLDER32 que en winapi.ch está declarado como #define FOLDER32 "SysTabControl32"

Manuel,

> d) Al compilar samples\win32 error VARIABLE DOES NOT EXIST: IDOK > que es el recurso.

IDOK está definido en winapi.ch. Comprueba que estás usando el correcto.

En caso de que estés usando xharbour.com, ojo que suministran un fichero de cabecera que se llama igual, winapi.ch, y puede ser que no estés usando el correcto de FWH.

Antonio Linares wrote:Manuel,
Desde el programa debes llamar a la función IsAppThemed(), una vez tengas construida la ventana principal, y te devolverá .T. si el fichero de temas del RC ha sido incluido en el EXE.

La forma idónea de incluirlo en el fichero RC es esta, para que el editor de recursos no intente abrirlo:

Code: Select all Collapse

#ifdef __FLAT__
   1 24 "c:/fwh/samples/WinXP/WindowsXP.Manifest" 
#endif

Antonio, no me funciona

He intentado en el RC poner:

1)
#ifdef __FLAT__
1 24 "c:/fwh/samples/WinXP/WindowsXP.Manifest"
#endif
2) Renombrando el fichero en samples\winxp
#ifdef __FLAT__
1 24 "c:/fwh/samples/WinXP/WXP.Man"
#endif

En el programa, me sigue devolviendo .f. En cambio, el resto de los recursos del RC me los toma bien.

Antonio Linares wrote:Manuel,
Te enviamos por email una corrección en las librerías.

CORRECTO. Ahora funciona perfectamente con las nuevas librerias.

Antonio Linares wrote:Manuel,
Asegúrate de que estás usando los ficheros de cabecera correctos de FWH y no otros antiguos. Esa línea en concreto usa el define FOLDER32 que en winapi.ch está declarado como #define FOLDER32 "SysTabControl32"

Ahora funciona correcto

Antonio Linares wrote:Manuel,
IDOK está definido en winapi.ch. Comprueba que estás usando el correcto.

Funcionando correcto. Era el fichero Winapi.ch

Solo me queda sin resolver el Tema XP

Gracias por todo

Manuel,

Abre tu EXE con el editor de recursos de Borland ó con el PellesC y deberías ver una entrada tipo 24 y de nombre 1.

Observa la salida en pantalla del brc32.exe por si te está dando algún error.

Antonio Linares wrote:
Abre tu EXE con el editor de recursos de Borland ó con el PellesC y deberías ver una entrada tipo 24 y de nombre 1.
Observa la salida en pantalla del brc32.exe por si te está dando algún error.

1) He abierto el EXE con WorkShop y aparece una entrada de tipo 24 y de nombre 1

2) Cuando compilo y enlazo, no me da ningun error. Editando el b32.bc aparece al final el RES.

3) He probado en samples browse, testbubm, combos, juan y roberto (todos con xptheme) y dos correctos pero se ven con estilo Windows-98.
Mi ordenador tiene XP-home y creo que debería funcionar bien.