📄 01_9_13_15.asp.html
字号:
CreateEx(WS_EX_TOPMOST, lpszClassName, _T(“”), WS_VISIBLE|WS_POPUP, </td></tr></table><table width=100% ><tr><td class=a14>
rect.left, rect.top, rect.right - rect.left, rect.bottom - rect.top, </td></tr></table><table width=100% ><tr><td class=a14>
GetSafeHwnd(), NULL, NULL); //创建一个全屏窗口</td></tr></table><table width=100% ><tr><td class=a14>
SetTimer(ID_TIMER, 500, NULL);//计时器,ID_TIMER别忘了定义</td></tr></table><table width=100% ><tr><td class=a14>
return TRUE;</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr>
<td class=a14> 为了防止同时运行两个相同的程序,下面两个函数是必需的:</td>
</tr></table><table width=100% ><tr><td class=a14>
void CMyWnd::OnActivate(UINT nState, CWnd* pWndOther, BOOL bMinimized) </td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
CWnd::OnActivate(nState,pWndOther,bMinimized);</td></tr></table><table width=100% ><tr><td class=a14>
if (nState==WA_INACTIVE)</td></tr></table><table width=100% ><tr><td class=a14>
PostMessage(WM_CLOSE);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
void CMyWnd::OnActivateApp(BOOL bActive, HTASK hTask)</td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
CWnd::OnActivateApp(bActive, hTask);</td></tr></table><table width=100% ><tr><td class=a14>
if (!bActive) //is being deactivated</td></tr></table><table width=100% ><tr><td class=a14>
PostMessage(WM_CLOSE);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
OnPaint()函数将全屏窗口置为黑色:</td></tr></table><table width=100% ><tr><td class=a14>
void CMyWnd::OnPaint()</td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
CPaintDC dc(this);</td></tr></table><table width=100% ><tr><td class=a14>
CBrush brush(RGB(0,0,0));</td></tr></table><table width=100% ><tr><td class=a14>
CRect rect;</td></tr></table><table width=100% ><tr><td class=a14>
GetClientRect(rect);</td></tr></table><table width=100% ><tr><td class=a14>
dc.FillRect(&rect, &brush);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr>
<td class=a14> 由计数器调用DrawBitmap()函数,切换图片;注意,下面两个函数中的IDB_BITMAP1, dc.BitBlt(0,0,800,600……以及if(nIndexBit>=5)中的有关数据依据你的bmp图片个数、尺寸、位置不同而不同,我是选择了5张800x600的bmp图片。注意,ID值是连续的,IDB_BITMAP1最小。</td>
</tr></table><table width=100% ><tr><td class=a14>
void CMyWnd::DrawBitmap(CDC &dc, int nIndexBit)</td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
CDC dcmem;</td></tr></table><table width=100% ><tr><td class=a14>
dcmem.CreateCompatibleDC(&dc);</td></tr></table><table width=100% ><tr><td class=a14>
CBitmap m_Bitmap;</td></tr></table><table width=100% ><tr><td class=a14>
m_Bitmap.LoadBitmap(IDB_BITMAP1+nIndexBit);</td></tr></table><table width=100% ><tr><td class=a14>
dcmem.SelectObject(m_Bitmap);</td></tr></table><table width=100% ><tr><td class=a14>
dc.BitBlt(0,0,800,600,&dcmem,0,0,SRCCOPY);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
void CMyWnd::OnTimer(UINT nIDEvent)</td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
CClientDC dc(this);</td></tr></table><table width=100% ><tr><td class=a14>
static nIndexBit=0;</td></tr></table><table width=100% ><tr><td class=a14>
if(nIndexBit>=5)</td></tr></table><table width=100% ><tr><td class=a14>
nIndexBit=0;</td></tr></table><table width=100% ><tr><td class=a14>
DrawBitmap(dc, nIndexBit++);</td></tr></table><table width=100% ><tr><td class=a14>
CWnd::OnTimer(nIDEvent);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table>
<table width=100% ><tr>
<td class=a14> 响应键盘、鼠标是屏幕保护程序不可缺少的,在OnKeyDown()、 OnLButtonDown()、 OnMButtonDown()、OnRButtonDown()、OnSysKeyDown()函数中都加入:</td>
</tr></table><table width=100% ><tr><td class=a14>
PostMessage(WM_CLOSE);</td></tr></table><table width=100% ><tr><td class=a14>
OnMouseMove()函数比较特殊,它应加的代码为:</td></tr></table><table width=100% ><tr><td class=a14>
if(m_prePoint == CPoint(-1,-1))</td></tr></table><table width=100% ><tr><td class=a14>
m_prePoint = point;</td></tr></table><table width=100% ><tr><td class=a14>
else if(m_prePoint!=point)</td></tr></table><table width=100% ><tr><td class=a14>
PostMessage(WM_CLOSE); </td></tr></table><table width=100% ><tr>
<td class=a14> 快要完工了。在OnDestroy()函数中删掉计时器:KillTimer(ID_TIMER); </td>
</tr></table><table width=100% ><tr>
<td class=a14> 还有啦,在CMyWnd::PostNcDestroy() 中加入: delete this;</td>
</tr></table><table width=100% ><tr>
<td class=a14> 哎呀,腰酸背疼,眼球发涩,手背奇麻(不会吧)!不过,相信你一定会迫不及待地按下Ctrl+F5, 看着一幅幅图片在你面前轮番展示,啊,自己的屏幕保护程序!赶快赶快,换上自制的屏保,感觉就是不一样:图片任你挑,时间间隔任你改,鼠标?键盘?我想响应谁就响应谁……哎呀,谁扔的纸团:(。</td>
</tr></table><table width=100% ><tr>
<td class=a14> 其实,上面的程序还有很多可以改进的地方,比如图片总是单一地显示;bmp 文件太大,导致生成的屏幕保护程序也很大,远没有jpg合算;没有密码,没有可直接控制的界面。由于InitInstance()函数的简单处理(直接调用CMyWnd类),你会发现当你在桌面上右击,选择“属性”、“屏幕保护程序”页、“屏幕保护程序”下拉菜单、选中MyScreensaver时,MyScreensaver就直接预览了(或是直接运行了);假设你确定MyScreensaver作为你的屏幕保护程序,等你第二次进入“屏幕保护程序”页时,就直接预览。Why?
回头看看InitInstance()函数就明白了。为了让它更听话地工作,可修改InitInstance()函数:</td>
</tr></table><table width=100% ><tr><td class=a14>
LPTSTR lpszArgv = __argv[1];</td></tr></table><table width=100% ><tr><td class=a14>
if (lpszArgv[0] ==‘/’)</td></tr></table><table width=100% ><tr><td class=a14>
lpszArgv++;</td></tr></table><table width=100% ><tr><td class=a14>
if (lstrcmpi(lpszArgv, _T(“s”))==0)</td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
CMyWnd* pWnd=new CMyWnd;</td></tr></table><table width=100% ><tr><td class=a14>
pWnd->Create();</td></tr></table><table width=100% ><tr><td class=a14>
m_pMainWnd=pWnd;</td></tr></table><table width=100% ><tr><td class=a14>
return TRUE;</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
return FALSE;</td></tr></table><table width=100% ><tr>
<td class=a14> 不过现在你要是再在VC中运行这个程序,“该程序执行了非法操作,即将关闭。如果仍有问题,请与我联系(??)”将会伴随着一超重低音供你欣赏。(啊?)原因是我们加了一句return
FALSE; 还有,别忘了还有一个CMyScreensaverDlg类没有用上,用它来与你的屏保直接对话再好不过了。例如,为了方便地确定时间间隔,选取图片,加上一个编辑框和几个按钮就可以了。重申一点,由于生成文件较大,占用的内存也多,如果不能运行,很可能是开的窗口太多了。这时你可以换较小的图片。有任何问题请来信:toxyz@163.net。晚些时候我将在家门口
http://yxz.163.net 放置上述例子的整个项目,有一些新玩意和大家共同探讨。(全文完)</td>
</tr></table><table width=100% ><tr><td class=a14>
</td></tr></table><table width=100% ><tr><td class=a14>
</td></tr>
</table><br>
<style>.a1{font-size:1}</style>
<table width=100% ><tr><td align=right>(网页编辑:<a href='mailto:liu_yang@ccw.com.cn'>风之翼</a>)</td></tr></table>
</td><td class=a1 bgcolor=#f46240> </td>
<td valign=top width=138 align=right><table width=98% ><tr><td>
<form action='/app/gsearch1.asp' name=pdn><table width=100% ><tr><td>应用与方案
频道全文检索</td></tr>
<tr><td><input type="text" name="textfile" size=15 value=频道内检索 onfocus="this.value=''">
<input border=0 src="../../../../../images/jian.gif" name="I1" type="image" align=absmiddle>
</td></tr>
</table>
</form>
<form name=srch action="/search/which.asp" method=post onsubmit="JavaScript:return chk()">
<table width=100% >
<tr><td><select size="1" name="func">
<option selected value="2">主题检索</option>
<option value="1">周报全文检索</option>
<option value="3">模糊词检索</option>
</select></td></tr>
<tr><td><input type="text" name="SrchStr" size=15 value="输入待检索的词"
onfocus="this.value=''">
<input src="../../../../../images/jian.gif" name="I1" type="image" align="absMiddle" border=0>
</td></tr>
</table>
<script language="JavaScript">
function chk()
{if (!document.srch.SrchStr.value){
alert("请输入需检索的词!");
document.srch.SrchStr.focus();
return false;
}
else{if (document.srch.SrchStr.value.length>30){
alert("检索的词请不要超过30个字符!");
document.srch.SrchStr.focus();
return false;
}
}
}
</script></form>
<table width=100% ><tr><td class=f colspan=2><b>相关文章</b></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_13_13.asp.html'>创建不在任务条中显示窗口按钮的应用</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_13_12.asp.html'>在工具条上放置窗口及其它</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_13_11.asp.html'>得到托盘区位置与动态显示/隐藏窗口</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_13_10.asp.html'>MFC窗口位置管理详细分析及实例</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_13_9.asp.html'>改变MFC默认文档操作方式</a></td></tr>
</table>
</td></tr></table></td></tr></table><br>
<table align=center width=680><tr><td align=right>
<form name=mail method=post action='/pub/subMail.asp' onsubmit='JavaScript: return chkField(this)'>
<INPUT type='hidden' name='rec' value='24104'>
您的姓名:<INPUT type="text" name=myName size=10>
您朋友的E-mail:<INPUT type="text" name=friendMail size=10>
<INPUT type="submit" value="推荐给好友">
</form>
</td></tr>
<tr><td align=right>
<b>[<a href="javascript:window.close()">关闭窗口</a>]</b>
</td></tr>
</table>
<script language="javascript">
function chkField(fmObj)
{if (!fmObj.friendMail.value){
alert("请输入您朋友的E-mail!");
fmObj.friendMail.focus();
return false;
}
return true;
}
</script>
<table align=center width=680>
<tr><td><hr size=1 width=660 color=#f46240></td></tr>
</table><br>
<p align=center>Copyright(C) ccw.com.cn,All rights reserved</p>
<p align=center><b>中国计算机世界出版服务公司版权所有</b></p>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -