ActivexForm控件里弹出窗口的问题，分数不够可以加！

Question

我做了一个activexform控件，但是不知道如何实现在这个控件里点击一个按钮后弹出一个模式窗口？
我直接新建一个基于Tform的窗口，然后在按钮的点击事件里添加代码form1.ShowModal，执行的时候
报错如下：
         Access violation at address …….Read of address 00000000.
达人帮忙啊！！

Answer 1

form1 := TForm1.create(self);
form1.ShowModal;

Answer 2

小弟刚开始学delph
谢谢大虾了！