Как узнать высоту панели задач

[Vikenty]

Как в Delphi узнать высоту панели задач?

[GunSmoker]

А зачем вам это?

Есть подозрение на X, Y, Z.

[Vikenty]

Сообщение от GunSmoker

А зачем вам это?

Есть подозрение на X, Y, Z.

я все правильно написал "как получить высоту панели задач"
нужно для помещения окна в правом нижнем углу экрана...

[chertovich]

Используй ClientHeight и ClientWidth

[chertovich]

Используй ClientHeight и ClientWidth, они показывают высоту и ширину рабочего пространства, то есть без панели задач

[MaxNik2009]

Можно так:

procedure TForm3.Button1Click(Sender: TObject);
var
  wnd: HWND;
  Rect: TRect;
begin
  wnd:= FindWindow('Shell_TrayWnd', nil); // ищем панель
  if wnd <> 0 then
  begin
    GetWindowRect(wnd, Rect); // определяем размер найденной панели
    ShowMessage(IntToStr(Rect.Bottom));
  end;
end;

[Stilet]

Было уже. Обсуждалось и не раз:
http://yandex.ua/yandsearch?text=ShA...ASKBARPOS%2C+t
%29%3B&tld=ua&lr=20554&site=www.pro grammersforum.ru

[chertovich]

Сообщение от Stilet

Было уже. Обсуждалось и не раз:
http://yandex.ua/yandsearch?text=ShA...ASKBARPOS%2C+t
%29%3B&tld=ua&lr=20554&site=www.pro grammersforum.ru

Повторение - мать учения.

[GunSmoker]

Сообщение от Vikenty

я все правильно написал "как получить высоту панели задач"
нужно для помещения окна в правом нижнем углу экрана...

(Вздох) Да ни черта вы не правильно написали.

Ваша задача - разместить окно в правом-нижнем углу экрана. Вот это и надо было писать.

Для этого не нужно получать высоту Панели задач (панель задач может быть пристыкована справа, или справа может быть добавлена дополнительная панель).

Вам нужно получить размер рабочей области монитора - это часть, свободная от всех панелей. Сделать это можно, например, через GetMonitorInfo. Вас будет интересовать поле rcWork.

Или можно использовать объект Screen. Вас интересуют свойство WorkareaRect.

P.S. Откуда видно, что ответы chertovich, MaxNik2009 и Stilet - неверны и вредны.

P.P.S. Я только что спас вашу душу от огней ада, а руки - от создания говно-кода.

[Vikenty]

Сообщение от GunSmoker

(Вздох) Да ни черта вы не правильно написали.


P.S. Откуда видно, что ответы chertovich, MaxNik2009 и Stilet - неверны и вредны.

P.P.S. Я только что спас вашу душу от огней ада, а руки - от создания говно-кода.

зачем такие грубости??
WorkAreaRect - то что нужно, спс