Скачать: CL | DM;

Как добавить индексное поле?   Найти похожие ветки 

← →
Gost   (2005-02-14 18:08) [0]

Как добавить индексное поле "AZZ", если таблица создается таким методом:
      with FieldDefs do
       begin
         Clear;
          with AddFieldDef do
          begin
            Name := "AZZ";
            DataType := ftString;
            Size := 16;
          end;
         with AddFieldDef do
          begin
            Name := "BZZ";
            DataType := ftString;
            Size := 4;
          end;
       end;
       CreateTable;

---

← →
DSKalugin ©   (2005-02-14 18:16) [1]

после того как таблица зоздана методомм
CreateTable;
сделай TTable.AddIndex()

---

← →
Gost   (2005-02-14 18:22) [2]

Т.е.

.......
with AddFieldDef do
         begin
           Name := "BZZ";
           DataType := ftString;
           Size := 4;
         end;
      end;
      CreateTable;
      Table1.AddIndex("AZZ");
?

---

← →
Anatoly Podgoretsky ©   (2005-02-14 20:11) [3]

Где ты такой синтаксис обнаружил, совсем не соответствует справке.

---

← →
DSKalugin ©   (2005-02-14 20:50) [4]

см хэлп F1 TTable.AddIndex()
там еще надо заполнить другие параметры

procedure AddIndex(const Name, Fields: String; Options: TIndexOptions, const DescFields: String="");

type
 TIndexOption = (ixPrimary, ixUnique, ixDescending, ixCaseInsensitive, ixExpression, ixNonMaintained);
 TIndexOptions = set of TIndexOption;

пример
Table1.AddIndex("NewIndex", "CustNo;CustName", [ixUnique, ixCaseInsensitive]);


ЗЫ индекс будет обновляемым только при наличии первичного индекса в таблице парадокс

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c