我在动态库里创建一个窗体，但是在显示的时候在系统的状态条上会有新窗体显示出来，怎么解决？

在程序里创建是没有的，在系统状态条上只有我的程序的小窗体，但是我把这个窗体单独
的放到一个DLL里，显示的时候会再在系统状态条上显示一个窗体，就好象这个新生成的
窗体不是我的这个进程里的似的，怎么办啊，我是这么写的。
function CreateOption(AOwner: TApplication):integer ;stdcall;
begin   AOwner.CreateForm(TFormOption,FormOption);
    BeNil := true;
    Result:= 0;end;
procedure OptionShow(ShowType:integer);stdcall;
begin  if BeNil then
     FormOption.ShowModal ;end;
TFormOption 是窗体类。