Tabelle mit Indizies neu erstellen

[Angel4585]

Danke danke, so klappts:

Delphi-Quellcode:

table1.Close;
table1.DatabaseName:=ADB;
if not table1.Exists then    
  begin                                           
  table1.IndexDefs.Clear;
  with table1.IndexDefs.AddIndexDef do
    begin
    Name:='';
    Fields:='Id';
    Options:=[ixPrimary,ixUnique]; 
    end;
  with table1.IndexDefs.AddIndexDef do
    begin
    Name:='SortErledigt';
    Fields:='Erledigt';
    Options:=[ixCaseInsensitive];        
    end;        
  table1.CreateTable;             
  end;
table1.IndexName:='SortErledigt';
table1.Open;

Einmal musste ich einen Primärindex definieren und dann wird eine leere Option nicht akzeptiert, also muss man da was reinschreiben, da ich nicht descending sondern ascending sortieren will, hab ich das halt mal so gelöst.