用下面的函数可以检查Win95的状态条是否处于自动隐藏状态。

============
uses ShellAPI;

(*
若状态条为自动隐藏状态，则返回值为 TRUE

if(IsTaskBarautoHideOn)then
begin

// auto hide is ON

end;

*)

function IsTaskbarAutoHideOn : boolean;
var
ABData : TAppBarData;
begin

ABData.cbSize := sizeof(ABData);

Result := (SHAppBarMessage(ABM_GETSTATE, ABData) and  
ABS_AUTOHIDE) > 0;

end;