Einzelnen Beitrag anzeigen

Benutzerbild von Gausi
Gausi

Registriert seit: 17. Jul 2005
885 Beiträge
 
Delphi 11 Alexandria
 
#8

AW: Numerische höchster Stringwert

  Alt 21. Nov 2022, 16:17
Dafür musst du eine passende Compare-Funktion nehmen. Wie das genau mit StringList und CustomSort dort geht, weiß ich auf Anhieb nicht. In meinem Player nutze ich für meine String-Properties der Objekte in den ObjectLists sowas:

Delphi-Quellcode:
function AnsiCompareText_Numbers(const S1, S2: string): Integer;
begin
  Result := CompareString(LOCALE_USER_DEFAULT, SORT_STRINGSORT or SORT_DIGITSASNUMBERS, PChar(S1),
    Length(S1), PChar(S2), Length(S2)) - CSTR_EQUAL;
end;
Relevant ist hier das Flag SORT_DIGITSASNUMBERS. Die Syntax der Compare-Funktion muss für StringListen ggf. etwas angepasst werden.
The angels have the phone box.
  Mit Zitat antworten Zitat