创建一个欢迎窗体的详细步骤

[慢热型]

我在书上看到的是：添加窗体（加主窗体共两个窗体），然后把新窗体名设为StartForm。
并把新窗体添加到project->option->form的右边
然后是在主窗体中添加下面这段代码：
#include "Unit2.h" //Unit2为窗体StartForm的头文件
WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR,int)
{
try
{
StartForm=new TStartForm(Application);
StartForm->Show();
StartForm->Update();
Sleep(2000);
Application->Initialize();
Application->CreateForm(__classid(TStartForm),&StartForm);

Application->Run();

delete StartForm;
}
catch(Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
可是运行时，却不显示StartForm窗体而是显示主窗，请问是为什么？

[ooolinux]

并把新窗体添加到project->option->form的右边 // 你可能操作错了，其实可以不用这样操作 Application->CreateForm(__classid(TStartForm),&StartForm); // 这句创建的主窗体是StartForm 如果不那样操作，有两行类似 Application->CreateForm(__classid(TStartForm),&StartForm); 的语句，第一行创建的总是程序主窗体（注意顺序，如果不对把两行互换）， 第二行是欢迎窗体，把第二行 // 注释掉就可以了。

[ooolinux]

欢迎窗体的Name属性为StartForm

[ooolinux]

Application->Initialize(); 这句应该放在try块的最前面，意思是对程序做初始化（实际上没有做什么，所以放在后面也没后果）。 楼主看的书是哪本，书名？

[慢热型]

引用 3 楼 u010165006 的回复:

Application->Initialize(); 这句应该放在try块的最前面，意思是对程序做初始化（实际上没有做什么，所以放在后面也没后果）。 楼主看的书是哪本，书名？

c++buider6.0基础教程，能推荐本好书吗？

[慢热型]

把哪一行注释掉？

[慢热型]

还是不行啊，不知道怎么做了。

[ooolinux]

先 【工程——选项】，把右边窗格的那个窗体双击回到左边，关闭再看代码，就有两行Application->CreateForm语句了，把创建欢迎窗体那一行注释掉。 《C++Builder 6程序设计教程（第二版）》 （陆卫忠，刘文亮　等编著） 这本比 C++Builder 6.0基础教程 好一些，不过只有二手了。 你基础教程看完以后，可以再找进一步学习的书，以后你需要的时候再说。

[ooolinux]

BCB 6.0主菜单有：查看——单元、窗体，可以切换几个cpp文件（包括 工程名.cpp）、几个窗体，查看——切换窗体/单元 可以切换窗体和对应的cpp文件窗口。 BCB工具栏左边有几个快捷按钮对应这几个功能。 BCB还可以 新建——窗体（包括窗体和对应的cpp、h文件，有快捷按钮），新建——单元（只有cpp、h文件）

[慢热型]

[quote=引用 7 楼 u010165006 的回复:] 先 【工程——选项】，把右边窗格的那个窗体双击回到左边，关闭再看代码，就有两行Application->CreateForm语句了，把创建欢迎窗体那一行注释掉。 放在哪边都不行，没有出现两行Application->CreateForm语句，还是只能显示主窗口，显示不了欢迎窗口。

[慢热型]

大神帮帮忙啊，这个问题困扰我很久了。

[日立奔腾浪潮微软松下联想]

欢迎窗体不要作为主form TStartForm *StartForm = new TStartForm(NULL); StartForm->Show(); StartForm->Update(); Sleep(2000); StartForm->Close(); Application->Initialize(); Application->CreateForm(__classid(TMainForm),&MainForm); Application->Run();

[慢热型]

引用 10 楼 DelphiGuy 的回复:

欢迎窗体不要作为主form TStartForm *StartForm = new TStartForm(NULL); StartForm->Show(); StartForm->Update(); Sleep(2000); StartForm->Close(); Application->Initialize(); Application->CreateForm(__classid(TMainForm),&MainForm); Application->Run();

按你的要求改了，可还是只显示主窗口。欢迎界面没显示！！ WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR,int) { try { StartForm=new TStartForm(NULL); StartForm->Show(); StartForm->Update(); Sleep(2000); Application->Initialize(); Application->CreateForm(__classid(TForm1),&Form1); Application->Run(); delete StartForm; } catch(Exception &exception) { Application->ShowException(&exception); } return 0; }

[慢热型]

我知道问题出在哪了，应该在工程的cpp中写代码，我写在Form1中了。 谢谢大家。