Form variable / Increamental search 2

[astech]

I have a form with 1 grid and 1 textbox, In the form, created 4 property : tnmtable,tnmdata,tkdData,tfind.
Table in Use: Tblgroup (ckdGroup,cNmGroup)

Form1.tnmtable=Tblgroup
Form1.tnmdata=cNmGroup
Form1.tKdData=cKdGroup

in Form.init wrote :
**************************

SELECT (thisform.tnmtable)
SET ORDER TO thisform.tnmdata

WITH thisform.GrdCari
.ColumnCount = 2
.RecordSource = THISFORM.tnmtable
.RecordSourceType = 1
.readonly =.T.
.columncount = 2
.scrollbars = 2
.fontname = 'Tahoma'
.fontsize = 8
.Width = 508

.column1.Header1.Caption='Name'
.column1.controlsource =thisform.tnmdata
.column1.width =237
.column1.fontname ='Tahoma'
.column1.fontsize =8

.column2.Header1.Caption='code'
.column2.controlsource =thisform.tkddata
.column2.width =237
.column2.fontname ='Tahoma'
.column2.fontsize =8
.Refresh
ENDWITH
**********************************

The data success to display in grid, but how to use incremental search in textbox.interactivechange:
THISFORM.tfind=" "
THISFORM.tfind=allt(This.Value)
If Not Empty(THISFORM.tfind)
*** The Question is how to handle this code below :
*** Upper(thisform.tnmdata)
*** Because the filter key is not the data of cNmGroup
*** But it show as 'cNmGroup'
Set Filter To Upper(thisform.tnmdata)=Upper(Allt(THISFORM.tfind))
Else
Set Filter To
Endif
Thisform.Refresh
*
Thanks before for all your support

 

[DSummZZZ]

Not sure what you're asking, but maybe this will help:

How to make an incremental search in Grid
faq184-1214


-Dave S.-

Even more Fox stuff at:

http://www.davesummers.net/foxprolinks.htm

 

[BPeisch]

I have an incremental search textbox that works with a grid available for download from

http://www.peisch.com/downloads.html

. Look for the file called GridSearch.zip.


-BP (Barbara Peisch)

http://www.peisch.com