Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#6

Re: TDataSet natürlich sortieren

  Alt 10. Jan 2007, 10:26
1.) alle Records aus dem zu sortierenden Feld in eine Stringliste füllen
2.) Stringliste in "natürlicher Reihenfolge" sortieren
3.) die Tabelle erhält ein neues Feld namens "SortNum" vom Typ integer
4.) Schleife über die sortierte Stringliste und entsprechend viele SQL Update ausfühen
UPDATE Tabelle SET SortNum=:Index WHERE Keyfeld=:ItemString 5.) jetzt folgende SQL-Abfrage benützen:
SELECT * FROM Tabelle ORDER BY SortNum Die Schritte 1.) bis 4.) müssen nur dann ausgeführt werden, wenn sich die Persnummern ändern.
Neu Datensätze würden ganz oben einsortiert werden, da "SortNum" eines neuen Datensatz erstmal mit 0 vorbelegt wird.
Andreas
  Mit Zitat antworten Zitat