我添加了index,但是不知道如何激活?或者不需要激活?
谢谢。

解决方案 »

  1.   

    创 建 表 索 引 (Paradox)
    ---- (1) 用Table.AddIndex 来 实 现 
    ---- 方 法:AddIndex( IndexName,FieldNames,Options ) 
    ---- 其 中:( 详 见Delphi 帮 助) 
    ---- IndexName: 索 引 名 称, 仅 在 指 定 次 索 引 时 有 作 用. 
    ---- FieldNames: 索 引 域, 可 指 定 多 个 域, 各 域 之 间 用 分 号 隔 开, 如'Field1;Field2;Field3' 
    ---- Options: 索 引 选 项, 可 为[ixPrimary, ixUnique, ixDescending, ixCaseInsensitive, ixExpression] 
    ---- 其 中: 
    ---- ixPrimary : 建 立 的 索 引 为 主 索 引( 不 适 用 于dBase 数 据 表). 
    ---- ixUnique : 不 允 许 重 复 值 的 索 引. 
    ---- ixDescending: 按 降 序 索 引. 
    ---- ixCaseInsensitive: 索 引 排 序 时 按 忽 略 大 小 写( 不 适 用 于dBase 数 据 表). 
    ---- ixExpression: 建 立 表 达 式 索 引( 适 用 于Delphi3.0, 仅 适 用 于dBase 数 据 表). 
    ---- ixNonMaintained: 是 否 不 需 要BDE 自 动 维 护( 适 用 于Delphi1.0). ---- 下 面 是 一 个 例 子: ---- 假 设 有 一 个 存 放 通 讯 录 数 据 表MyComm.DB( 类 型 为Paradox) 存 放 于 本 地 目 录d:\mynote 下, 现 建 立 一 个 主 索 引( 索 引 域 为 编 号ID) 和 一 个 次 索 引( 索 引 域 为 编 号ID 和 姓 名Name, 索 引 名 称 为NameIndex).   with table1 do
         begin
       close;
       Exclusive := true;
       DatabaseName := 'd:\MyNote';
       TableName := 'MyComm.DB';
       Open;   {建立主索引 }
       AddIndex('','ID',[ixPrimary]);   {建立次索引 }
       AddIndex('NameIndex','ID;Name',[]);
       
       close;
         end;