Delphi Listbox.OnDrawItem: wenn Dateiendung wechselt, andere Farbe

Thema durchsuchen

Ansicht

Themen-Optionen

Listbox.OnDrawItem: wenn Dateiendung wechselt, andere Farbe

Ein Thema von juergen · begonnen am 3. Jun 2010 · letzter Beitrag vom 14. Jun 2010

Vorheriger Beitrag

Nächster Beitrag

sx2008

Registriert seit: 15. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge

Delphi 2007 Professional

Re: Listbox.OnDrawItem: wenn Dateiendung wechselt, andere Fa

3. Jun 2010, 22: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.