Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Paradox7 Tabelle Abphabetisch sortieren

  Alt 6. Jul 2005, 10:01
Hallo Christian,

du musst tatsächlich einen Index anlegen - am besten beim Entwurf deiner Tabelle. In deiner Anwendung kannst du dann über die Eigenschaft IndexName deiner TTable-Komponmente zwischen verschiedenen Index-Dateien hin und herschalten (siehe Online-Hilfe).

Delphi-Quellcode:
procedure AssertIndex(table: TTable; indexName, fieldNames: string; indexOptions: TIndexOptions);
var
  sl: TStringList;
begin
  sl := TStringList.Create;
  with table do begin
    GetIndexNames(sl);
    if sl.IndexOf(indexName) = -1 then
      AddIndex(indexName, fieldNames, indexOptions);
  end;
end;

begin
  AssertIndex(dm.BeispielTabelle, 'BYNAME', 'NAME', [ixCaseInsensitive]);
end;
Grüße vom marabu
  Mit Zitat antworten Zitat