58问答库 > 请用Delphi7设计一个不含系统菜单的窗体，通过添加的按钮实现窗体的关闭？

请用Delphi7设计一个不含系统菜单的窗体，通过添加的按钮实现窗体的关闭？

把方法步骤具体写下来。谢谢了。

2025-05-12 15:53:07

推荐回答（2个）

回答（1）：

1,首先建立一个新的application,在form1的窗体属性boderstyle中选择bsnone

2,在form1上面放一个button,双击button写上事件代码 close

3,按F9运行即可

回答（2）：

1.新建Project,将主窗体Form1的BorderIcons的biSystemMenu属性设置为False;
2.在窗体上放一个Button按钮;
3.双击Button按钮，在代码中加入一行:Close;即可

procedure TForm1.Button1Click(Sender:TObject);
begin
Close;
end;