| Иногда важно знать, какую часть экрана можно занимать, не перекрывая тем самым такие окна, как TaskBar. Эта программа разворачивает окно на всю рабочую область Desktop'а. Code procedure TForm1.Button1Click(Sender: TObject);
var
r : TRect;
begin
SystemParametersInfo(SPI_GETWORKAREA, 0, Addr(r), 0);
Form1.Left := r.Left;
Form1.Top := r.Top;
Form1.Width := r.Right - r.Left;
Form1.Height := r.Bottom - r.Top;
end;
end; | 
