动态关闭窗体

Question

procedure PCloseForm(IntIsUpdate: Integer;FormClass: TForm);
var
  IntRtn: Integer;
begin
  if IntIsUpdate<>3 then
  begin
    IntRtn := Application.MessageBox('信息已修改,是否保存?','提示信息',MB_YESNOCANCEL);
    if IntRtn=6 then
    begin
      FormClass.SpBtn_Save.Click;//这里的用法不对
      FormClass.close;
    end;
    if IntRtn=7 then
      FormClass.close;
    if IntRtn=2 then
      abort;
  end
  else
    FormClass.close;
FormClass.SpBtn_Save.Click;//这里的用法不对
各位指教一下如何动态调用窗体

Answer 1

我要关闭的窗体已经创建运行了,现在是要通过调用这个过程来关闭啊,说具体点吧