gibaf Posted August 26, 2005 Report Share Posted August 26, 2005 Fim as colunas do browse zebras. assim: oBrw:bClrStd := {||{CLR_BLACK,iif(Recno()%2=0,15724527,16777215)}} mas tem um problema. Nesse browse eu possibilito o usuario a mudar o order de indices, e de acordo com sua opcao, a zebra nao fica um sim outro nao. Gostaria de saber de alguem, como fazer para resolver isso. Desde ja, fico agradecido ! Giba Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 26, 2005 Author Report Share Posted August 26, 2005 Fim as colunas do browse zebras. assim: oBrw:bClrStd := {||{CLR_BLACK,iif(Recno()%2=0,15724527,16777215)}} mas tem um problema. Nesse browse eu possibilito o usuario a mudar o order de indices, e de acordo com sua opcao, a zebra nao fica um sim outro nao. Gostaria de saber de alguem, como fazer para resolver isso. Desde ja, fico agradecido ! Giba Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 26, 2005 Author Report Share Posted August 26, 2005 Fim as colunas do browse zebras. assim: oBrw:bClrStd := {||{CLR_BLACK,iif(Recno()%2=0,15724527,16777215)}} mas tem um problema. Nesse browse eu possibilito o usuario a mudar o order de indices, e de acordo com sua opcao, a zebra nao fica um sim outro nao. Gostaria de saber de alguem, como fazer para resolver isso. Desde ja, fico agradecido ! Giba Quote Link to comment Share on other sites More sharing options...
Anderson.OL Posted August 26, 2005 Report Share Posted August 26, 2005 Tente trocar o Recno() pelo OrdKeyNo(). Abraços Nesse mundo nada se cria, tudo se compila<< //--Clipper 5.3b / FiveWin 2.6 / Blinker 7.0 --// //-- _Dom Quixote_ RO Iris Server / Agility Kina / 6*/3* Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 26, 2005 Author Report Share Posted August 26, 2005 ja tentei assim, e fica todas a linhas na mesma cor. Quote Link to comment Share on other sites More sharing options...
Anderson.OL Posted August 26, 2005 Report Share Posted August 26, 2005 Para ListBow eu utilizo da seguinte maneira.... oBrw:nClrPane := {|| IF( (oLbxDetalhe:cAlias)->( OrdKeyNo() ) % 2 == 0, rgb(168,211,255), rgb(255,255,255) )} Nesse mundo nada se cria, tudo se compila<< //--Clipper 5.3b / FiveWin 2.6 / Blinker 7.0 --// //-- _Dom Quixote_ RO Iris Server / Agility Kina / 6*/3* Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 26, 2005 Author Report Share Posted August 26, 2005 entao.... to precisando de um comando/funcao similar pro xBrowse ! Agradeco sua ajuda, e espero que se alguem tiver alguma dica, me avise ! Obrigado ! Quote Link to comment Share on other sites More sharing options...
supi Posted August 26, 2005 Report Share Posted August 26, 2005 VIU. O SET FILTER está sendo utilizado??? Se sim, neste caso ocorre mesmo de ficar na mesma cor. SUPI Quote Link to comment Share on other sites More sharing options...
Kbelo Posted August 27, 2005 Report Share Posted August 27, 2005 bom com indice eu desconheço que um list box fique zebrado mas posso estar enganado mas ate hoje nao vi nada deste tipo com indice Marcelo Michels Alexandre marcelo@lorenzi.com.br celo.michels@ibestvip.com.br Criciuma_sc Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 29, 2005 Author Report Share Posted August 29, 2005 nao tem SET FILTER ativo.... a clase que estou usando eh o TxBrowse()... Ainda nao consegui resolver... se alguem mais tem alguma dica, fico agradecido !!! Gilberto Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 31, 2005 Author Report Share Posted August 31, 2005 Sem chances para mim ??? Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 31, 2005 Report Share Posted August 31, 2005 VERIFIQUE A CLASSE, COMO É ALGO NOVO, AINDA SE 'APANHARÃ' MUITO... ABRAÇOS, E TE VEJO NO TERCEIRO ENCONTRO DE FIVEWINNERS NOVEMBRO DE 2005 EU APOIO E VOU. Bad Boy - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 31, 2005 Author Report Share Posted August 31, 2005 estou fazendo um teste em listbox, e tambem nao faz zebra com o camando: oBrwCad:nClrPane := {|| iif( OrdKeyNo() % 2 == 0, rgb(168,211,255), rgb(255,255,255) ) }. OBS: estou usando o REDEFINE (tanto no xBrowse, quanto no LISTBOX - teste). E em ambos fica somente uma cor na zebra. Se alguem ter alguma dica, sera bem vinda ! Obrigado ! Giba Quote Link to comment Share on other sites More sharing options...
Kbelo Posted August 31, 2005 Report Share Posted August 31, 2005 oBrwCad:nClrPane := {|| iif( Recno()/2 ==int(Recno()/2) 0, rgb(168,211,255), rgb(255,255,255) ) }. este vai sai perfeito Marcelo Michels Alexandre Criciúma - SC Celo.michels@ibestvip.com.br marcelo@lorenzi.com.br Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 31, 2005 Author Report Share Posted August 31, 2005 KBelo, o problema eh que a zebra nao fica certo, com uma linha de uma cor, e outra de outra.... Conforme o Indice, fica algumas de uma cor, outras de outra cor. Me entende ? Se alguem tiver ainda outras dicas, favor me enviar ! Giba Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 31, 2005 Report Share Posted August 31, 2005 #Define CLR_LGRAY nRGB( 230, 230, 230 ) #Define CLR_LGREEN nRGB( 190, 215, 190 ) #Define CLR_VERMELHO nRGB( 255, 000, 000 ) //--> Vermelho Para a Letra #Define CLR_AMARELO nRGB( 255, 255, 000 ) //--> Amarelo Para o Fundo #Define CLR_AZULXP nRGB( 225, 225, 240 ) //--> Azul XP #Define CLR_LIGHT nRGB( 192, 192, 56 ) #Define CLR_SHADOW nRGB( 102, 51, 0 ) #Define CLR_NBLUE nRGB( 142, 171, 194 ) NA LISTBOX: //--------------------------------------------------------------------- oLbx:nClrBackHead := CLR_LGREEN // Cor do Fundo do Cabe‡alho oLbx:nClrBackFocus := CLR_HRED // Cor do Cursor Em Cima do Ötem oLbx:nClrForeFocus := CLR_AMARELO // cor da letra da barra ativa oLbx:nClrForeHead := CLR_HRED // Cor nos Headers - Cabe‡alhos oLbx:nClrPane := { || IIF( ( oLbx:cAlias )->( OrdKeyNo() ) %2 == 0, ; CLR_LGREEN, CLR_LGRAY ) } oLbx:nColAct := 2 // Onde o Cursor Vai Iniciar qual coluna? oLbx:nLineStyle := 3 // Estilo das linhas nos dados da Browse oLbx:lCellStyle := .T. // S¢ Pinta a celula que o cursor est oLbx:aJustify := { .F., .F., .F., .F., .F., .F., .F., .F., .F. } oLbx:lMChange := .F. // Desabilita Mousemove oLbx:SetFocus() // Refocus on The Browse oLbx:Refresh() // Estabiliza o Browse/Listbox TERCEIRO ENCONTRO DE FIVEWINNERS NOVEMBRO DE 2005 EU APOIO E VOU. Bad Boy - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 31, 2005 Author Report Share Posted August 31, 2005 to usando a classe xBrowse(), e nao LISTBOX().... Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted August 31, 2005 Report Share Posted August 31, 2005 Ola. Abacei de fazer um funcionar com ListBox simples e nos botoes usei tsbutton ficou muito legal, porque nao tentar ??? http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=4879 VOCÊ NAO PODE PERDER: 3º ENCONTRO DE FIVEWINNERS NOVEMBRO DE 2005 Luiz Arruda - iko67@ibest.com.br FW 2.4 Clipper 5.2 WS Quote Link to comment Share on other sites More sharing options...
gibaf Posted August 31, 2005 Author Report Share Posted August 31, 2005 como fazer no listbox: 1) para alterar o altura da coluna do cabecalho ? 2) para alterar a altura da coluna de dados ? 3) alterar o fonte ? Obrigado ! Giba Quote Link to comment Share on other sites More sharing options...
gibaf Posted September 2, 2005 Author Report Share Posted September 2, 2005 Desculpem-me estar inssistindo, mas preciso muito, e nao estou conseguindo, fazer a zebra na classe XBROWSE(). Ate estou conseguindo, mas, conforme o indice que o usuario seleciona, a zebra nao fica certo, nao fica linha com uma cor, linha com outra cor, e sim, varias linhas com uma cor, e varias linhas com outra cor, conforme o indice. OBS: ja fiz com Recno(), OrdKeyNo(), etc... tentei de tudo, mas sem sucesso ! Algumas pessoas deram dicas no LISTBOX, mas a classe q estou usado eh a TXBROWSE() Agradeco a todos q mandaram dicas, e aos que ainda me ajudaram. Gilberto ! Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted September 2, 2005 Report Share Posted September 2, 2005 Também tenho este prob. se meu arquivo é muito grande.. minha zebra é grande(varias linhas da mesma cor), se o arquivo é pequeno a zebra é normal, cor Sim,Cor nao.. Se alguém sabe como resolver. seje bem vindo. Abraços VOCÊ NAO PODE PERDER: 3º ENCONTRO DE FIVEWINNERS NOVEMBRO DE 2005 Luiz Arruda - iko67@ibest.com.br FW 2.4 Clipper 5.2 WS Quote Link to comment Share on other sites More sharing options...
gibaf Posted September 5, 2005 Author Report Share Posted September 5, 2005 Alguem poderia dar alguma dica ??? Gilberto ! Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 5, 2005 Report Share Posted September 5, 2005 citação:Alguem poderia dar alguma dica ??? Gilberto ! id=quote>id=quote>SE VOCE POSTAR O CODIGO COMO VOCE ESTA TENTADO FAZER, FICA MAIS FACIL. TERCEIRO ENCONTRO DE FIVEWINNERS NOVEMBRO DE 2005 EU APOIO E VOU. Bad Boy - São Paulo. kmt_karinha@pop.com.br FW 2.3C CLIPPER 5.3B BLINKER 7.0 WORKSHOP.EXE Quote Link to comment Share on other sites More sharing options...
gibaf Posted September 5, 2005 Author Report Share Posted September 5, 2005 Ja fiz assim: oBrwSA1:aCols[xix]:bClrStd := {|| {CLR_BLACK, iif( Recno() % 2 = 0 , 15724527 , 16777215 ) } } Fiz assim, tambem: oBrwSA1:aCols[xix]:bClrStd := {|| {CLR_BLACK, iif( OrdKeyNo() % 2 = 0 , 15724527 , 16777215 ) } } A zebra ate sai, mas, conforme o indice que o usuario seleciona, fica UMAS linhas de uma cor, OUTRAS de outra cor, e nao UMA de uma e OUTRA de outra. Se alguem puder ajudar, fico agradecido ! OBS: estou usando a classe TXBROWSE() Gilberto Quote Link to comment Share on other sites More sharing options...
marcelo Posted September 5, 2005 Report Share Posted September 5, 2005 Ola O comando(bClrStd) abaixo tambem serve para diferenciar feminino e masculino ou outro qualquer. TESTADO COM XBROWSE #Define CLR_LGRAY nRGB( 230, 230, 230 ) #Define CLR_LGREEN nRGB( 190, 215, 190 ) oBrw:bClrStd := { ||{CLR_BLACK, IIF( ( oBrw:cAlias )->( OrdKeyNo() ) %2 == 0, ; CLR_LGRAY, CLR_LGREEN ) }} Yrece fwh 2.6 xharbour comercial xbuild Pelles Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.