>
>Yes, but you can use a case statement in the click of column header:

>Do case
>   case alias() = "TABLE1"
>   case alias() = "TABLE2"
>endcase

Thanks, I need to replace the header like textbox on Init()
because once it set the columncount, all the object in grid will release from
memory including all methods and special properties setting.
So, I need to reset to my favour setting by removeobject and add again!

Another idea from Taiwan site is:

iX = 1
Do While !Empty(Sys(14,iX))
     Note ? 'Index On ' + Sys(14, iX) + 'Tag ' + Tag(iX)
  Dimemsion ArrayTag[iX, 1]
  ArrayTag[iX,1] = Sys(14, iX)  && Or use Tag(iX), donno
  iX = iX + 1
EndDo

If Ascan(ALLTRIM(Thisform.CboField.Value), ArrayTag) > 0
  Set Order To Thisform.CboField.Value
Endif

The Most Interesting Idea is to Redefine the size of array! ^_^'

---

>I will e-mail you my incremental search class for you to test.

Great Thanks! The idea of using Insert Mode is quite new.
Let me trace it!

---

>>>LIKE is strictly for SQL statements. You can issue:

>>>     Locate for "someval" $somefield

>>>which will return records with *someval* anywhere in *somefield*
>>
>>Because I am afraid the user want something in middle.
>>Like '%FC__12%'....
>>
>Locate for "someval" $somefield works exactly like the SQL example:

>   Like '%FC_12%'

Actually, I donno why fail to use:

Locate for Like(MyField, Myvalue) or
Locate For Likec(MyField, Myvalue) = .t.

as like() and likec() can return value .t. if sucessful match!