FiveTech Software tech support forums

Pues eso.. camaradas, como le puedo hacer un GoTop o poner en el primer item a un tree al momento de pintarlo. cada vez que refresco el tree siempre me muestra los ultimos items. Este es el codigo que actualiza el tree segun los items que tenga ...

Mr James

James Bott wrote:Falconi,

Since xBrowse can now also handle database objects, it would be nice if your report method could handle them too.

I also suggest adding a gotop() before the report and saving and restoring the current recno().

James

XBrowse Report method does this gracefully.

Falconi,

Since xBrowse can now also handle database objects, it would be nice if your report method could handle them too.

I also suggest adding a gotop() before the report and saving and restoring the current recno().

James

... := "catlineasi" oBaset := TMsTable():New( oDb, cTabla ) if !oBaset:Open() return( nil ) endif aLi := {} If !Empty( oBaset:LastRec() ) oBaset:GoTop():Read() While !oBaset:Eof() Aadd( aLi, { oBaset:FieldGet( 1 ), oBaset:FieldGet( 2 ) } ) oBaset:Fetch() EndDo EndIf oBaset:Destroy() if oWndFact01 ...

... Insert( Val ) METHOD Update( Val ) INLINE ::aList[ ::Pos ] := Val MESSAGE Delete() METHOD _Delete() /* Movimiento */ METHOD GoTo( n ) METHOD GoTop() INLINE ::GoTo( 1 ) METHOD GoBottom() INLINE ::GoTo( ::Size ) METHOD First() INLINE ::GoTo( 1 ) METHOD Last() INLINE ::GoTo( ::Size ) METHOD ...

... Clasificación Clientes" DBSELECTAREA("jlclicla"); jlclicla->(OrdSetFocus(nIndice)); jlclicla->(DBGOTOP()) DATABASE oDbfClaCli; oDbfClaCli:GoTop(); oDbfClaCli:Blank(); nRecno := RecNo() REDEFINE LISTBOX oLbxClaCli; FIELDS jlclicla->&(FIELDNAME(1)), jlclicla->&(FIELDNAME(2)); ...

... painted correctly. I have already downloaded 8.04 but I think 8.04 and 8.03 may not be much different. Refresh( .t. )'s intended behavior is to GoTop. Normally we should use Refresh only. We should use Refresh(.t.) when we want gotop also. > oBrw:bBookMark := {| n | iif( n == nil,TEST->(RecNo()), ...

... dialogo tengo botones para ir al primer registro, siguiente, anterior y ultimo registro. El caso es que va bien el movimiento con los metodos oBrw:Gotop(), etc., colocando el puntero y el browse. Pero cuando hago una busqueda mediante el indice: select (cAlias1) ordsetfocus(1) if ...

Uwe,
I use:
local nIndex:=0


MENUITEM "Select" ACTION ( oBrw:GoTop(), oBrw:nArrayAt := nIndex, oBrw:Refresh() )

hello! xbrowse fwh0802 oBrw:Refresh() not work. After oBrw:Delete() if i use oBrw:Refresh() the record deleted still display in browse.
If i use oBrw:Delete(),oBrw:GoTop() and oBrw:Refresh() work great.

Thanks.

... ACTION ( ADel( aLin, oBrw:nArrayAt ), ASize( aLin, Len( aLin ) - 1 ), oBrw:SetArray( aLin ), oBrw:Refresh() ) MENUITEM "Select" ACTION ( oBrw:GoTop(), oBrw:nArrayAt := 3, oBrw:Refresh() ) ENDMENU ACTIVATE POPUP oMenu WINDOW oBrw AT nRow, nCol return nil _________________ regards, saludos Antonio ...

... case nKey == VK_RIGHT if oWnd:oHScroll != nil .and. oWnd:oHScroll:nMax > 0 oWnd:oHScroll:GoDown() endif case nKey == VK_HOME oWnd:oVScroll:GoTop() oWnd:oHScroll:GoTop() oMeta1:SetOrg(0,0) oMeta1:Refresh() case nKey == VK_END oWnd:oVScroll:GoBottom() oWnd:oHScroll:GoBottom() oMeta1:SetOrg(.8*DEVICE:nHorzRes(),.8*DEVICE:nVertRes()) ...

... If aFiltro[1] > 0 /* Se abren las bases. -----------------*/ ::oTdbfEntita := oDbfClon( ::ArraJuva, "ENTITA" ) ::oTDbfEntita:GoTop():Load() ::oTdbfFactur := oDbfClon( ::ArraJuva, "FACTUR" ) ::oTdbfConFac := oDbfClon( ::ArraJuva, "CONFAC" ) ::oTdbfArticu := oDbfClon( ::ArraJuva, ...

... SET_INDEX(oBrw5,cFELD,cFILTER), ; IIF(DBFTYP = "CDX", ; cINDKEY := ORDKEY( "NEUINDEX" ), ; cINDKEY := INDEXKEY( 0 ) ), ; oBrw5:SetFocus(), ; oBrw5:GoTop(), oBrw5:VGoTop(), oBrw5:Refresh(), ; l_INDEX := .T., oINDKEY:Refresh(), ; oFilter:Refresh(), ; oBrw5:SwapCols( 1, nOrder ), ; // Bring selected ...

... SET_INDEX(oBrw5,cFELD,cFILTER), ; IIF(DBFTYP = "CDX", ; cINDKEY := ORDKEY( "NEUINDEX" ), ; cINDKEY := INDEXKEY( 0 ) ), ; oBrw5:SetFocus(), ; oBrw5:GoTop(), oBrw5:VGoTop(), oBrw5:Refresh(), ; l_INDEX := .T., oINDKEY:Refresh(), ; oFilter:Refresh(), ; oBrw5:SwapCols( 1, nOrder ), ; // Bring selected ...