Jak określić wysokość paska menu Start?

Witam
Przeszukałem całe forum i nie znalazłem jak określić wysokośc menu Start? :-(
Z góry dziękuję

Nie wiem czy o to Ci dokładnie chodzi ale w temacie jest mowa o
pasku więc można tak:

var
  Task: THandle;
  Rect: TRect;
begin
  Task := FindWindow('Shell_traywnd', nil);
  GetWindowRect(Task, Rect);
  ShowMessage(IntToStr(Rect.Bottom - Rect.Top));
end;

albo teoretycznie można też tak:

Screen.Height - Screen.WorkAreaHeight

Niestety to nie to :-( , chodzi mi o wysokość paska (toolbar) gdzie jest zegar+tray i menu start

To się nazywa pasek zadań. Akurat jak pobrać to nie powiem, bo nie mogę na razie włączyć Delphi (ani msdn), ale mam taką małą uwagę: ponieważ potrzebujesz wysokości paska to pewnie chcesz coś względem niego ustawiać. Weź więc pod uwagę, że niektórzy mają pasek umieszczony na górze (np. ja) albo po bokach i wtedy pozycjonowanie względem nich jest z deczka bez sensu, jeżeli nie odczyta się położenia paska (wkurzają mnie co niektóre programy, bo mi uciekają za pasek zadań :( )

rozmiar paska:

var
  R: TRect;
begin
  SystemParametersInfo(SPI_GETWORKAREA,0,@R,0);
  ShowMessage(IntToStr(Screen.Height - r.Bottom + r.Top));