FiveTech Software tech support forums

... )->( DBEVAL( { || AAdd( aRecNo, RECNO() ) }, { || your condtion } ) )  b) Assign oBrw:aSelected := aRecNo c) oBrw:ToExcel() d) Clear oBrw:aSelected := {} To see how the second method works, first test this small sample XBROWSER "STATES.DBF" ...

... a test and it seems you can use a bitmap and make areas. Here you pass an array with the selected objects - in my case rooms: function main local aSelected := {101,104,107} TEMPLATE PARAMS aSelected and here you // read selection from prg into variable: selected var selected = <?prg return ...

Hola,

no te funciono xq accedes a arraydata y tenes q acceder a oBrw:aSelected ej:

if LEN(oBrw:aSelected) > 0
FOR EACH nPos IN oBrw:aSelected
? oBrw:aArrayData[ nPos, 01 ], oBrw:aArrayData[ nPos, 02 ]
NEXT
endif

Saludos.

... } ; ARRAY aArticulos agrego una columna inicial para el checkbox WITH OBJECT oBrw:InsCol( 1 ) :bEditValue := { || AScan( oBrwPed:aSelected, oBrwPed:Bookmark() ) > 0 } :SetCheck( ,.F.,{'','',''}) :cHeader := 'Sel' END genero el browse y hago un xbrowse(oBrw:aArraydata) aparecen ...

Hola,

probaste :

FOR EACH nRec IN oBrw:aSelected

? oBrw:aArrayData[ nRec,1 ], oBrw:aArrayData[ nRec,2 ], ....

NEXT

Saludos

... con esto: tengo un xbrowse de un ARRAY con una columna agregada para usar checkbox WITH OBJECT oBrw:InsCol( 1 ) :bEditValue := { || AScan( oBrw:aSelected, oBrw:BookMark ) > 0 } en determinadas circunstancias necesito hacer un aEval(oBrw:aArrayData) e identificar que registros son los que ...

Leandro, gracias por responder. Lo que posteaste es la multiseleccion de registros ( aSelected ). Lo que pretendo es poder seleccionar varias celdas, a la vez. Por ejemplo al hacer CTRL + RCLICK sobre cualquier celda, que agregue a un array ( aSelectedCells ) los ...

Gracias al Cristobal Navarro. pongo el codigo completo. muchas gracuas #include "xbrowse.ch" Static aSelected := {} Static oTree //----------------------------------------------------------------------------// Function Main() local oDlg, oImageList, n, ncargo local oBtt2 ...

... modification to your program you get something similar: ... oBrw:SetArray(aData) WITH OBJECT oBrw:InsCol( 1 ) :bEditValue := { || AScan( oBrw:aSelected, oBrw:BookMark ) > 0 } ... Of course, I corrected my program deleting the offending lines ( oBrwO:aCols := {} and oBrwO:SetArray( aOrigen ...

Rodrigo, intenta con oBrw:aSelected

... This method now applies to columns if value is logical even if cDataType is nil. - New method IsSelectedRow() --> .t./.f.: (Same as AScan( ::aSelected, ::bookmark )) - New method SelectRow( nOperation ) --> lSelected. Same as method Select() but works when lMultiSelect is .f.. Useful for ...

I 'm thinking perhaps ... local aselected := {} USE CUSTOMER NEW ALIAS "CUST" SHARED VIA "DBFCDX" Do while .not. cust->(eof()) cText := alltrim(cust->First) IF !Empty( ascan( aTags,cText) ) aadd(aselected,cust->(recno())) ...

nageswaragunupudi wrote:Please try
oBrw:bOnRefresh := { || oSay:Refresh() }

where oSay is

@ r,c SAY oSay PROMPT Len( oBrw:aSelected ) SIZE ............. OF oDlg

Thank you, its working fine.

Please try
oBrw:bOnRefresh := { || oSay:Refresh() }

where oSay is

@ r,c SAY oSay PROMPT Len( oBrw:aSelected ) SIZE ............. OF oDlg

Thank you, It's working fine. I want to expand the possibility to deselect all files of one type. Can I just set the value of the aSelected array to 0 for those records, or should I create a new one? I deleted the record in the oBrw:aSelected array, and now it's working also for deselecting ...