Как запросить свойства панели задач

Это перевод How to query properties of the taskbar. Автор: Реймонд Чен.

Иногда люди спрашивают, как они могут запросить свойства панели задач. Я не понимаю, зачем им это надо; вы должны просто жить своей жизнью и позволить панели задач жить своей. В конце концов, у вас может и не быть панели задач.

Но если вам сильно охота (может вы собираете статистику?), то вот:

procedure TForm1.Button1Click(Sender: TObject);
var
  abd: TAppBarData;
  uState: Cardinal;
begin
  FillChar(abd, SizeOf(abd), 0);
  abd.cbSize := SizeOf(abd);
  uState := SHAppBarMessage(ABM_GETSTATE, @abd);
  ShowMessage('Поверх всех окон: ' + BoolToStr((uState and ABS_ALWAYSONTOP) <> 0, True) + sLineBreak +
              'Автоскрытие: ' + BoolToStr((uState and ABS_AUTOHIDE) <> 0, True));
end;

Эта небольшая программа использует сообщение ABM_GETSTATE функции SHAppBarMessage, чтобы получить свойства "Поверх всех" и "Автоскрытие".

Поскольку вы используете функцию SHAppBarMessage, то если в будущем Windows изменит способ смены состояний панели задач (или, возможно, даже сменит панель задач на что-то ещё), то ваша программа продолжит работать, потому что функция SHAppBarMessage будет изменена в соответствии с изменениями в системе.

Вы можете также использовать сообщение ABM_SETSTATE, чтобы изменить эти настройки. Но учтите, что делать это из программы не рекомендуется; эти настройки принадлежат пользователю. Программа не должна менять предпочтения пользователя (ну, если только целью вашей программы не является настройка - очевидно. Но частота, с которой я вижу подобные вопросы, заставляет меня сомневаться, что в каждом случае речь идёт о твикере настроек. Я думаю, что люди просто используют эту силу во зло, а не во благо).

И чтобы предотвратить последующие вопросы: это единственные свойства панели задач, которые являются программируемыми. Публикация программируемого интерфейса для чего-то, что настолько сильно заметно, как панель задач, является весьма деликатным вопросом, поскольку, когда вы предоставляете программный доступ к чему-то, у программ появляется очень большой соблазн, чтобы начать злоупотреблять им.