Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

index [D7, dBase, FoxPro]


rosl ©   (2004-12-14 08:05:00) 

Народ, подскажите. Как программно проверить есть ли индекс по полю, и если нет - создать его?


Соловьев   (2004-12-14 11:30:00) [1]

DbiOpenIndexList + BDE32.hlp


Александр Иванов   (2004-12-14 08:32:00) [2]


i:=0;
while (i<=Table1.IndexDefs.Count) and (Table1.IndexDefs.Items[I].Fields <> 'CustNo;OrderNo') do
 inc(i);
if i>Table1.IndexDefs.Count then
 Table1.AddIndex('NewIndex', 'CustNo;CustName', [ixUnique,ixCaseInsensitive]);


Наверх

Титульная страница Поиск, карта сайта Написать письмо