Задачи по Python с решениями

   
На этом шаге мы рассмотрим свойства, позволяющие получать информацию об индексах.

   
Свойство IndexDefs компонента TTable содержит ссылку на объект класса TIndexDefs.
С помощью свойств и методов этого класса можно получить информацию об индексах таблицы.

Таблица 1. Основные свойства TIndexDefs

   
Например, данная процедура запишет в TListBox имена всех индексов и поля, по которым этот индекс построен.

procedure View;
begin
  ListBox1.Clear;
  Table1.IndexDefs.Update;
  for i:=0 to Table1.IndexDefs.Count - 1 do
    ListBox1.Items.Add (Table1.IndexDefs[i].Name +' '+
                Table1.IndexDefs[i].Fields); 
end;

   
Замечание. Перед считыванием значений свойств TIndexDefs необходимо
выполнить метод IndexDefs.Update для обновления информации обо всех имеющихся индексах. Для таблиц
Paradox первичный индекс не имеет имени и для него в свойстве Name возвращается пустая строка.

   
На следующем шаге мы рассмотрим установку текущего индекса.