TaskBarHeight() Function TaskBarHeight Declare Integer GetWindowRect In user32; INTEGER HWnd, String lpRect Declare Integer FindWindow In user32; STRING lpClassName,; STRING lpWindowName Local cBuffer cBuffer = Replicate(Chr(0), 16) hWindow= FindWindow('Shell_TrayWnd', '') cRect = GetWinRect(hWindow) ? "The height of the taskbar is: "+trans(buf2dword(Substr(cRect, 13,4))-buf2dword(Substr(cRect, 5,4))) Function GetWinRect(hWindow) Local cBuffer cBuffer = Replicate(Chr(0), 16) = GetWindowRect(hWindow, @cBuffer) Return cBuffer Function buf2dword(lcBuffer) Return Asc(Substr(lcBuffer, 1,1)) + ; BitLShift(Asc(Substr(lcBuffer, 2,1)), 8) +; BitLShift(Asc(Substr(lcBuffer, 3,1)), 16) +; BitLShift(Asc(Substr(lcBuffer, 4,1)), 24)