Stringgrid inkl. Umlaute richtig sortieren

[Steven2]

Hallo marabu, komme leider erst jetzt zum antworten.
Das mit den KB war ja nur ein Beispiel, mir geht es um die Umlaute.

Ich will ja nach diesen Umlauten sortieren.
Zur Zeit kann ich mit deinem Beispiel nur einen Umlaut überprüfen, wollte halt nach allen in einer Spalte sortieren.

Delphi-Quellcode:

SIZE_SUFFIX = 'Ä'

so, gehts aber nicht :coder2:

Delphi-Quellcode:

SIZE_SUFFIX = 'Ä','Ü','Ö','ä','ü','ö'

Auch will ich nicht nur eine Spalte prüfen sondern auch in allen anderen des Stringgrid's bei denen auf den Spaltenkopf geklickt wird.

Habe ich mich nun verständlicher ausgedrückt?
Wenn nicht mache ich so schnell wie ich kann ein Beispiel fertig.

Freundliche Grüße
Steven

[marabu]

Hallo Steven,

ich fürchte du hast den Suffix aus meinem Code-Beispiel nicht richtig verstanden. Ausgelöst von deinem Beispiel mit den KByte-Werten wollte ich dir zeigen, dass über das Ereignis OnGetFormat() Spaltenwerte sogar dann numerisch korrekt sortiert werden können, wenn sie eingebettet in einem String mit definiertem Prefix oder Suffix stehen. Mit deinen Umlauten und deren Einsortierung nach Telefonbuch-Manier hat das überhaupt nichts zu tun.

Wenn da noch irgendwas sein sollte, was ich übersehe, dann musst du wirklich mal ein illustrierendes Beispiel bringen.

Freundliche Grüße

[Steven2]

Zitat:

Mit deinen Umlauten und deren Einsortierung nach Telefonbuch-Manier hat das überhaupt nichts zu tun.

Hallo marabu...
oh mann, ich hab wohl alles falsch beschrieben.
Ich bin jetzt eine Woche unterwegs, ich mache danach ein Beispiel fertig.
Vielen Dank für deine Hilfe schon mal vorab.

Freundlichen Gruß
Steven

[Steven2]

Endlich habe ich nun das Beispiel fertig.
Es geht mir darum nach wie ich noch nach anderen Umlauten sortieren kann
und wie ich das Sortieren mit einem klick auf die Caption der jeweiligen Spalte machen kann.
Ich hoffe mein Beipiel ist eindeutig.

Freundliche Grüße
Steven

[Steven2]

Mag sich jemand mein Beispiel doch noch ansehen? (evt. auch marabu? :)

LG
Steven

[Steven2]

SORRY **PUSH**

[marabu]

Hi Steven,

auch sorry, aber ich habe deinen Thread erst jetzt wieder gesehen. Ich schaue mir das an, sobald ich kann. Versprochen.

Gute Nacht

[marabu]

Hallo Steven,

du kannst das Event OnClickSort() deines Grids zum Sortieren der Spalten verwenden:

Delphi-Quellcode:

procedure TForm1.AdvStringGrid1ClickSort(Sender: TObject; ACol: Integer);
begin
   with Sender as TAdvStringGrid do
     SortByColumn(ACol);
end;

Du musst vorher noch im Object Inspector die SortSettings ändern: Show und NormalCellsOnly müssen auf True gesetzt werden. Das Ergebnis mit deinen Testdaten sieht für mich vernünftig aus.

Gute Nacht

[Mackhack]

marabu,

fuer was ist denn das shl 16 in deinem Codebeispiel?

[marabu]

Hi Tobias,

SHL - logical shift left? Damit schiebe ich die SORTID an die richtige Stelle:

Code:

+-------------+---------+-------------------------+
|   Reserved  | Sort ID |      Language ID        |
+-------------+---------+-------------------------+
31         20 19     16 15                      0   bit

Freundliche Grüße