Question

delphi点击窗体的关闭按钮弹出另一个窗体代码

Answer 1

简单
form2.show;建一个窗体！然后写在窗体1关闭里面就OK了

Answer 2

\\第一窗口关闭前事件
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
FORM2.show //第二窗口
end;

Answer 3

编写form1的OnClose事件
var
form2:TForm;
begin
form2:=tform.create(self);
form2.Show;
showmessage('test');
end;