drawlabel...
Enviado: 12 Fev 2008 08:36
alguém pode me ajudar.
Código: Selecionar todos
func marcos
LOCAL oWindow, nChoice
owindow:=wndinit(03,01,20,79,"CLIENTES")
WVW_DrawLabel( owindow, 06, 35, "CADASTRO", 6, 5, RGB(225,225,76), RGB(230,139,44), "Tahoma",,, 2 )
inkey( 0 )
mcor = substr("N/W,W/R,,,N/W+"+space(40),1,40)
do while (.t.)
@ 10,02 say "Cor get:"
@ 10,15 get mcor
read
if lastkey()=27
exit
endif
enddo
wndclose()
RETURN .t.