function TMonitor.GetWorkRect: TRect;
var
  MonInfo: TMonitorInfoEx;
begin
  MonInfo.cbSize := SizeOf(MonInfo);
  GetMonitorInfo(FHandle, @MonInfo); 
  OffsetRect(MonInfo.rcWork,MonInfo.rcWork.Left * -1, MonInfo.rcWork.Top * -1);//Test
  Result := MonInfo.rcWork;
end;