Pasek Start [Delphi] rozmiar i położenie

Witam, mam takie pytanko.. czy ktoś może podpowiedzieć mi jak w delphi odczytać rozmiar i położenie paska menu?
Do zmiany tych wartości używam:

var Uchwyt: THandle;
begin
Uchwyt := FindWindow(PChar('Shell_TrayWnd'), nil);
SetWindowPos(Uchwyt, HWND_TOPMOST, 200, 200, 60, 10, SWP_NOSENDCHANGING or SWP_FRAMECHANGED);
end;

i działa super, jednak chciałbym przed taką zmianą dowiedzieć się jego pierwotnych wielkości żeby móc do nich wrócić :)

z góry dziękuję za podpowiedzi

---

var r:trect; begin GetWindowRect(FindWindow('Shell_TrayWnd',nil),r);r.Right-r.Left = długość
r.Bottom-r.Top = wysokość

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

zsf.htw.pl