in einer Anwendung mit der ich durch eine DBF browse habe ich Teile aus den Beispielprogrammen verbastelt. Nach jeder Eingabe eines Buchstabens in ein Suchfeld wird nach dem Teilbegriff gesucht und der Cursor im Browse gesetzt. Ich hoffe man kann anhand des Schnipsels erkennen um was es geht. Den ganzen Code wollte ich nicht kopieren.
Code: Alles auswählen
ZITAT .....
ELSEIF a = xbeK_END
oBrowse:gobottom()
ELSEIF a = xbeK_HOME
oBrowse:gotop()
ELSE
SEEK AllTrim(o:EditBuffer()) <--------- der Cursor im Browse wird nach dem Seek richtig positioniert
lClearBuffer := .f.
ENDIF
oBrowse:refreshall()
IF lClearBuffer
cSeek := Space(20)
o:Get:home()
o:setData()
ENDIF
Ende Zitat ...
Code: Alles auswählen
Jetzt im Array
ELSEIF a = xbeK_END
oBrowse:gobottom()
ELSEIF a = xbeK_HOME
oBrowse:gotop()
ELSE
ff:=ascan(wortlist,{|a|a[1]=alltrim(o:Editbuffer())}) <---------
*SEEK AllTrim(o:EditBuffer()) <--------- der Cursor im Browse steht hier
lClearBuffer := .f.
ENDIF
oBrowse:refreshall()
IF lClearBuffer
cSeek := Space(20)
o:Get:home()
o:setData()
ENDIF
Danke für jeden Tip.
Ewald