Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

высота TaskBar в пикселах - как узнать?


Ega23 ©   (2007-02-26 16:57:00) 

Сабж.


DVM   (2007-02-26 17:42:00) [1]

По поводу ShAppbarMessage(). Если не запущен эксплорер (установлен заменитель оболочки), то данная функция не работает. Тем не менее заменитель панели задач (чаще всего с тем же классом окна) на экране имеется. И рабочая область установлена за вычетом этой "панели задач".


Ega23   (2007-02-26 17:35:00) [2]


> Джо ©   (26.02.07 17:26) [2]


Спасибо!


Игорь Шевченко   (2007-02-26 17:34:00) [3]

procedure TfMain.miReportsClick(Sender: TObject);
var Appbar : TAppbarData;
begin
 Appbar.cbSize := SizeOf(AppBar);
 ShAppbarMessage(ABM_GETTASKBARPOS, AppBar);
 ShowMessageFmt('Высота таскбара = %d', [Appbar.rc.bottom - Appbar.rc.top]);
end;


Джо   (2007-02-26 17:26:00) [4]

SHAppBarMessage с ABM_GETTASKBARPOS (или ABM_QUERYPOS, не помню).


DVM   (2007-02-26 17:24:00) [5]

Например FindWindow() + GetWindowRect(). Есть еще другие способы. Не надо забывать еще, что таскбар бывает сбоку.


Наверх

Титульная страница Поиск, карта сайта Написать письмо