为什末没有人回答我的问题？new一个Form和CreateForm的区别是什末？

[gegegeg]

我在窗体TfPublicFunc中动态增加一个分割条控件：

void __fastcall TfSzoilSubSys::P_WATCHClick(TObject *Sender)
{
if(fPublicFunc == NULL)
Application->CreateForm(__classid(TfPublicFunc), &fPublicFunc);
fPublicFunc->Show();
}

void __fastcall TfPublicFunc::FormCreate(TObject *Sender)
{
Splitter1=new TSplitter(fPublicFunc);
Splitter1->Parent=fPublicFunc;
Splitter1->Color=0x7fffffff;

}
//------------------------------------------------------------------------
结果分割条出不来，如果我把Application->CreateForm(__classid(TfPublicFunc), &fPublicFunc);替换为Application->CreateForm(__classid(TfPublicFunc), &fPublicFunc);就可以了。为什末呢？
new一个Form和CreateForm的区别是什末？
请大虾指教。

[编译失败]

???????

這兩句不是一樣的嗎?不懂!

[qibo999]

你怎么发了这么多相同贴？这不是浪费分吗？
那就接分了，呵呵 :-)

[hellobcb]

创建的时机不一样！

[cdwy411]

关注!

[ThinkX]

CreateForm是Delphi留给BCB的诟病之一，不要使用。
要用new

[Siney]

基本上：
CreateForm后form的Parent是Application,并且会将第一个用CreateForm创建的form当作主窗体.

但是不建议你用这个函数，还是用new吧.

[afei2002]

除啦主窗口以外，不要使用CreateForm创建新窗体～～

[shadowstar]

void __fastcall TfPublicFunc::FormDestroy(TObject *Sender)
{
delete Splitter1;
}