TStringList absteigend sortieren

**XxnemesisxX49**

Juhu, es funktioniert, danke

Ich hab noch eine Frage.
Wenn ich jetzt Zahlen mit Namen sortieren will, funktioniert die Methode nicht mehr, weil die Namen ja keine Integers sein können.
Bsp.:
2000 Peter
500 Hans
20 Alex

Gibt's da auch eine Lösung, die nicht all zu schwer ist?

**himitsu**

Dieses nennt sich z.B. "Natural Sort" oder Dergleichen.

Es gibt schon irgendwo fertige Funktionen für diesen Vergleich, aber im Prinzip läuft es auf das selbe Grundprinzip hinaus.
Die Strings werden in Buchstaben- und Nummernblöcke aufgeteilt und dann werden von vorne nach hinten die Blöcke "getrennt" verglichen.
Also ein Teil wird verglichen, bei Gleichheit wird der nächste Block verglichen und bei Ungleichheit wird dieses Ergebnis oder das letzte Ergebnis zurückgegeben.

**Medium**

Definiere "all zu schwer"

Zitat von XxnemesisxX49:

Gibt's da auch eine Lösung, die nicht all zu schwer ist?

Ja. Hast Du es schon selbst versucht? Wie würdest Du an die Sache herangehen?

Schau Dir mal die Befehle Delphi-Referenz durchsuchen

Pos und

Copy an.

**Bummi**

Je nach Datenherkunft bist Du am schnellsten wenn Du den numerischen Teil mit führenden "0" auf gleiche Längen bringst und dann wieder einen Stringcompare verwendest.

**ibp**

ist zwar nicht meine Art trotzdem sticht mir immer wieder das "abwertend" im Titel ins Auge. Könntest du das bitte in "absteigend" ändern?

Themen-Optionen	Thema durchsuchen
Druckbare Version zeigen Jemanden per E-Mail auf dieses Thema hinweisen	Thema durchsuchen: Erweiterte Suche
Ansicht
Zur Linear-Darstellung wechseln Hybrid-Darstellung Zur Baum-Darstellung wechseln

TStringList absteigend sortieren

AW: TStringList abwertend sortieren

AW: TStringList abwertend sortieren

AW: TStringList abwertend sortieren

AW: TStringList abwertend sortieren

AW: TStringList abwertend sortieren

AW: TStringList abwertend sortieren

Stichworte

Forumregeln

XxnemesisxX49 Registriert seit: 4. Sep 2012 14 Beiträge	#1 AW: TStringList abwertend sortieren 4. Sep 2012, 23:15 Juhu, es funktioniert, danke Ich hab noch eine Frage. Wenn ich jetzt Zahlen mit Namen sortieren will, funktioniert die Methode nicht mehr, weil die Namen ja keine Integers sein können. Bsp.: 2000 Peter 500 Hans 20 Alex Gibt's da auch eine Lösung, die nicht all zu schwer ist?
	Zitat

Medium Registriert seit: 23. Jan 2008 3.689 Beiträge Delphi 2007 Enterprise	#3 AW: TStringList abwertend sortieren 4. Sep 2012, 23:48 Definiere "all zu schwer" "When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
	Zitat

Furtbichler (Gast) n/a Beiträge	#4 AW: TStringList abwertend sortieren 5. Sep 2012, 06:49 Zitat von XxnemesisxX49: Gibt's da auch eine Lösung, die nicht all zu schwer ist? Ja. Hast Du es schon selbst versucht? Wie würdest Du an die Sache herangehen? Schau Dir mal die Befehle Pos und Copy an.
	Zitat

Bummi Registriert seit: 15. Jun 2010 Ort: Augsburg Bayern Süddeutschland 3.470 Beiträge Delphi XE3 Enterprise	#5 AW: TStringList abwertend sortieren 5. Sep 2012, 07:09 Je nach Datenherkunft bist Du am schnellsten wenn Du den numerischen Teil mit führenden "0" auf gleiche Längen bringst und dann wieder einen Stringcompare verwendest. Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren DRY DRY KISS H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
	Zitat

ibp Registriert seit: 31. Mär 2004 Ort: Frankfurt am Main 1.511 Beiträge Delphi 7 Architect	#6 AW: TStringList abwertend sortieren 5. Sep 2012, 09:16 ist zwar nicht meine Art trotzdem sticht mir immer wieder das "abwertend" im Titel ins Auge. Könntest du das bitte in "absteigend" ändern?
	Zitat