我在引用窗体的时候总是报错 帮忙解决下(50)

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons;type TForm1 = class(TForm) btn1: TBitBtn; btn2: TBitBtn; procedure btn1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementationuses sjbf, sjhy;{$R *.dfm}procedure TForm1.btn1Click(Sender: TObject);beginFormH.Create(Application);FormH.ShowModal;end;end.

FormH=TFormH.Create(Application);FormH.ShowModal;

报的错也贴出来啊！这怎么看啊？

if not Assigned(FrmDept) Then FrmDept := TFrmDept.Create(Application); FrmDept.Show;

FormH := TFormH.NewInterface;FormH.Create(Application);FormH.ShowModal;