Página 1 de 1

tBrowse Zebrado

Enviado: 15 Mar 2007 01:01
por edutek
Boa Noite

Como faço um browse zebrado ?

uso tbrowse com gtwvw



Eduardo mendes

Enviado: 15 Mar 2007 08:59
por angeiras
Olá,

Sendo oB o objeto TBrowse e nTop, nLeft, nRight, nBottom as coordenadas do browse :

Código: Selecionar todos

WVW_SetPen(0,0,RGB( 192,192,192))
WVW_DrawBoxRecessed(nWin,oB:nTop,oB:nLeft,oB:nBottom, oB:nRight)
WVW_DrawGridHorz(nWin,oB:nTop+3,oB:nLeft,oB:nRight,oB:nBottom-oB:nTop-2)
WVW_DrawGridVert(nWin,oB:nTop,oB:nBottom,oB:aColumnsSep, len(oB:aColumnsSep)) 
e RGB um define :

Código: Selecionar todos

#define RGB(nR,nG,nB)  ( nR + ( nG * 256 ) + ( nB * 256 * 256 ) )
Adaptei o codigo a partir do exemplo WVWTEST9.PRG do diretorio SAMPLES da GTWVW.

[]s
Manoel Angeiras

Enviado: 15 Mar 2007 10:00
por edutek
Manoel,

Errei a pergunta, isso eu já tenho, queria colocar na verdade cores na minha linha do browse.

ex: Titulos vencidos Coloco Vermelho, a vencer verde, vencendo no dia amarelo.

isso é só um exemplo.


Ok, Obrigado

Enviado: 16 Mar 2007 08:26
por angeiras
Olá,

Eu estou tentando usar o método :ColoRect mas ainda não estou conseguindo ( talvéz nem seja esse o caminho... )

[]s
Manoel Angeiras