CheckListBox auf- und absteigend sortieren

[Alex.G]

Hallo.

Eine CheckListBox kann man ja ganz einfach mit

Code:

.Sorted := True;

aufsteigend sortieren.
Ich möchte aber per ButtonClick einstellen können, ob die CLB auf- oder absteigend sortiert werden soll. Muss ich dafür schon einen Sortieralgorithmus benutzen, oder gibt es da einen Einzeiler von Delphi?

Gruß