首页 > 学院 > 开发设计 > 正文

怎样屏蔽掉开始按钮?

2019-11-18 18:44:51
字体:
来源:转载
供稿:网友
PRocedure TForm1.Button1Click(Sender: TObject);
begin
{Disable the start button}
EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil),0, 'Button', nil),false);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
{Enable the start button}
EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil),0,'Button',nil),true);
end;

注意:如果按win键还是可以弹出开始菜单的。

上一篇:DLL文件中Form的使用

下一篇:netmessagebuffersend示例

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表
学习交流
热门图片

新闻热点

疑难解答

图片精选

网友关注