Oi, Pessoal!
Alguém sabe como colocar sombra no pushbutton em modo console no Harbour?

Moderador: Moderadores
Kapiaba escreveu:Mister Quintas, Push Button, é o tipo de botão escolhido.
Kapiaba escreveu:No FiveWin, quando eu quero um botão em destaque
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls"
version="6.0.0.0"
processorArchitecture="*"
publicKeyToken="6595b64144ccf1df"
language="*" />
</dependentAssembly>
</dependency>
#include "box.ch"
@ 12, 40 GET lBtnExit PUSHBUTTON ;
CAPTION " E&xit " ;
COLOR cBtnClr ;
STYLE B_SINGLE ;
STATE {|| nBtn := IsPressed( 3 ) }
hb_Shadow( 12, 40, 14, 53 )
@ 14,32 GET bENTRAR PUSHBUTTON CAPTION " ENTRAR " COLOR cCORBOTOES STYLE "" STATE {||ACESSOBOTOES('ENTRAR')}
@ 14,40 SAY CHR(220)
FOR nBOT=33 TO 40
@ 15,nBOT SAY CHR(223)
NEXT
@ 14,42 GET bSAIR PUSHBUTTON CAPTION " SAIR " COLOR cCORBOTOES STYLE "" STATE {||ACESSOBOTOES('SAIR')}
@ 14,48 SAY CHR(220)
FOR nBOT=43 TO 48
@ 15,nBOT SAY CHR(223)
NEXT
Usuários vendo este fórum: Google [Bot] e 2 visitantes