Причуда AddIndex - Delphi Sources FAQ

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Причуда AddIndex

Автор: Mike Orriss

Подведены итоги лотереи "Windows 2000":
1. Выиграла фирма MicroSoft.
2. Разыграны миллионы чайников.

При попытке использования AddIndex я получаю ошибку 'Invalid Index/Tag name. (Неверное имя Индекса/Тэга) Index: cusname'. Но у меня нет никаких проблем с этим именем при использовании DeleteIndex.

Есть глючокс с именемани индексов:

if IndexName = Fieldname then
  ixCaseSensitive is reqd //(по умолчанию)
if IndexName <> Fieldname then
  ixCaseInsensitive is reqd

Таким образом, вам нужно:

InvTbl.AddIndex('cusname', 'name', [ixCaseInsensitive]);

или

InvTbl.AddIndex('name', 'name', []);