Hi
lege meine Indexe immer nach fogendem Muster an :
In der Tabelle habe ich immer ein Feld, das einen eindeutigen Index erzeugt.
(beim Erstellen der Tabelle muß das ein AutoincFeld sein ,
hier nIndex: = Autoinc)
Delphi-Quellcode:
procedure Chk4IndexAdressen;
Begin
With TTable.Create(Nil) Do
Begin
try
databasename:='';
TableName :='C:\daten\TblName.db';
Exclusive := True;
Open;
indexdefs.update;
if IndexDefs.Count = 0 then
begin
IndexDefs.Clear;
// nindex ist ein Feldtype Autoinc
AddIndex('','NIndex', []+[ixPrimary]+[ixUnique]);
AddIndex('Adresse','Ort;Name', []);
AddIndex('Name','Name;Ort', []);
end;
Close;
finally
Free;
end;
End;
end;
Die Sortierungen werden im gleichen Verzeichnis abgelegt, wie die eigentliche Tabelle.
Zu erkennen an gleichem Tabellennamen mit den Endungen *.px, *.y* und *.x*
[edit=MrSpock]Code Tags hinzugefügt.[/edit]