yangfan请进,咱聊聊!
我决定采用你的方法,但请详细告诉我如何隐藏鼠标?如何屏蔽系统键:ALT+TAB、ALT+F4、CTRL+ESC等等。我准备结束这个问题啦!希望快些回答!谢谢! 问题点数:50、回复次数:7Top
1 楼zyb()回复于 2000-01-05 10:44:00 得分 0
其他大匣也可回答这些问题啊,如果可行的话我也回给分的!Top
2 楼kxy(手举穿肠毒药,怀抱刮骨钢刀)回复于 2000-01-05 11:58:00 得分 20
SystemParamersInfo'
ShowCursor;Top
3 楼yangfan()回复于 2000-01-05 12:52:00 得分 30
form的CURSOR=-1,BORDERSTYLE=BSNONE,在CREATE时手工设置位置及大小使之覆盖满屏
屏蔽系统按键有一定难度,本网站有如下资料,你可参考,但可能只适用95,98,NT我刚试了,不行,可能需要进程权限,而且键盘上的‘开始’键(直接弹出开始菜单)我目前还没有找到解决的方法,你可以到MSDN中查查,我们谁找到了好方法就贴出来吧!团结就是力量!!
另外此网站有好多不错的技术资料,大家的好多问题都可以找到答案!
屏蔽系统按键
也许您希望您的程序在运行时不想让用户按系统按键 Alt-Tab 或 Ctrl-Alt-Del,那么可以通过以下的程序段屏蔽这些按键。
procedure TForm1.FormCreate(Sender: TObject);
begin
var
tmp : integer;
begin
tmp := 0;
//屏蔽 Alt-Tab
SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @tmp, 0);
//屏蔽 Ctrl-Alt-Del
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @tmp, 0); end; end;
Top
4 楼zyb()回复于 2000-01-05 16:47:00 得分 0
那么如何屏蔽ALT+F4键呢?Top
5 楼yangfan()回复于 2000-01-05 19:37:00 得分 0
截获此消息,滤掉它Top
6 楼zyb()回复于 2000-01-06 13:55:00 得分 0
能否用详细的代码告诉我如何屏蔽掉Alt+F4呢?---------多谢!Top
7 楼kxy(手举穿肠毒药,怀抱刮骨钢刀)回复于 2000-01-06 14:04:00 得分 0
Form的OnCloseQuery
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := False;
end;
Top




