Форма как SideBar или systray Windows

[DIMASIKXXX32]

Здравствуйте!
Возникла такая проблема, хочу сделать программу которая в развернутом виде приклеивалась бы к краям рабочей области эрана и сдвигала все открытые окна на свой размер подобно системной панеле Windows или SideBara. Весь инет обыскал но ничего не нашел как это сделать.
Как форму приклеплять разобрался достаточно просто поменять свойсто Align на нужное значение, а вот как сделать чтобы форма не перекрывалсь и не перекрывала остальные окна windows, а сдвигала на свой размер.
Если можно с исходничком.

[Человек_Борща]

Form style = fsStayOnTop

[DIMASIKXXX32]

Сообщение от Человек_Борща

Form style = fsStayOnTop

Спасибо. но это не то совсем это свойство делает просто по верх всех окон но не сдвигает все формы. Обратите внимание на работу системной панели Windows все окна разворачиваются до нее, а не под ней и не сверху нее. Так же надо и мне

[Пепел Феникса]

http://programmersforum.ru/showthread.php?t=47638

[DIMASIKXXX32]

Сообщение от Пепел Феникса

http://programmersforum.ru/showthread.php?t=47638

если можно поподробнее...

[DIMASIKXXX32]

SystemParametersInfo(SPI_SETWORKARE A,0,@screenRect,SPIF_SENDCHANGE);

Уже пробовал эту функцию таким образом

var
r:trect;
begin
r.left:=0;
r.top:=0;
r.rigth:=1000;
r.bottom:=768;
SystemParametersInfo(SPI_SETWORKARE A,0,@r,0);
end;

но чего то как то криво работает...

[DIMASIKXXX32]

пробовал эту функцию таким образом

procedure TF_Main.FormCreate(Sender: TObject);
  var
    r:TRect;
    wnd,WndInsertAfter:HWND;
begin
   r:=Rect(0,0,1000,768);
   SystemParametersInfo(SPI_SETWORKAREA,0,@r,SPIF_SENDCHANGE);
   SetWindowPos(Wnd, WndInsertAfter, 0, 0, 1000, 768, SWP_DRAWFRAME);
end;

но чего то как то криво работает...
У меня теперь все окна даже при закрытии моей формы висят криво пока разрешение не сменю

[Пепел Феникса]

там уведомление о настройках надо руками броадкастить.
только тогда я смог заставить это работать.

[DIMASIKXXX32]

Сообщение от Пепел Феникса

там уведомление о настройках надо руками броадкастить.
только тогда я смог заставить это работать.

Я чего то не пойму
как установить рабочую область понял нашел список команд которыми пользуется SystemParametersInfo но вот когда его меняю моя форма тоже изменяет положение в месте с ней.

и опять же моя форма находится в рабочей области так как она останется за ней чего то я не понимаю

и как перерисовать все окна этой функцией SetWindowPos и это надо делать по таймеру постоянно так как окна не будут постоянно висеть одни и те же.

[Пепел Феникса]

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

SendMessage(HWND_BROADCAST,WM_WININICHANGE,0,0);

SetWindowPos не с той степи, это потом было и к другому.

PS: посмотрите на скрин с первого сообщения темы, это то что вы хотите получить?(проигрыватель над панелью задач)