AutoHide bei AppBar funktioniert nicht

[Sascha L]

Hallo,

benutze die im Anhang befindliche Unit für eine AppBar.

Wenn ich AutoHide auf true setze, dann versteckt sich die AppBar auch schön, wenn sich die Maus außerhalb der AppBar befindet. Das Problem ist jedoch, dass die Bar nicht mehr sichtbar wird, wenn ich mit der Maus auf den kleinen Pixelstreifen gehe.

Gruß
Sascha

[Sascha L]

Hab es nun selbst gelöst bekommen, indem ich einiges geändert habe bzw. selbst gemacht habe:

In der Unit AppBar habe ich folgende Prozedur:

Delphi-Quellcode:

    // If AppBar is Autohide and docked, shows/hides the AppBar
    procedure ShowHiddenAppBar (bShow : Boolean);

In den Public-Teil verschoben, sodass man auch von außen drauf zugreifen kann.

In der Haupt-Unit habe ich dann folgendes eingebaut:

Delphi-Quellcode:

procedure TfrmMain.OnNcHitTest(var Msg: TWMNCHitTest);
begin
  inherited;
  if MSG.Result = 1 then
  self.ShowHiddenAppBar(true);
end;