Konzeptfrage: Sortierfunktion nach Datum (Integer) in TStringList erweitern

[juergen]

@Satty67,
danke für deine Antworten. Da ich in meine (schon abgeleitete) TStringList schon viel Zeit für Erweiterungen investiert habe würde ich momentan eine Umstellung auf ein anderes Listenformat als allerletzte Variante in Betracht ziehen.

@Stahli,
danke für dein Hilfe.
Diesen Weg hatte ich nicht in Betracht gezogen weil ich dachte dass dieses viel zu langsam wäre.
Habe es aber gerade getestet und bin ziemlich erstaunt. Und zwar positiv!
Bei ca. 162.000 Datensätzen dauert die Sortierung nur ca.820 ms. Das wäre sehr gut.
Meine ursprüngliche Sortierung benötigte ca. 310ms. Ich hätte nicht gedacht dass es so schnell ist!

Ich glaube es gibt aber noch ein Problem wenn die Dateinamen gleich wären UND das jeweilige Datum auch.
Dann wäre die Sortierung wieder zufällig, oder?


Vielen Dank für Eure Hilfe!

Edit:
@Stahli, Ich hatte mich anfangs für die TStringList entschieden und erst wesentlich die Vorteile der TObjectList erfahren. Zum Anfang waren die Anforderungen ziemlich übersichtlich. Im Laufe der Zeit kamen aber immer wieder neue Anforderungen hinzu. Ich stand schon mal kurz vor dem Entschluß auf TObjectList umzustellen, dass hätte mir einiges an Arbeit gespart.

[Bbommel]

Zitat von juergen:

Ich glaube es gibt aber noch ein Problem wenn die Dateinamen gleich wären UND das jeweilige Datum auch.
Dann wäre die Sortierung wieder zufällig, oder?

Wo kommen die Dateinamen denn her? Spätestens, wenn du als letzten Schritt auch noch den kompletten Pfad nimmst, muss das ganze doch eindeutig sein, oder?

[juergen]

@Bbommel,

es ist wohl schon zu spät.....
In meiner visuellen Komponeten (Listbox) zeige ich nur die Dateinamen an. Das habe ich wohl gerade durcheinander gebracht.
In meiner TStringList habe ich aber den kompletten Pfad + Dateiname drin. Somit ist natürlich schon alles eindeutig.


Allen eine Gute N8!

[stahli]

Ich verstehe das noch nicht ganz. Wie sehen denn Deine Strings aus?
Zerlegst Du die zum Vergleichen nochmal in Path, Filename, Spez.?

Vielleicht wärst Du mit Objekten wirklich gut bedient?

Delphi-Quellcode:

TMyObject = class
  Path: String;
  FileName: String;
  Spez: String;
  Date: TDate;
end;

Eine ObjectList kannst Du dann mit Sortierfunktionen unterschiedlich sortieren.

Die letzte Entscheidung wäre dann immer die Objektadresse.

---

zu Oben: Bei Result=0 ist die Reihenfolge m.E. zufällig