ShowModal在程序中不能顺利编译通过，问题可能出在哪里？

Question

单独建一个项目project1中包含form1和form2。
form1中的button1点击过程：case form2.showmodal of
mrOk: beep;
mrCancel: begin beep; sleep(500); beep; end;
end;form2中含有modalresult分别为mrOk/mrCancel两个BitBtn.
这个程序调试没有问题，可以顺利通过。
但是如果在我的主项目中使用Button1调用form2的时候，运行时总是停在含有showmodal的命令行，错误提示：
Access violation at address 004EA27F in module 'project1.exe'.Read of address 00000000.
点击确定后，不能调出form2。
请问这种情况我该从什么地方检查主程序？因为主程序太长了，贴出来怕耽误大家的时间

Answer 1

form2还没有创建
form2:=Tform2.Create(application);
case form2.showmodal of
mrOk: beep;
mrCancel: begin beep; sleep(500); beep; end;
end;