Questions about indexing

lcs0699

I want to use setkey, gotokey to find a certain field that meets the conditions. But the premise is to establish the index of this field

        Table1.close;
        Table1.Exclusive: = true;
        Table1.AddIndex ('ghindex', 'gh', [ixCaseInsensitive]);
        Table1.IndexName: = 'ghindex';
        table1.Exclusive: = false;
        table1.open;
        table1.SetKey;
        Table1.FieldByName ('gh'). Asstring: = edit1.text;
When running, I am always prompted that table is busy. I have tried many times, but it still does n’t work, please master

yourapy

table1.open;//This sentence is an operation that does not return a set
Change execsql to see

Why not directly use SQL sentences to create an index, I have never touched the AddIndex of query,
You might as well find an example of this function and compare it.

guyuqiqi

You can build the index of the corresponding field in the database desktop in advance, and apply