Problem mit Listbox hintergrundfarbe Delphi 7

[kingflo]

oder (aber die DrawItem Methode ist besser)

Delphi-Quellcode:

var
oldHeigt:integer;
begin
oldHeigt:=ListBox1.Height;
listBox1.Color:=clRed;
ListBox1.Height:=0;
ListBox1.Height:=oldHeigt;