下面代码出现错误提示：至少一个参数没有被指定值 ( 积分: 100 )

If not existform('Fnjsz') Then
Begin
application.createform(TFnjsz,Fnjsz);//运行到此处，出现错误提示：至少一个参数没有被指定值。
Fnjsz.SHOW;
End
Else
Begin
Fnjsz.BringtoFront;
Fnjsz.windowstate:=wsnormal;
End;
出现这类错误是什么原因？

If not existform('Fnjsz') Then
Begin
application.createform(TFnjsz,Fnjsz);//运行到此处，出现错误提示：至少一个参数没有被指定值。
Fnjsz.SHOW;
End
Else
Begin
Fnjsz.BringtoFront;
Fnjsz.windowstate:=wsnormal;
End;
出现这类错误是什么原因？

原因应该是自定义函数existform，把这个函数体代码拿来看看。

同意二楼，估计就是ExistForm的错误

另外，楼主是一下下面这段，我已测试通过
var
Form1: TForm1;
frm : TForm1;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
if TButton(Sender).Parent.Name='Form1' then
if not Assigned(frm) then
begin
Application.CreateForm(TForm1,frm);
frm.Show;
//frm.ShowModal;
end
else begin
frm.Destroy;
frm :=nil;
Self.Button1.Click;
end
else ShowMessage('You can not call in this way!');
end;

我知道什么错

在 TFnjsz create 事件，你用了，ADOquery了吧，但是你SQL语句里，有一个参数，没有
赋值呀

：))