增强Edit控件为日期输入控件
2006-07-23 11:18:36 来源:WEB开发网字符消息处理:
void CMyEdit::OnChar(UINT nChar, UINT nRepCnt, UINT nFlags)
{
// TODO: Add your message handler code here and/or call
int oldpos=LOWORD(GetSel());
CString str;
GetWindowText(str);
if ( nChar>=''0'' && nChar<=''9'' )
{
if ( oldpos<4 || ( oldpos>4 && oldpos<7) || oldpos>7)
{
str.Delete(oldpos,1);
SetWindowText(str);
SetSel(FormatPos(oldpos,oldpos));
CEdit::OnChar(nChar, nRepCnt, nFlags);
if ( LOWORD(GetSel())==4 || LOWORD(GetSel())==7)
{
oldpos=LOWORD(GetSel());
SetSel(FormatPos(oldpos+1,oldpos+1));
}
}
else
if ( oldpos==4 || oldpos==7 )
{
oldpos+=1;
SetSel(FormatPos(oldpos,oldpos));
str.Delete(oldpos,1);
SetWindowText(str);
SetSel(FormatPos(oldpos,oldpos));
CEdit::OnChar(nChar, nRepCnt, nFlags);
}
}
else
if ( nChar==VK_BACK )
{
if ( (oldpos>0 && oldpos<5) || ( oldpos>5 && oldpos<8) || oldpos>8)
{
str.Insert(oldpos,'' '');
SetWindowText(str);
SetSel(FormatPos(oldpos,oldpos));
CEdit::OnChar(nChar, nRepCnt, nFlags);
}
else
if ( oldpos==5 || oldpos==8 )
{
SetSel(FormatPos(oldpos-1,oldpos-1));
}
}
}
击键消息处理:
- ››控件一:Gallery 之无限循环的问题
- ››控件一:Gallery 之基础用法
- ››增强用户的体验愉悦性和专注度:保持用户的游戏体验...
- ››增强 WebSphere Service Registry and Repository...
- ››增强的恶意软件检测
- ››增强webprint打印控件一次打印多份文档的方法
- ››增强Windows7右键 让操作更简单
- ››增强 WebSphere eXtreme Scale 的 xsadmin
- ››增强SQL Server 2008的可管理性
- ››增强网站安全性,data目录隐藏功能设置详解
- ››增强Exchange服务器的安全性
- ››增强型命令行 不错的系统辅助工具
更多精彩
赞助商链接