title: Open and close vcl form
body: <p>Right now i have 2 forms. On Form1 i open up Form2 like this:</p>
  
  <pre><code>procedure TForm1.Action1Execute(Sender: TObject);
  var
    Form2: TForm2;
  begin
    Form2 := TForm2.Create(Form2);
    Form2.ShowModal;
    Form2.Free;
  end;
  </code></pre>
  
  <p>Now i want to close the Form2 with a button on it. So i tried </p>
  
  <pre><code>procedure TForm2.cancelBtnClick(Sender: TObject);
  begin
    Form2.Close;
  end;`
  </code></pre>
  
  <p>But that only gives me Access violation error when i click that button. What i am doing wrong? </p>