Jump to content
Fivewin Brasil

Zebra xBrowse


Pablo.Softgraf

Recommended Posts

Senhores , boa tarde !!

Estou colorindo de maneira intercalada as linhas do xBrowse usando , da mesma maneira que uso no TCBrowse...

ADD COLUMN TO XBROWSE ::oLbxItem;

DATA ARRAY ELEM 3;

COLOR CLR_BLUE,iif( ::oLbxItem:nArrayAt % 2 == 0 ,CLR_WHITE, RGB(231,237,233) );

WIDTH 30;

HEADER "Gr" LEFT

id=red>

Está certo , não dá pau , mas também não funciona ...

já vi outros tópicos e nada , estou usando o FWH 9.11

Pablo Andrés Reyes Rivera

FWH 2.7 , 9.11 - xHarbour Compiler build 0.99.61 (SimpLex) - PellesC

Link to comment
Share on other sites

Senhores , boa tarde !!

Estou colorindo de maneira intercalada as linhas do xBrowse usando , da mesma maneira que uso no TCBrowse...

ADD COLUMN TO XBROWSE ::oLbxItem;

DATA ARRAY ELEM 3;

COLOR CLR_BLUE,iif( ::oLbxItem:nArrayAt % 2 == 0 ,CLR_WHITE, RGB(231,237,233) );

WIDTH 30;

HEADER "Gr" LEFT

id=red>

Está certo , não dá pau , mas também não funciona ...

já vi outros tópicos e nada , estou usando o FWH 9.11

Pablo Andrés Reyes Rivera

FWH 2.7 , 9.11 - xHarbour Compiler build 0.99.61 (SimpLex) - PellesC

Link to comment
Share on other sites

Olá Paulo, eu uso assim:

oBrw:bClrStd := { ||{ CLR_BLACK, IIF( Cli->( OrdKeyNo() ) %2 == 0, COR_BRW1, COR_BRW2 ) } }

oBrw:bClrSel:={|| {CLR_WHITE,nRGB(0,100,200)}}

oBrw:bClrSelFocus:={|| {CLR_WHITE,nRGB(0,100,200)}}

ve se te ajuda.

Abraços.

Beto

Msn: betovsp@hotmail.com

FWH 9.08+xHarbour 1.2.1+Mymake+@Say

"Ainda que nossos olhos não pudessem ver, nossos ouvidos não existissem, restaria o nosso pensamento para vermos, ouvirmos e falarmos com Deus."id=red>

Link to comment
Share on other sites

Eu uso quase igual ao Beto. só uma pequena diferença


#Define CLR_LGREEN nRGB( 190, 215, 190 )

#Define CLR_LGRAY nRGB( 230, 230, 230 )

oBrw[2]:bClrStd := { ||{ CLR_BLACK, IIF( ( oBrw[2]:cAlias )->( OrdKeyNo() ) %2 == 0, CLR_LGRAY, CLR_LGREEN ) } }

id=code>id=code>

Onde oBrw[2] é o Browse e :cAlias se escreve "cAlias" mesmo e não o nome do arquivo..

Luiz Arruda - Corumba(MS)

FiveWin 9.04

[x]Harbour

xDev

WS

ico.corumba@gmail.com

-

Somos Hexaid=red>

Link to comment
Share on other sites

citação:

Amigos , me desculpem , esqueci de citar que eu uso com ARRAY ..

Pablo Andrés Reyes Rivera

FWH 2.7 , 9.11 - xHarbour Compiler build 0.99.61 (SimpLex) - PellesC


id=quote>id=quote>

Com array:

IF MsgGet("Procurar Por","Sobrenome do Contribuínte",@vSn,"Busca")

vSn:=ALLTRIM(UPPER(vSn))

DbEval({|| IF(ordWildSeek("*"+vSn+"*",.T.),(AADD( aSnsele, {Con->ativo,Con->codigo,Con->nome,Con->operadora}),lDados:=.T.),)})

END

oSnsele:SetColor( { 2, 5, 6, 11, 12, 15 }, { { | | If( oSnsele:nLogicPos % 2 = 0, COR_BRW1, COR_BRW2 ) }, COR_BRW2, COR_BRW3, COR_BRW2, COR_BRW3,} )

oSnsele:SetColor( { 3, 4 }, { COR_CABBRW1, {COR_CABBRW2,COR_CABBRW3} } )

Abraços.

Beto

Msn: betovsp@hotmail.com

FWH 9.08+xHarbour 1.2.1+Mymake+@Say

"Ainda que nossos olhos não pudessem ver, nossos ouvidos não existissem, restaria o nosso pensamento para vermos, ouvirmos e falarmos com Deus."id=red>

Link to comment
Share on other sites

Do jeito que C fez não vai dar certo mesmo..

esse oLbx meu vem de

id=code>
id=code> e vc. tá colocando do Item..

Mostre onde vc. cria o Browse tipo;

Redefine xBrowse ou

oLbx:=txbrowse():new(odlg)

é dai que entra essa linha que postei e não do item a ser mostrado..

Qual o Index que vô C usa ??

Luiz Arruda - Corumba(MS)

FiveWin 9.04

[x]Harbour

xDev

WS

ico.corumba@gmail.com

-

Somos Hexaid=red>

Link to comment
Share on other sites

eu uso assim, e funciona 2 mil % (jejejeje):


oBrw:bClrStd := { ||{ corRGB1 , iif( oBrw:nArrayAt % 2 == 0, corRGB2 , corRGB3 ) } }

id=code>id=code>

Espero q ajude !

[]'s

Gilberto Frohlich - Toledo/PR

giba_f@hotmail.com

giba_f@yahoo.com.br

xHarbour xBuild+Fivewin 2.7+PellesC+(Postgres+DB2)

Editado por - gibaf on 17/12/2009 16:00:10

Link to comment
Share on other sites

GIBAF , do jeito que vc me passou deu certo , mas por que não dá certo desta maneira, e ainda por cima estou fazendo por coluna

ADD COLUMN TO XBROWSE ::oLbxItem;

DATA ARRAY ELEM 3;

COLOR CLR_BLUE,iif( ::oLbxItem:nArrayAt % 2 == 0 ,CLR_WHITE, RGB(231,237,233) );

WIDTH 30;

HEADER "Gr" LEFT

id=red>

Pablo Andrés Reyes Rivera

FWH 2.7 , 9.11 - xHarbour Compiler build 0.99.61 (SimpLex) - PellesC

Link to comment
Share on other sites

citação:

GIBAF , do jeito que vc me passou deu certo , mas por que não dá certo desta maneira, e ainda por cima estou fazendo por coluna

ADD COLUMN TO XBROWSE ::oLbxItem;

DATA ARRAY ELEM 3;

COLOR CLR_BLUE,iif( ::oLbxItem:nArrayAt % 2 == 0 ,CLR_WHITE, RGB(231,237,233) );

WIDTH 30;

HEADER "Gr" LEFT

id=red>

Pablo Andrés Reyes Rivera

FWH 2.7 , 9.11 - xHarbour Compiler build 0.99.61 (SimpLex) - PellesC


id=quote>id=quote>

mas, se deu certo, pra que fazer diferente ? jejejeje

[]'s

Gilberto Frohlich - Toledo/PR

giba_f@hotmail.com

giba_f@yahoo.com.br

xHarbour xBuild+Fivewin 2.7+PellesC+(Postgres+DB2)

Link to comment
Share on other sites

Como o Gilberto ainda não respondeu e eu to com um tempinho vou intrometer..,

Não deu certo pq. vc. esta colocando o commando na criação coluna "ADD COLUMN" , e vc. tem colocar no browse.. neste caso

oBrw é o browse e olbxItem é os dados da coluna.. como tentei explicar na minha resposta.

eu faço assim

id=code>
id=code>

e da certim certim..

é isso..

Abraços..

Luiz Arruda - Corumba(MS)

FiveWin 9.04

[x]Harbour

xDev

WS

ico.corumba@gmail.com

-

Somos Hexaid=red>

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...