我想判断已创建的窗体是否释放掉，若释放则重新创建
如何使得函数：assigned(Form1)的值为false呢？？
当你的这个窗体没有创建或者释放调以后就是false的啊
procedure TFrmWarning.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree
。。。
if not assigned(FrmWarning) then
FrmWarning:=TFrmWarning.Create(FrmWarning);
但assigned(Form1)还是为真，请教？
FORM1不存在，那个值就是FALSE
如果想自己设，用BOOLEAN变量
在DESTROY中把 Form1:=nil就可以了。
//另外一种方法也可以判断一个窗体是否创建～～
begin
if Assigned(Application.FindComponent('Form2')) then
{ }
else begin
Form2 := TForm2.Create(Application);
end;
Form2.Show;
end;
procedure TFrmWarning.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Freeandnil(TFrmWarning);
//...
if not assigned(FrmWarning) then
FrmWarning:=TFrmWarning.Create(FrmWarning);
ok^_^