コンソールアプリケーションでTForm1.FormCreate（）とTForm1.FormCloseQuery（）と同等のものは何ですか？

Question

私は自分のアプリケーションをネイティブコンソールアプリケーションに変換しようとしていますが、私はそれを行う前に、コードを初期化する場所と、ユーザーがプログラムを閉じるときにコードを置く必要がある（CTRL + C）必要があります。例コード

procedure TForm1.FormCreate(Sender: TObject); 
begin 

    InitializeCriticalSection(CriticalSection1); 
    DecimalSeparator:='.'; 
    programdir:=ExtractFileDir(application.ExeName); 

    if ParamCount>1 then 
    begin 
    InputFile:=ParamStr(1); 
    OutputFile:=ParamStr(2); 
    end; 

end; 

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); 
begin 

    if ProccesSupervisor<>nil then 
    begin 
    ProccesSupervisor.Terminate; 
    ProccesSupervisor.WaitFor; 
    ProccesSupervisor.Free; 
    end; 

    DeleteCriticalSection(CriticalSection1); 

end; 

Answer 1

多くの目的で、メインとセカンダリモジュールのInitialization and Finalizationセクションを使用できます。 Ctrlキーを押しながらCは、あなたは窓のアプリケーションによって提供されるいくつかの可能性がコンソールアプリケーションでは利用できない、といくつかの他の可能性を得るために、あなたがそれらを整理する必要があることSetConsoleCtrlHandlerルーチン（example）

注意を設定する必要が治療に

" （例えば、OLE初期化、メッセージサイクルなど）