搞代码

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

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

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

if(IsTaskBarautoHideOn)then
begin

http://www.gaodaima.com/?p=66004任务栏设置成自动隐藏_Delphi

// 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;

欢迎大家阅读《任务栏设置成自动隐藏_Delphi》,跪求各位点评,若觉得好的话请收藏本文，by 搞代码

微信 赏一包辣条吧~

支付宝 赏一听可乐吧~