简单的问题！送分哦

Question

??
procedure Form.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
action:=cafree;
end;
你看看行么？

Answer 1

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  form2.Release ;
  form2:= nil
end;

Answer 2

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
   form1.release;
   form1:=nil;
end;

Answer 3

procedure Form.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
action:=cafree;
form:=nil;
end;