| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как узнать высоту Task Bar’а? [D5, Win95/98, WinME, NT4, Win2k, WinXP]
Milg © (2002-06-05 14:53:00)Как узнать высоту Task Bar’а?
Игорь Шевченко (2002-06-05 16:35:00) [1]Только я не понимаю, зачем это надо?
А если Taskbar будет справа или слева ?
есть возможность получить размер рабочей области экрана:
var
WorkArea : TRect;
begin
SystemParametersInfo(SPI_GETWORKAREA,0,Pointer(@WorkArea),0);
{ высота рабочей области: Workarea.Bottom - Workarea.Top }
{ ширина рабочей области: Workarea.Right - Workarea.Left }
end;
Milg (2002-06-05 16:26:00) [2]Спасибо!
Игорь Шевченко (2002-06-05 16:13:00) [3]implementation
uses
Shellapi;
{$R *.DFM}
procedure TfMain.Button1Click(Sender: TObject);
var Appbar : TAppbarData;
begin
Appbar.cbSize := SizeOf(AppBar);
ShAppbarMessage(ABM_GETTASKBARPOS, AppBar);
ShowMessageFmt("Высота таскбара = %d", [Appbar.rc.bottom - Appbar.rc.top]);
end;
Milg (2002-06-05 15:51:00) [4]Смотрел - нету!
Пример можна, пожалуйста?!
Игорь Шевченко (2002-06-05 15:06:00) [5]В FAQ пора.
ShAppBarMessage
| |
