![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как узнать текущие параметры панели задач [D6, Win95/98, WinXP]
RDen © (2004-02-04 13:37:00)Здравствуйте! Подскажите как узнать текущее расположение панели задач на экране (внизу, слева и т.д.)? Спасибо.
Vit@ly (2004-02-04 15:03:00) [1]uses ShellApi
var
Rect: TRect;
Function DetectTaskBar: String;
begin
GetWindowRect(FindWindow('Shell_TrayWnd', nil), rect);
if (Rect.top > 0) Then Result:= 'Bottom'
else
if (Rect.Bottom < Screen.Height) Then Result:= 'Top'
else
if Rect.Right < Screen.Width Then Result:= 'Left'
else Result:= 'Right'
end;
Игорь Шевченко (2004-02-04 13:42:00) [2]SH_AppbarMessage (ABM_GETTASKBARPOS,