|
Project - Options - Forms 에서 처음으로 잡은 폼이 메인폼입니다. 메인폼이 사라지면 어플리케이션이 종료됩니다. 그렇기 때문에 로고 폼을 메인폼으로 잡으시면, 로고폼만 보이다가 어플리케이션이 끝나는 일반적인 경우가 발생할 수 있습니다.
다른 방법도 있겠지만, 저는 보통 로고폼은 서브 폼으로 두고, 메인폼을 보이지 않게 실행한 뒤, 로고폼이 끝나는 시점에서 메인폼을 띄우는 방법을 사용합니다.
[Project1.cpp] 파일에..
//---------------------------------------------------------------------------
#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->CreateForm(__classid(TForm1), &Form1);
Application->CreateForm(__classid(TForm2), &Form2);
Application->ShowMainForm = false; // 이 부분을 추가
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------
[로고 폼]
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner) : TForm(Owner)
{
Form2->ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Timer1Timer(TObject *Sender)
{
Form2->Close();
Form1->Show();
}
//---------------------------------------------------------------------------
이런식으로 하시면, 로고를 보인다음 메인화면을 띄우실 수 있습니다.
초보 님이 쓰신 글 :
: 처음 프로그램 시작하면 로고화면폼(보통 회사이미지)이
: 잠시 띄워졌다가 사라지잖아요.
: 로고화면폼에서는 타이머를 있어 1초후에 닫아짐니다.
:
: 로고화면폼 소스
: void __fastcall TPizzaIntro::Timer1Timer(TObject *Sender)
: {
: Close();
: }
: //---------------------------------------------------------------------------
: void __fastcall TPizzaIntro::FormClose(TObject *Sender,
: TCloseAction &Action)
: {
: Action = caFree;
: }
:
:
: 프로젝트 -> 옵션 -> Forms탭에서 처음폼은 로그인폼입니다.
: 답변부탁드립니다....
:
:
: 한국 축구화이팅.~~~~~~~~
|
