本文试图说明两个问题:
1.WM PPC版本Dialog的实现。
2.Dialog上的控件的焦点切换的时候带动滚动条一起动作。
其他说明:
1.本例中界面就两种控件EDIT/DTP。
2.本例中做的是垂直滚动条。
3.已知问题,由于不同OS的区别:PPC 2003SE上Edit控件上下左右按键都不能切换焦点,所以此代码不适用。WM5.0以后的版本没有问题。
正文:
PPC的界面设计理念:界面控件尽量在一屏中堆放完成,如果有很多控件需要堆放,应该考虑用TAB页进行分类处理。但是在一些地方还是要使用到滚动条。
PPC版本的Dialog和SP版本的Dialog的区别之一:Dialog的滚动条需要自己控制,而SP版本的滚动条是Dialog自己处理的,不需要开发者操心。
滚动条本来就是Windows中最麻烦的控件,但是如果就是让滚动条动起来,MSDN和网络上代码一堆。实现起来也很简单。
//两个步骤就搞定,本代码中计算单位是行。
//1.在WM_SIZE里,初始化滚动条。
//2.处理WM_VSCROOL消息。
#ifdef WIN32_PLATFORM_PSPC
static int s_iNumLines; //滚动条的行数
static int s_iLineHeight; //行高
static int s_iCtrlStart; //第一行中可以得到焦点控件的Y,用于最后一个控件滚动到第一控件
void InitScrollInfo(HWND hDlg, int iNumLines)
{
RECT rcDlg;
GetWindowRect(hDlg, &rcDlg);
//------------------------------------------------------------------------------
GetClientRect(hDlg,&rcDlg);
SCROLLINFO si;
si.cbSize = sizeof (si);
si.nMin = 0;
si.nMax = s_iNumLines - 1 ;
si.nPage = (rcDlg.bottom - rcDlg.top)/s_iLineHeight ;
if (si.nPage > si.nMax)
{
si.nMax = 0; //没有滚动条设置为0
}
si.nPos = 0;
si.fMask = SIF_ALL;
SetScrollInfo (hDlg, SB_VERT, &si, TRUE);
}
void EditDlg_OnVScroll(HWND hwnd, HWND hwndCtl, UINT code, int pos)
{
SCROLLINFO si = {0};
si.fMask = SIF_ALL;
si.cbSize = sizeof(si);
GetScrollInfo(hwnd,SB_VERT,&si);
int nOldPos = si.nPos;
switch (code)
{
case SB_TOP: // User clicked the HOME keyboard key.
{
si.nPos = si.nMin;
break;
}
case SB_BOTTOM: // User clicked the END keyboard key.
{
si.nPos = si.nMax;
break;
}
case SB_LINEUP:
{
si.nPos -= 1; //1:表示的是行
break;
}
case SB_LINEDOWN:
{
si.nPos += 1;
break;
}
case SB_PAGEUP:
{
si.nPos -= si.nPage;
break;
}
case SB_PAGEDOWN:
{
si.nPos += si.nPage;
break;
}
// case SB_THUMBTRACK: //MSDN的搞法
// {
// si.nPos = si.nTrackPos;
// break;
// }
case SB_THUMBTRACK:
case SB_THUMBPOSITION:
{
si.nPos = pos;
break;
}
default:
break;
}
si.fMask = SIF_POS;
SetScrollInfo (hwnd, SB_VERT, &si, TRUE);
GetScrollInfo (hwnd, SB_VERT, &si);
// If the position has changed, scroll window and update it.
if (si.nPos != nOldPos)
{
ScrollWindowEx(hwnd, 0, (nOldPos - si.nPos)*s_iLineHeight, NULL, NULL, NULL,NULL, SW_SCROLLCHILDREN);
UpdateWindow (hwnd);
}
return;
}
#endif
上面的代码只解决了用滚动条拖动屏幕,如果要实现焦点切换的时候带动滚动条运动,还需要处理不少代码。
在什么位置上处理焦点切换事件?
WM_COMMAND消息中处理EN_SETFOCUS,这样可以在一个地方处理焦点切换事件。
解决了Edit的焦点切换问题,新问题来了-EN_SETFOCUS是EDIT控件发送的,DTP控件没有这个事件怎么办?子类化后只处理WM_SETFOCUS消息,模拟发送一个EN_SETFOCUS消息。
{
# ifdef WIN32_PLATFORM_PSPC
if (codeNotify == EN_SETFOCUS)
{
FocusChangedScrollWindow(hDlg, hwndCtl, s_iLineHeight);
}
# endif
....
}
//------------------------------------------------------------------------------
// hDlg :对话框的HWND
// hCtrl :焦点切换控件的HWND
// iLineHeight :一组控件的行高
void FocusChangedScrollWindow(HWND hDlg, HWND hCtrl, INT iLineHeight)
{
RECT rcCtrl,rcDlg;
LPPOINT lpPoint = (LPPOINT) &rcCtrl;
GetWindowRect(hDlg, &rcDlg);
GetWindowRect(hCtrl, &rcCtrl);
lpPoint - >y += rcCtrl.bottom - rcCtrl.top;
INT iRst = CheckPointYOnRect(lpPoint, &rcDlg); //检查一个点的Y坐标在屏幕的上方还是下方
if (iRst)
{
INT iPos;
if (iRst > 0) //在屏幕的下方
{
iPos = ((lpPoint - >y - rcDlg.bottom) / iLineHeight + 1);
SCROLLINFO si = { 0};
si.fMask = SIF_ALL;
si.cbSize = sizeof(si);
GetScrollInfo(hDlg,SB_VERT, &si);
iPos += si.nPos; //需要加上当前的滚动条位置
}
else if (iRst < 0) //在屏幕的上方
{
iPos = (lpPoint - >y - s_iCtrlStart) / iLineHeight;
}
else
{
ASSERT(FALSE);
}
SendMessage(hDlg, WM_VSCROLL, MAKELONG(SB_THUMBPOSITION, iPos), 0L);
}
}
//------------------------------------------------------------------------------
// INT CheckPointYOnRect(LPPOINT lpPoint, LPRECT lpRect)
// 检查一个点的Y坐标在RECT上方还是下方。
//------------------------------------------------------------------------------
INT CheckPointYOnRect(LPPOINT lpPoint, LPRECT lpRect)
{
if ( !lpPoint || !lpRect)
{
ASSERT(FALSE);
}
if (lpPoint - >y < lpRect - >top)
{
return - 1;
}
else if (lpPoint - >y > lpRect - >bottom)
{
return 1;
}
else
{
return 0;
}
}
//EN_SETFOCUS是EDIT控件发送的,DTP控件没有这个事件,子类化后处理WM_SETFOCUS消息
//模拟发送一个EN_SETFOCUS消息。
LRESULT CALLBACK EditDlg_DTPProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
LRESULT lResult = 0;
switch (uMsg)
{
case WM_SETFOCUS :
{
lResult = CallWindowProc(s_pfnDTPProc, hWnd, uMsg, wParam, lParam);
SendMessage(GetParent(hWnd), WM_COMMAND, MAKELONG( 0,EN_SETFOCUS),(LPARAM)hWnd);
return lResult;
}
}
return CallWindowProc(s_pfnDTPProc, hWnd, uMsg, wParam, lParam);
}
至此,比较好的解决了滚动条的问题和焦点切换的时候带动滚动条联动。
最后的补充说明:本文中代码是把1个Staic和1个Edit(DTP)当成一行进行滚动,所以计算行高和当页能显示的行数很重要。此代码要修改成根据像素设定滚动条也很简单。