鼠标在slide控件的任意位置上点击,滑块滑动到该位置是如何实现的,有什么属性吗?

void CTestDlgDlg::OnReleasedcaptureSlider1(NMHDR* pNMHDR, LRESULT* pResult)
{
// TODO: Add your control notification handler code here
CRect rcClient;
m_Slid.GetClientRect( &rcClient );
CRect rcWindow;
m_Slid.GetWindowRect( &rcWindow );
POINT point;
GetCursorPos( &point );
point.x = point.x - rcWindow.left;
point.y = point.y - rcWindow.top;
if ( rcClient.PtInRect( point ) )
{
int nPos = point.x * 100 / rcClient.Width();
m_Slid.SetPos( nPos );
}

*pResult = 0;
}