코드를 초기화하는 가장 좋은 장소는 어느 것입니까?

Question

가능한 중복 : Show a splash screen while a database connection (that might take a long time) runs

로드 INI 파일과 같은 코드를 초기화하는 가장 좋은 장소입니다
Splash Screen Programatically
? 먼저 화면에 양식을 표시하여 사용자가 응용 프로그램이로드 중이고 LoadIniFile 또는 IsConnectedToInternet과 같은 긴 함수를 호출해야한다는 것을 알 수 있도록합니다. 마지막은 정말 느립니다.

양식이 아직 준비되지 않았으므로 화면에 표시되지 않으므로 OnCreate가 좋지 않습니다.

나는이 I의 조선 민주주의 인민 공화국을하지만 항상 작동하지 : LateInitialize (4-5 초) 실행될 때까지

program Test; 
begin 
    Application.Initialize; 
    Application.Title := 'Test app'; 
    Application.CreateForm(TfrmTest, frmTest); 
    frmTest.Show;    <---------------------- won't show 
    LateInitialize; 
    Application.Run; 
end. 

양식이 표시되지 않습니다.

---

procedure LateInitialize; 
begin 
CursorBussy; 
TRY 
    // all this won't work also. the form won't show 
    frmTest.Visible:= TRUE; 
    Application.ProcessMessages; 
    frmTest.Show; 
    Application.ProcessMessages; 
    frmTest.BringToFront; 
    frmTest.Update; 
    Application.ProcessMessages; 

    DoSomethingLengthy;  {4-5 seconds} 
FINALLY 
    CursorNotBussy; 
END; 
end;  <--------- Now the form shows. 

는 그리고 네, 내 유일한 형태 (기본 양식)입니다 frmTest.

Answer 1

쉬운 방법은 자신에게 메시지를 보내는 것입니다. 나는 항상 이것을한다

const 
    MSG_AFTERCREATE = WM_APP + 4711; 

... 
procedure OnCreate(Sender: TObject); 
procedure AfterCreate(var message: TMessage); message MSG_AFTERCREATE; 
... 


Implementation 

procedure OnCreate(Sender: TObject); 
begin 
    PostMessage(Self.Handle, MSG_AFTERCREATE, 0, 0); 
end; 

procedure AfterCreate(var message: TMessage); 
begin 
    //Do initializing here... the form is done creating, and are actually visible now... 
end; 

Answer 2

오래 전에 다른 포럼에서 멀리 떨어진 누군가가 양식의 수명주기를 문서화하기 위해 다음을 게시했습니다. 나는 그것이 유용하다는 것을 발견했다. 그래서 그것을 여기에서 공유하고있다.

Create  OnCreate 
Show   OnShow 
Paint  OnPaint 
Activate  OnActivate 
ReSize  OnResize 
Paint  OnPaint 

Close query OnCloseQuery 
Close  OnClose 
Deactivate OnDeactivate 
Hide   OnHide 
Destroy  OnDestroy 

OnActivate 이벤트를 사용해보십시오.

Answer 3

frmTest.Show을 호출 한 후 LateInitialize을 호출하기 전에 frmTest.Update을 호출하여 화면에 표시 할 수 있습니다. 그러나 Application.Run이 호출 될 때까지는 주 메시지 루프가 실행되지 않으므로 양식이 그전에 다른 작업을 수행 할 수 없습니다.

또 다른 옵션은 양식의 OnShow 이벤트를 사용하여 양식에 PostMessage()을 통해 사용자 지정 창 메시지를 게시 한 다음 나중에 해당 메시지를받을 때 양식 호출 LateInitialize을 사용하는 것입니다. 이렇게하면 LateInitialize이 호출 될 때까지 양식이 정상적으로 그림 메시지를 처리 ​​할 수 ​​있습니다.

주 스레드를 몇 밀리 초/초 이상 차단하는 것은 실제로는 별도의 작업자 스레드로 이동해야합니다 (특히 IsConnectedToInternet 등). 주 스레드는 UI를 실행하는 데 사용해야합니다.

Answer 4

변형 1 : 대부분의 구성 요소가 초기화 변형 1.1 스스로를 그릴에 사용 TTimer 1 초 지연이,이 시간을 줄 것이다 초기화 을 기본 폼의에서 onShow TTimer에서에서 실행 : 함수에서 사용 메시지 방법과 OnShow에서 Win API PostMessage (SendMessage aka Perform는 아님)를 호출하십시오. 이것은 유사하지만보다 저렴하고 빠릅니다. 그러나 양식의 일부 복잡한 구성 요소가 완전히 그려지기 전에 "do init now"메시지가 수신 될 수 있습니다.

변형 2 : 스레드 (OmniThreadsLib 또는 일반 TThread)는 MainForm에서 OnCreate에서 그것을 시작하고 그 다음 당신이있는 경우에 진정으로 가장 좋은 방법입니다 필요한 모든 버튼, 메뉴 등 수 있도록, 백그라운드에서 모든 데이터를 준비 할 수 긴 함수와 블로킹, IsConnectedToInternet에 대해 설명했습니다.

변형 3 : 기본 폼을 표시하기 전에 SplashScreen을 사용하십시오. 사용자가 아직 읽지 않은 응용 프로그램을 보았으므로 좋습니다. 그게 그만큼 나쁘다. 사람들은 프로그램이 느리다는 느낌을 갖기 시작한다. Google 크롬은 실제 컨트롤이 조금 후에 준비 되더라도 "우리는 이미 시작되었습니다."보이기 위해 1 차 모선에서 그림으로 그 기본 양식을 그려야한다고했습니다.