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 your 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)>