[Gambas-user] How do i use columnview.MoveBelow() ?
ron
ronstk at ...239...
Sun Mar 28 18:24:58 CEST 2004
Sorry I send this one direct to your email but I'm desperate
I just got problem report of the server in germany on a project
I have running for friend in Tenerife.
If you want to release it as you made now there is no problem.
General the way you do is good.
For the columnview I can not get it working.
I click on a entry in the column view
Put the key for that item in the columnview.tag
Then next code runs if the Find Next is pressed
skey=cvwFindList.tag < -- gives the good value
' if key is set goto it
IF cvwFindList.tag THEN
cvwFindList.moveto(cvwFindList.tag) '<-- it is already
cvwFindlist.Item.Selected=TRUE <-- object not found
ENDIF
' make it the active one, it is already but....
cvwfindlist.moveCurrent()
cvwFindlist.Item.Selected=TRUE
' is it
IF cvwFindlist.Available THEN
cvwFindlist.Item.Selected=TRUE
cvwFindlist.MoveBelow()
cvwFindlist.Item.Selected=TRUE
' get the next key to go after rebuild
TRY sKey=CStr(cvwFindlist.Key)
ENDIF
' do somthing, rebuild the columnview
search(FALSE, FALSE)
' check if the old exists, goto and select
IF cvwfindlist.Exist(sKey) THEN
cvwFindList.moveto(sKey)
cvwFindlist.Item.Selected=TRUE
ENDIF
Where o where do I something wrong.??????
My wish was simple
' get current for going to default
skey=cvwFindList.key
' do something, rebuild the columnview
search(FALSE, FALSE)
if skey then
if cvwFindList.exist(sKey) then cvwFindList.moveto(sKey)
cvwFindlist.Item.Selected=TRUE
endif
'and ready
I'm also afraid that the .Item.Selected will fire the columnview_click event
and that is not true, the user did not select any thing.
Ron
More information about the User
mailing list