Registriert seit: 21. Mai 2004
809 Beiträge
Delphi 7 Personal
|
Re: Text in Stringgrid sortieren
25. Mai 2004, 13:36
Achso, ich dachte dass jedes Wort, welches mit einem Großbuchstaben beginnt, ein Name ist, also in die erste Spalte soll. Um alle Wörter, die komplett großgeschrieben sind in die erste Spalte zu packen muss du nur die folgende Zeile:
if (s[1] = AnsiUpperCase(s[1])) or (s[1] = '/') then //großgeschrieben
durch diese ersetzen:
if (s = AnsiUpperCase(s)) or (s[1] = '/') then //großgeschrieben
|