Bei Control.Hide verwaist die Scrollbar wenn VCL-Styles aktiv

[Codehunter]

Hallo!

Wenn man ein TListBox auf folgende Weise erzeugt und steuert, bleibt eine "verwaiste" Scrollbar auf dem Bildschirm zurück, wenn die VCL-Styles aktiviert sind:

Delphi-Quellcode:

var
  MyListBox: TListBox;

TForm1.Create(Sender: TObject);
begin
  MyListBox:= TListBox.Create(Self);
  MyListBox.Parent:= Self;
end;

TForm1.Button1Click(Sender: TObject);
begin
  MyListBox.Show;
end;

TForm1.Button2Click(Sender: TObject);
begin
  MyListBox.Hide; // <-- ListBox verschwindet, ihre vertikale Scrollbar bleibt sichtbar
end;

Das selbe Problem hat CnPack wenn in der Delphi-IDE das dunkle Farbschema aktiviert ist und man das Prozedur-/Funktions-Dropdown auf- und zuklappt. Das Problem besteht NICHT, wenn ich in den Projekteinstellungen -> Anwendung -> Erscheinungsbild als Standardstil "Windows" einstelle.

EDIT: Wie ich grad festgestellt habe, muss zusätzlich noch die ListBox den Eingabefokus haben wenn sie mit .Hide ausgeblendet wird, damit der Fehler auftritt.

Grüße
Cody