Hi, I get the error: "Access violation." when I use quickly a TPopupMenu component with this code on the OnClick MenuItem event:

procedure TForm1.MenuItem1Click(Sender: TObject);
begin
  Form2 := TForm2.Create (Application);
  try
    Form2.ShowModal;
  finally
    Form2.Free;
  end;
end;

Why?

I use Lazarus 0.9.26.

Best regards.