Farbänderung des Formularhintergrundes

[BasilBavaria]

In den Proceduren passiert zur zeit nichts, was aus meiner Sicht damit zusammenhängen könnte:

Delphi-Quellcode:

procedure TFrmMain.FormCreate(Sender: TObject);
begin
  FrmMain.WindowState := wsMaximized;
end;

procedure TFrmMain.FormPaint(Sender: TObject);
begin
//  FrmMain.Color := OptFarbe;
//  ListBox1.Color := OptFarbe;
//  FrmMain.Repaint;
end;

procedure TFrmMain.FormShow(Sender: TObject);
begin
//  FrmMain.Color := OptFarbe;
end;

Ich hatte darüber nur versucht, den Fehler einzugrenzen bzw. zu beheben.

Direkt über einen Button habe ich das gleiche Erscheinungsbild - die ListBox schaltet die Farbe nicht mit um

Code:

procedure TFrmMain.Button1Click(Sender: TObject);
begin
  FrmMain.Color := clBlue;
end;