Antonio, eu uso XP e tenho um get em uma WINDOW, ao executar esta window ele vem sem XP THEMED, porém ao passar o mouse por cima do get ele assume XP THEMED. Como resolver isso?

Grato

Aoki

Aoki,

Has incluido esta línea en tu RC ?

1 24 "WindowsXP.Manifest"

El fichero WindowsXP.Manifest está en samples\winxp

Sim Antonio, eu adicionei o XPLOOK.RC ao meu projeto, tanto que o resto da minha aplicação o XP THEMED esta OK!

XPLOOK.RC:

// Add this to your resources RC file

ifdef FLAT

1 24 "c:\fwh71\include\WindowsXP.Manifest"

endif

ifdef 64

1 24 "WinXP/WindowsXP.Manifest64"

endif

Aoki

Aoki,

Puedes capturar una imagen de como se ve tu ventana y mostrarla aqui ? gracias

Antonio:

Antes de passar o mouse:

http://img236.imageshack.us/img236/9161/imagem1mw1.jpg

Depois de passar o mouse:

http://img236.imageshack.us/img236/2209/imagem2yk0.jpg

FONTE:
Define Font fonte_ME Name 'Times New Roman' Size -0,24 BOLD

define window oWndc from 0, 0 TO 25, 70 ;
title "Controle de Mesas" MDICHILD OF oWnd vscroll icon oico COLOR EMP_MCOR,EMP_MCOR NOICONIZE
oWndc:maximize()

oGr:=TGroup():New( 00.7, 01, 04.8, nugro, "Consulta e Manutenção de Mesas:", oWndc, NIL, NIL, .F. , .F. , NIL )

@ 00.9,02 trsay "Mesa:" OF oWndc COLOR CLR_BLACK FONT fonte_ME SIZE 60,24

@ 02.3,11 get obtm VAR nmesa OF oWndc picture "999999" font fonte_ME RIGHT SIZE 90,28 SPINNER MIN 0 MAX nMaxMesa

ACTIVATE WINDOW oWndc MAXIMIZED

Grato Antonio

Aoki

Aoki,

Lo que quieres es que se vea SIN tema ? ó CON tema ?

Antonio, assim como toda a minha aplicação se for XP = COM TEMA!

OU SEJA: COM TEMA

E o get só assume o TEMA se passar o mouse por cima do get!

Gracias

Aoki

Aoki,

Quieres decir que el get pierde el tema al pasar el ratón por encima de él ?

Antonio,

Quieres decir que el get pierde el tema al pasar el ratón por encima de él ?
Não!!!

Na verdade ele ganha el tema al pasar el ratón por encima do get