фиксация формы

[viking]

Здравствуйте!
Подскажите, пожалуйста, как в delphi осуществить фиксацию формы слева/справа/сверху/снизу, чтобы она вытеснила остальную рабочую область экрана. Например, такая функция есть в icq6 - "Закрепить панель" (скриншот примера: http://s57.radikal.ru/i157/0906/1b/5ca3ca184c24.jpg).
Заранее спасибо!

[Ntlegend]

чтобы изменять прямоугольник рабочей области используй следующий код:

var R:TRect;
begin
R.Left := 0;
R.Top := 0;
R.Right := Screen.Width-150;
R.Bottom:=Screen.Height;
SystemParametersInfo(SPI_SETWORKAREA, 1, @R, SPIF_SENDCHANGE);
Self.Left:=Screen.Width-150;
end;

данная процедура очистит рпавую часть экрана от всех окон и поместит в ту область окно твоего приложения

[viking]

спасибо огромное!