|
특별한 경우이고 구상을 잘 하신다면 이런 상황을 피하실수도 있을것 같습니다. 만약, 특별한 경우라서 이렇게 꼭 구현을 하셔야 한다면 아래와 같이 하실 수 있습니다.
/* 프로젝트 소스 */
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
USEFORM("Unit2.cpp", Form2);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->ShowMainForm = false; <- 추가
Application->CreateForm(__classid(TForm1), &Form1);
Application->CreateForm(__classid(TForm2), &Form2);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------
/* Form2 소스 */
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::FormCreate(TObject *Sender)
{
Form2->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action)
{
Application->Terminate();
}
//---------------------------------------------------------------------------
아담 님이 쓰신 글 :
: Application->Initialize();
:
: Application->CreateForm(__classid(TfrmEdit), &FormAA);
: Application->CreateForm(__classid(TfrmEdit), &FormBB);
:
:
: Application->Run();
:
: FormAA가 메인폼이되던데.
:
: 생성순서는 AA,BB이지만 메인폼을 BB로 할수는 없나요?
:
: 메인폼으로 결정되는 조건을 모르겠네요^^
|
