主窗体内创建子窗体，老出现这个错，不知什么原因，帮忙看看！

Question

public
houseform1:thouseform;
begin
if not assigned (houseform2)  then
houseform:=thouseform.create(application);//执行到这报错
houseform2.windowstate:=wsmaximized;
end else
houseform2.windowstate:=wsmaximized;
end；
错误提示：
name not unique in this context;
问：
１：这错是什么意思
２：这错是怎么造成的，该怎么解决？

Answer 1

发错了，应该这样：
public
houseform2:thouseform;
begin
if not assigned (houseform2)  then
houseform2:=thouseform.create(application);//执行到这报错
houseform2.windowstate:=wsmaximized;
end else
houseform2.windowstate:=wsmaximized;
end；
错误提示：
name not unique in this context;
问：
１：这错是什么意思
２：这错是怎么造成的，该怎么解决？

Answer 2

Application.CreateForm(Thouseform2, houseform2)

Answer 3

var
  Frm1:TForm1;
begin
  if not assigned (Frm1)  then
  begin
   Frm1:=TForm1.create(application);
   Frm1.windowstate:=wsmaximized;
   end else
  Frm1.windowstate:=wsmaximized;
end;
这段代码调试成功！
你的错误可能是因为houseform是个窗体name作为类型时应该是Thouseform(指其类名称)

Answer 4

还没有全清楚你代码的意思。
把houseform2:thouseform;删除，试试。

Answer 5

把houseform2:thouseform;删除
这样是不行的
这样如何调用houseform这窗体

Answer 6

begin
if not assigned (houseform2)  then
houseform2:=thouseform.create(application);//执行到这报错
houseform2.windowstate:=wsmaximized;
end else
houseform2.windowstate:=wsmaximized;
有逻辑问题吧
你的Begin End 好象不配对吧！

Answer 7

if not assigned (houseform2)  then
begin
houseform2:=thouseform.create(application);//执行到这报错
houseform2.windowstate:=wsmaximized;
end else
houseform2.windowstate:=wsmaximized;
不行啊

Answer 8

houseform2:=thouseform2.create(application);//
                     ****