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;
另外此网站有好多不错的技术资料,大家的好多问题都可以找到答案! 屏蔽系统按键 也许您希望您的程序在运行时不想让用户按系统按键 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;
解决方案 »
- 设计一种模型使路由间可以透明
- 在各种数据库中(如oracle,sql server,interbase等等),修改表名和列名的sql语句一样吗?(请给出详解)
- 如果做行业软件,像什么ERP,MIS……,做哪方面的最赚钱?
- 请问如何定义常量
- 控件F1Book1的READ怎么用不了?
- DateTimePicker问题?估计要用Api
- 高分——难题:无盘工作站中……
- spcomm接收字符串
- delphi中提示“Grid index out of range”的错误信息,如何解决?
- 求一个三层结构的缓存更新方案,详情请进...
- 有一定难度的问题!
- 怎样让程序重复运行时自动转到已有的实例中(简单点儿)?
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := False;
end;