Página 1 de 1

drawlabel... não exibe o label na window

Enviado: 12 Fev 2008 07:52
por FARLEY RIBEIRO
pessoal,

não estou conseguindo exibir um label na window abaixo... simplesmente não mostra nada... estou utilizando wvwtools.

o que pode ser?

grato

farley

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.

Enviado: 24 Fev 2008 23:59
por rochinha
Amiguinho

Se voce usa Fivewin, porque faz as telas usando a WVWTools?
Qual seria o diferencial que ela proporciona?
Voce chegou a verificar os exemplos que porventura venham com a biblioteca?
Nem me lembro mais como funciona um INKEY() mas qual a funcionalidade dele antes do DO..WHILE?

Enviado: 25 Fev 2008 09:17
por gvc
inkey // No FW provoca GPF. A I/O é controlada pelo Windows.

// Loop até que vc aperte o <ESC> ???
// Não importa o que vc coloque em mcor (???)
do while (.t.)
@ 10,02 say "Cor get:"
@ 10,15 get mcor
read
if lastkey()=27
exit
endif
enddo

Desculpe, mas o seu código parece não ter lógica nessas partes.
Vc esta fazendo testes?
Esse código não parece ser FW.
Desculpe se eu estiver enganado.