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]

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 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.