FiveTech Software tech support forums

... :bFooter := { || Len( oBry:aSelected ) } END WITH OBJECT :Importe :nFooterType := AGGR_SUM :bSumCondition := { || AScan( oBry:aSelected, oBry:BookMark ) > 0 } :cFooterPicture:= "@Z 9,999,999,999.99" :nTotal := 0.00 :lTotal := (.T.) END :bOnMultiSelect := { || oBry:MakeTotals() ...

... oBrw:lFooter:= .t. 2) cuando definis la columna WITH OBJECT :Importe :nFooterType := AGGR_SUM :bSumCondition := { || AScan( oBry:aSelected, oBry:BookMark ) > 0 } :cFooterPicture := "@Z 9,999,999,999.99" // estas lineas :nTotal := 0 :lTotal := .t. END Espero te sirva. Saludos.

... at the beginning I insert a column to create the setcheck WITH OBJECT oBrw:InsCol(1) :nwidth:= 30 :bEditValue := { || AScan( oBrw:aSelected, oBrw:BookMark ) > 0 } :SetCheck( nil, .t.) end :bLDblClick := { || oBrw:oCol( 1 ):CheckToggle(), oBrw:RefreshCurrent() } if the user moves the column ...

... However, if you execute a Requery on the original Recordset, the clones will no longer be synchronized to the original. The provider must support bookmarks on the Recordset object to create clones. Bookmarks are interchangeable; a bookmark reference from one Recordset object refers to the same ...

... ; 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 los 3 registros ...

... 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 estan marcados para ...

... oBrw2, oBrw1 ), nil ) } :bGotFocus := { || SyncBrowses( oBrw2, oBrw1 ) } //------------ FUNCTION SYNCBROWSES( oBrw1, oBrw2 ) WITH OBJECT oBrw2 :BookMark := oBrw1:BookMark :nRowSel := oBrw1:nRowSel :Refresh() END RETURN NIL regards Uwe :D

Dear friends,
please bookmark the new domain.

http://modharbour.org

Best regards,
Otto

Dear friends,
please bookmark the new domain.

http://modharbour.org

Best regards,
Otto

You bookmark them and keep them in a folder of bookmarks in your browser.
Delete the bookmarks that finish reading.

I have to store the recno of the Xbrowse before I edit the record.

Xbrowse executes agetbarlist first and then it executed bonchange event as far as I can tell, because the bookmark I get is the one on the new position (afther the change)

Therefore I can not get back to the previous recno.

nRecNo := oBrw:BookMark

oBrw:BookMark := nRecNo

... 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 ) ) and changing ...

... 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 programmer ...

... :nHeadStrAlign := AL_CENTER :nEditType := EDIT_BUTTON :bEditBlock := { ||RES->QUANTITY++ } :lBtnTransparent := .t. :bEditWhen := { || oBrw:BookMark == 1 } END not run it add the quantity also the record number 1 I think ed something of :bEditWhen := { ||oBrw:aArrayData:nat<>1 } where ...