Q&A

  • 최초 일정한 실행조건에 따라 메인폼 안띄우기 어떻게 ?
폼은 메인폼 하나뿐입니다.
프로젝트파일과 메인폼유닛파일의 관계를 명확히 알지 못하여 더욱 감잡기 힘듭니다.
프로젝트파일에 코딩을 하면 된다지만, 이미 프로그램의 주구성요소들은 메인폼 유닛에 다 코딩되어 있다보니 어찌해야 할지?

암튼, 메인폼유닛의 어떤 코드를 실행하여 일정한 조건에 해당하면 그 결과와 함께 메인폼을 보여주어 프로그램의 기능을 수행하고,
아니면, 아예 폼이 화면에 번쩍하는 일조차 없도록 하고자 합니다.
1  COMMENTS
  • Profile
    김동광 2002.11.19 20:32


    이미 게시되어 있던 자료중에 힌트를 얻어 해결한 결과입니다.


    프로젝트 소스에서
    Application.Initialize;
    Application.CreateForm(TForm1, Form1);  // 메인폼의 Create이벤트 실행됨
    Application.ShowMainForm := False;        // 메인폼의 Show이벤트 중단됨
    Application.Run;


    메인폼의 Create 이벤트핸들러에서
    procedure TForm1.FormCreate(Sender: TObject);
    begin
        if 메인폼을 보이고자 하는 조건이 참 then
            Form1.Visible := True
        else
            Application.Terminate;  // 메인폼 강제 종료
    end;