It works for me!

>Hi Mike!
>
>Doesn't work. When I do a
>
>messagebox( TaskBarHeight())
>
>it returns .t.
>
>
>
>>>Hello all!
>>>
>>>Looks like sysmetric is not enough to garanty a good definition of of the maximum height and maximum width of a screen.
>>>
>>>I have those definitions
>>>
>>>thisform.width = SYSMETRIC(1) - SYSMETRIC(3) - SYSMETRIC(12)
>>>thisform.Height = SYSMETRIC(2) - SYSMETRIC(4) - SYSMETRIC(13) - SYSMETRIC(29)
>>>
>>>What am I missing?
>>You may want to also find out the Height of the taskbar at the bottom, and add it to the height of the screen:
>>

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)