社区
Delphi
帖子详情
yangfan请进,咱聊聊!
zyb
2000-01-05 10:07:00
我决定采用你的方法,但请详细告诉我如何隐藏鼠标?如何屏蔽系统键:ALT+TAB、ALT+F4、CTRL+ESC等等。我准备结束这个问题啦!希望快些回答!谢谢!
...全文
206
7
打赏
收藏
yangfan请进,咱聊聊!
我决定采用你的方法,但请详细告诉我如何隐藏鼠标?如何屏蔽系统键:ALT+TAB、ALT+F4、CTRL+ESC等等。我准备结束这个问题啦!希望快些回答!谢谢!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
kxy
2000-01-06
打赏
举报
回复
Form的OnCloseQuery
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := False;
end;
zyb
2000-01-06
打赏
举报
回复
能否用详细的代码告诉我如何屏蔽掉Alt+F4呢?---------多谢!
yangfan
2000-01-05
打赏
举报
回复
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;
kxy
2000-01-05
打赏
举报
回复
SystemParamersInfo'
ShowCursor;
zyb
2000-01-05
打赏
举报
回复
其他大匣也可回答这些问题啊,如果可行的话我也回给分的!
yangfan
2000-01-05
打赏
举报
回复
截获此消息,滤掉它
zyb
2000-01-05
打赏
举报
回复
那么如何屏蔽ALT+F4键呢?
aqidata:ife2015_summertaskvis_
yangfan
_01
阿奇数据 我们/ 2015年夏季/任务/ vis_
yangfan
_01
libmodbus-3.1.6
主机:192.168.2.104 工作目录:/mnt/hgfs/E/共享目录/ytt 开发板:串口7 工作目录:/home/root/workdir mount -o vers=3 192.168.2.92:/server /home/root/workdir 电脑:Y:\ytt nfs软件设置 Y:\ytt -alldirs -name:share -maproot:0 -range 192.168.2.1 192.168.2.200 ./configure --host=arm-fsl-linux-gnueabi --enable-static --prefix=/mnt/hgfs/E/共享目录/
yangfan
/Modbus/install/ ./configure --host=arm-linux-gnueabihf --enable-static --prefix=/mnt/hgfs/E/共享目录/
yangfan
/Modbus/install/ arm-linu
vchat3 ASP聊天室汉化
vchat3-ASP聊天室程序,真好的哟,由
yangfan
汉化的
Struts In Action(PDF)英文版
Struts In Action(PDF)英文版 应(
yangfan
3000)的要求发一个英文版的
YFNews新闻系统
系统名称:YFNews新闻系统 级 别:入门级 适合人群:初级用户 高手速速飘过 开发环境:Winxp(ie6)+apmserver+phpDesigner 演示地址:http://webfly.07x.net/index.php 后 台:http://webfly.07x.net/admin 用 户:admin 密 码:123123 安装说明: 1 将解压后的源码上传到服务器 2 打开phpmyadmin 用解压目录下的系统sql.txt创建数据库并导入默认数据 3 打开根目录下配置configs/config.php进行服务器连接配置 yangfan'; //用户密码安全码 不要修改 否则无法登陆 $sitename='YfNews新闻系统'; //站点名 $skin='default'; //皮肤 ?> 4 登陆后台 在系统管理->系统配置 按照步骤3的设置重新做下系统配置
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章