XBROWSE Questions

[byte-one]

1.)
I have 2 xbrowses with identical number of rows . The first xbrowse have a vert-scroll , the second are not. Now i will synchronize the actual row in the second browse by moving of the first browse.
Currently in the first xbrowse i have:

Code: Select all  Expand view

….ON CHANGE oBrw2:nArrayAt := oBrw1:nArrayAt,oBrw2:refresh();

It is functioning, but the visible rows are different.

2.)
If i will paint nColdivider in a col with another color, this color are not in all cases are painted correct with the color from this col when i change the lines!

Code: Select all  Expand view

oBrw:nColDividerStyle := LINESTYLE_BLACK
oBrw:aCols[i]:nColDividerStyle := LINESTYLE_BLACK
oBrw:aCols[i]:nColDividerColor := CLR_WHITE

[ukoenig]

Günther,

1.)
I have 2 xbrowses with identical number of rows . The first xbrowse have a vert-scroll , the second are not. Now i will synchronize the actual row in the second browse by moving of the first browse.

I needed the same solution for a language-translation

browser 1

:lColChangeNotify := .t.
:bChange := { || If( oBrw1:lFocused, SyncBrowses( oBrw1, oBrw2 ), nil ) }
:bGotFocus := { || SyncBrowses( oBrw1, oBrw2 ) }

browser 2

:lColChangeNotify := .t.
:bChange := { || If( oBrw2:lFocused, SyncBrowses( 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

[nageswaragunupudi]

I remember to have posted a sample for synchronized browses a long time back in this forum. Using Mr. Uwe's tool we may find it I guess.

[ukoenig]

FOUND

viewtopic.php?f=3&t=34372&p=204007&hilit=sync#p204007

best regards
Uwe