atnsoft Posted March 26, 2007 Report Share Posted March 26, 2007 Alguém tem um exemplo de browse com chekbox? AtnSoft Harbour 1.0 / xHarbour 0.99.71 / Verce / fwh 7.01 Quote Link to comment Share on other sites More sharing options...
atnsoft Posted March 26, 2007 Author Report Share Posted March 26, 2007 Alguém tem um exemplo de browse com chekbox? AtnSoft Harbour 1.0 / xHarbour 0.99.71 / Verce / fwh 7.01 Quote Link to comment Share on other sites More sharing options...
eevaldo Posted March 27, 2007 Report Share Posted March 27, 2007 eu tenho com Listbox acessando diretamente um dbf serve??? Evaldo Wagner FiveWin2.4 Clipper5.2e xHarbour for Linux Blinker7.0 @say softwag@oi.com.br Quote Link to comment Share on other sites More sharing options...
atnsoft Posted March 27, 2007 Author Report Share Posted March 27, 2007 Claro. AtnSoft Harbour 1.0 / xHarbour 0.99.71 / Verce / fwh 7.01 Quote Link to comment Share on other sites More sharing options...
Pablo.Softgraf Posted March 27, 2007 Report Share Posted March 27, 2007 TWBROWSE ou TCBROWSE ??? Pablo Andrés Reyes Rivera FWH 2.7 - xHarbour Compiler build 0.99.61 (SimpLex) - Workshop Quote Link to comment Share on other sites More sharing options...
atnsoft Posted March 27, 2007 Author Report Share Posted March 27, 2007 O que tiver mais a mão. AtnSoft Harbour 1.0 / xHarbour 0.99.71 / Verce / fwh 7.01 Quote Link to comment Share on other sites More sharing options...
aferra Posted March 27, 2007 Report Share Posted March 27, 2007 tanto para tc/ts browse ADD COLUMN TO BROWSE oBrwPro4 DATA ARRAY ELEMENT 4 TITLE " + " ALIGN DT_CENTER SIZE 25 3DLOOK TRUE CHECKBOX EDITABLE MOVE DT_MOVE_NEXT Alessandro F. Silvaid=blue> FW2.0d+CL53b+Blinker 7.0+@Say+CDX MSN: ferracini_silva@hotmail.com Ribeirão Preto/SP O que sabemos é uma gota. O que ignoramos é um oceano.id=red> Quote Link to comment Share on other sites More sharing options...
Kbelo Posted March 27, 2007 Report Share Posted March 27, 2007 citação:tanto para tc/ts browse ADD COLUMN TO BROWSE oBrwPro4 DATA ARRAY ELEMENT 4 TITLE " + " ALIGN DT_CENTER SIZE 25 3DLOOK TRUE CHECKBOX EDITABLE MOVE DT_MOVE_NEXT Alessandro F. Silvaid=blue> FW2.0d+CL53b+Blinker 7.0+@Say+CDX MSN: ferracini_silva@hotmail.com Ribeirão Preto/SP O que sabemos é uma gota. O que ignoramos é um oceano.id=red> id=quote>id=quote>Com listbox é possivel??? Marcelo Michels celo.michels@ibestvip.com.br celo.michels@hotmail.com marcelo@lorenzi.com.br -> Lorenzi Soluções Têxteis <- Criciuma - SC xHarbour build 0.99.2 + WS Quote Link to comment Share on other sites More sharing options...
aferra Posted March 27, 2007 Report Share Posted March 27, 2007 pelo o que o Evaldo disse sim, mas eu nunca mexi com o listbox, então não sei lhe informar. Alessandro F. Silvaid=blue> FW2.0d+CL53b+Blinker 7.0+@Say+CDX MSN: ferracini_silva@hotmail.com Ribeirão Preto/SP O que sabemos é uma gota. O que ignoramos é um oceano.id=red> Quote Link to comment Share on other sites More sharing options...
laurenti Posted March 27, 2007 Report Share Posted March 27, 2007 Olha se te ajuda..... local aHBitMaps:= { LoadBitmap(GetResources(), 'C_CHF' ),LoadBitmap(GetResources(), 'C_CHT' ) } local aDocs:={ { space( 1 ), space( 3 ), space( 35 ), space( 5 ) } } REDEFINE LISTBOX oLbx2 FIELDS iif(aDocs[olbx2]=' ',aHBitMaps[1],aHBitMaps[2] ),; aDocs[olbx2],substr( aDocs[olbx2],1,30 ) ; ID 900 FIELDSIZES 20,30,230 ; HEADERS ' S/N ',' Cód ',' Descrição '; ON DBLCLICK MarcaDesVet( aDocs, oLbx2 ) oLbx2:nLineStyle := 2 oLbx2:nHeaderStyle:= 2 oLbx2:bBkColor:= {|nRow,nCol,nStyle| if( nStyle==1,CLR_RED, ) } oLbx2:bTextColor:= {|nRow,nCol,nStyle| if( nStyle==1,CLR_YELLOW, ) } oLbx2:aJustify:= { 2, 2, .f. } olbx2:SetArray( aDocs ) olbx2:refresh() function MarcaDesVet( aVetor, olbx, cMarDesAll ) local x DEFAULT cMarDesAll:=' ' if cMarDesAll$'DM' for x=1 to len( aVetor ) aVetor[x,1]:=iif( cMarDesAll='M',if( aVetor[x,1]='*',' ','*' ),' ' ) next else if aVetor[olbx] = ' ' aVetor[olbx] := '*' else aVetor[olbx] := ' ' endif endif oLbx:Refresh() return .t. FW26/XH9950/Pelles/Mysql/Java laurentinocarlos@gmail.com Rio de Janeiro/Montes Claros MG 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.