| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Спрятать TaskBar
Осирис © (2002-10-07 17:17:00)Делаю так:
ShowWindow(FindWindow("Shell_TrayWnd", Nil), SW_HIDE);
TaskBar исчезает, но место которое он занимал по прежнему нельзя использовать. Как это можно исправить ?
Осирис (2002-10-08 12:12:00) [1]>> SHAppbarMessage
Пробовал так:
var
AppBarData : TAppBarData;
begin
AppBarData.hWnd := FindWindow("Shell_TrayWnd", nil);
AppBarData.cbSize := sizeof(AppBarData);
SHAppBarMessage(ABM_REMOVE,AppBarData);
end;
Не получается. Чего не хватает ?
>> еще SystemParametersInfo c SPI_SETWORKAREA.
procedure TForm1.Button1Click(Sender: TObject);
var rect : TRect;
begin
rect.Left:=0; rect.Top:=0; rect.Right:=1024; rect.Bottom:=750;
SystemParametersInfo(SPI_SETWORKAREA,0, @rect, SPIF_SENDCHANGE);
end;
При этом все максимизированные окна изменяют свой размер. А окна, которые не были максимизированны при этом не изменяют свой размер, дабы не вылазить за указанный мной rect. Можно конечно перебрать все открытые окна и вручную изменить их размер, но может быть можно проще ?
Юрий Зотов (2002-10-08 01:20:00) [2]И еще SystemParametersInfo c SPI_SETWORKAREA.
Игорь Шевченко (2002-10-07 17:34:00) [3]SHAppbarMessage
| |
