array of string sotieren

[ferby]

Hallo,

ich habe einen Array of String und möchte den gerne alphabetisch sotiert haben.
Hier im Forum finde ich nur sotieralgorithmen für integer arrays.

kann mir wer weiterhelfen?


Gruß,
ferby

[Klaus01]

Warum nimmst Du keine StringListe, ist mehr oder weniger auch nur ein Array von Strings,
diese kannst Du ganz einfach sortieren. Die Eigenschaft sorted auf true setzen.

Grüße
Klaus

[ferby]

Hallo,

bei mir gibts die eigenschaft sorted nicht??

meinst doch das oder:

Delphi-Quellcode:

procedure TForm1.Work3;
var
  kag: TStrings;
begin
  kag:=TStringList.Create;

  kag.sorted; <-- gibts nicht

  kag.Free;

[DeddyH]

Delphi-Quellcode:

kag.sorted := true;

[edit] Wieso definierst Du die Variable nicht gleich als TStringList? [/edit]

[ferby]

Hallo,

das wars, danke.

In der Delphi Hilfe stands so drin, ka warum^^

[semo]

Weil TStringList eine Ableitung von TStrings ist.

Da nur die TStringList über die Eigenschaft sorted verfügt,
TStrings aber nicht und du eine TStrings Instanz erzeugt hast,
kannst du nicht auf diese property zugreifen.

Lösung wie bereits genannt:

Delphi-Quellcode:

var
  //kag: TStrings; 
  kag: TStringList;

[quendolineDD]

Mal als Anregung zum Fall Array.

Du kannst dir auch den vom Buchstaben zugehörigen ASCII-Code ermitteln, und eine temporäre Liste / 2dimensionales mit den ermittelten (nun Integer und somit vergleichbaren) Werten sortieren. In der ersten Spalte hast du den ermittelten Integer-Wert (ASCII-Code) und in der 2. Spalte den Index, von dem originalen Array.

So müsstest du doch auch Arrays of String sortieren können?!

[mkinzler]

Oder selber QuickSort o.ä. implementieren

[Neutral General]

Also man kann Strings auch einfach mit > < = vergleichen:

Delphi-Quellcode:

if 'Altenheim' > 'Baumhaus' then
  ShowMessage('Altenheim kommt nach Baumhaus im Alphabet!')
else 
  ShowMessage('Baumhaus kommt nach Altenheim im Alphabet!');

Gruß
Neutral General

[jbg]

Zitat:

Zitat von Neutral General

Also man kann Strings auch einfach mit > < = vergleichen

Und jetzt mach aus dem großen "A" mal ein "Ä" und probiere es dann nochmal.

[quendolineDD]

Dies kann dadurch vermieden werden, das 'A' vor 'Ä' kommt aber 'A' gleichwertig mit 'a' ist.

[ferby]

danke für die Tips, aber ich hab das mit ner Stringlist gemacht,
das hat, warum auch immer, einen super neben effekt den ich auch noch gebraucht hätte:
Doppelte Einträge werden gelöscht :-)



Data.KAG steht die unsotierte Elemente in kag dann die sotierten

Delphi-Quellcode:

 kag:=TStringList.Create;
  kag.sorted := true;
  for i:=0 to anzahl_elemente-1 do kag.Add(DATA[i].KAG);

doppelte Einträge werden nicht angezeigt.

[grenzgaenger]

Zitat:

Zitat von quendolineDD

Mal als Anregung zum Fall Array.

Du kannst dir auch den vom Buchstaben zugehörigen ASCII-Code ermitteln, und eine temporäre Liste / 2dimensionales mit den ermittelten (nun Integer und somit vergleichbaren) Werten sortieren. In der ersten Spalte hast du den ermittelten Integer-Wert (ASCII-Code) und in der 2. Spalte den Index, von dem originalen Array.

So müsstest du doch auch Arrays of String sortieren können?!

nur mal so als hinweis, die tstringlist, ist 'n array mit methoden um dieses array of strings zu verwalten... also genau das richtige... oder zum selber schreiben ??? ;-)

[MStoll]

Hallo,

unabhängig vom Datentyp gibt's in der Code-Library 2 Beiträge mit allgemeinen Sortier-Möglichkeiten (einmal mit Objekten und einmal auf Pointer-Basis). Also einfach 'ne kleine Compare-Funktion schreiben (in diesem Fall für Strings) und dann ist man schon fertig.

Möglichkeit 1
Möglichkeit 2

Gruß
Michael

[grenzgaenger]

Zitat:

Zitat von MStoll

Hallo,

unabhängig vom Datentyp gibt's in der Code-Library 2 Beiträge mit allgemeinen Sortier-Möglichkeiten (einmal mit Objekten und einmal auf Pointer-Basis). Also einfach 'ne kleine Compare-Funktion schreiben (in diesem Fall für Strings) und dann ist man schon fertig.

Möglichkeit 1
Möglichkeit 2

Gruß
Michael

tja ganz so is es nicht. die sortieralgos die setzen bestimmte datentypen/-strukturen voraus damit sie effizient angewendet werden können. :mrgreen: :mrgreen:

[MStoll]

Zitat:

Zitat von grenzgaenger

Zitat:

Zitat von MStoll

Hallo,

unabhängig vom Datentyp gibt's in der Code-Library 2 Beiträge mit allgemeinen Sortier-Möglichkeiten (einmal mit Objekten und einmal auf Pointer-Basis). Also einfach 'ne kleine Compare-Funktion schreiben (in diesem Fall für Strings) und dann ist man schon fertig.

Möglichkeit 1
Möglichkeit 2

Gruß
Michael

tja ganz so is es nicht. die sortieralgos die setzen bestimmte datentypen/-strukturen voraus damit sie effizient angewendet werden können. :mrgreen: :mrgreen:

Wie meinste das genau?
Möglichkeit 2 setze ich bei allen möglichen Datentypen ein und das geht eigentlich immer sehr gut. Dazu braucht man nur ne Vergleichsfunktion, das Austauschen geht ja byteweise.

[alzaimar]

Na ja, wie wärs dann einfach mit einer TList und einem Sort? Dann spart man sich die ganze Rumkopiererei, die doch sowieso überflüssig ist.