Индекс для DBF-файла

← →
zzzrrv (2003-08-04 15:41) [0]

Знатоки помогите. Пытаюсь создать ndx-индекс для dbf-таблицы: Form1.Table2.Active:=False;
Form1.Table2.Exclusive:=True;
Form1.Table2.Active:=True;
with NewIndex do begin
szName := "bnkseek.ndx";
iIndexId := 0;
bPrimary := False;
bUnique := False;
bDescending := False;
bMaintained := False;
bSubset := False;
bExpIdx := True;
szKeyExp := "NEWNUM";
( Form1.Table2.dbhandle, Form1.Table2.handle, PChar(Form1.Table2.TableName) Знатоки помогите. Пытаюсь создать ndx-индекс для dbf-таблицы: Form1.Table2.Active:=False;
Form1.Table2.Exclusive:=True;
Form1.Table2.Active:=True;
with NewIndex do begin
szName := "bnkseek.ndx";
iIndexId := 0;
bPrimary := False;
bUnique := False;
bDescending := False;
bMaintained := False;
bSubset := False;
bExpIdx := True;
szKeyExp := "NEWNUM";
bCaseInsensitive := False;
end;
DbiAddIndex(Form1.Table2.dbhandle, Form1.Table2.handle, PChar(Form1.Table2.TableName), szDBASE, NewIndex, nil);

Проходит без ошибок, но индекс не создается. В чем ошибка подскажите.

← →
AbrosimovA (2003-08-04 16:04) [1]

Смею предположить, что необходимо сделать так:

Form1.Table2.Close; Form1.Table2.Exclusive:=true; ***Здесь создаёшь свой индекс*** Form1.Table2.Exclusive:=false; Form1.Table2.Open;

← →
zzzrrv (2003-08-04 16:18) [2]

У меня уже стоит
Form1.Table2.Active:=False;
Не помогает.

← →
zzzrrv (2003-08-04 16:43) [3]

Неужели никто не поможет!

← →
AbrosimovA (2003-08-04 16:46) [4]

C MDX-индексами не дружишь?

← →
zzzrrv (2003-08-04 16:48) [5]

Нет

Индекс для DBF-файла Найти похожие ветки