|
Registriert seit: 16. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
Delphi 2007 Professional
|
Re: Listbox.OnDrawItem: wenn Dateiendung wechselt, andere Fa
3. Jun 2010, 23:01
Die Farbwerte müssen zusätzlich zu den Dateinamen in der Stringliste gespeichert werden.
Dazu kann man das Property Objects[] (mis)brauchen.
Aktuelle Farbe auf Startwert (z.B weiss) setzen.
Stringliste von vorne nach hinten durchlaufen.
Immer wenn sich die Endung geändert hat, wird die aktuelle Farbe gändert (weiss -> grün bzw. grün -> weiss).
Die Farbe wird in StringList.Objects[] gespeichert.
Im OnDrawItem-Event hat man dann sowohl den Dateinamen als auch die zugeordnete Farbe.
|