DruckenMister WongFacebook

Taskbar automatisch im Hintergrund

System Win9x, WinNT, Win2000, WinXP, Vista, Win7
Ab Delphi-Version Delphi 1
Letzte Änderung 28.09.2010

Die unten stehende Funktion prüft, ob die Taskbar automatisch in den Hintergrund geholt werden soll, wenn sich die Maus nicht über ihr befindet. Die entsprechende Einstellung kann im Menü "Start|Einstellungen|Taskleiste und Startmenü" getätigt werden.Die Unit ShellApi muss eingebunden werden.


uses
 ShellAPI;

function IsTaskbarAutoHideOn : boolean;
var
 ABData : TAppBarData;
begin
 ABData.cbSize := sizeof(ABData);
 Result :=
     (SHAppBarMessage(ABM_GETSTATE, ABData) and ABS_AUTOHIDE)
      > 0;
end;
 

Ein Beispielaufruf sieht so aus:


procedure TForm1.Button1Click(Sender: TObject);
begin
 if IsTaskbarAutoHideOn then
   ShowMessage('Taskbar wird automatisch versteckt');
end;