Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Как узнать ширину/высоту панели задач?

Автор: IDontBelieveInSilence 25.10.2007, 10:13

Попробовал этот пример:

Код


  Wnd := FindWindow('Shell_TrayWnd', nil);
  GetWindowRect(Wnd, trayRect);
  ShellTrayHeight := trayRect.Right - trayRect.Left;

Но trayRect.Left всё время 0. :-\

Автор: THandle 25.10.2007, 10:27

Код


var
  h : hwnd;
  rect : TRect;
begin
 h := Findwindow('Shell_TrayWnd', nil);
 GetWindowRect(h, rect);
 ShowMessage(inttostr(rect.Right));
 ShowMessage(inttostr(rect.Bottom-rect.top));
end;

left это левая позиция окна.

Автор: Alix 25.10.2007, 10:31

а что в этом плохого? перемести панель задач к правой стороне экрана, теперь тоже ноль? Если тебе нужен именно трей, то ищи "TrayNotifyWnd".