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
get WINDOW xp themed ?
-
- Posts: 210
- Joined: Sun Jul 23, 2006 1:15 am
get WINDOW xp themed ?
FWH25+XHARBOUR 99.50
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
-
- Posts: 210
- Joined: Sun Jul 23, 2006 1:15 am
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
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
FWH25+XHARBOUR 99.50
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
-
- Posts: 210
- Joined: Sun Jul 23, 2006 1:15 am
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
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
FWH25+XHARBOUR 99.50
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
-
- Posts: 210
- Joined: Sun Jul 23, 2006 1:15 am
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
-
- Posts: 210
- Joined: Sun Jul 23, 2006 1:15 am