DelphiHelp.org

uses ShellAPI;

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