Question

delphi关闭程序本身代码是什么啊?

单击按钮后关闭程序本身,代码是什么啊?用什么函数实现?

Answer 1

添加一个按钮Button1,然后写Button1的OnClick事件：

procedure TForm1.Button1Click(Sender: TObject);
begin
Application.Terminate; //close或者halt或者self.close，都可以;
end;

Answer 2

application.terminate;

Answer 3

form1.close

Answer 4

self.close

Answer 5

close;