안녕하세요.

꼼지락.수야입니다.

드뎌 완결편입니다.
우선 이건 www.procbuilder.com 홈쥔장이신 ill's 님이 도와주셨음을 알려드립니다.
그리고 일스님에게 감사드립니다. ^^

네.. 답변인데요~ ^^
저도 공부하는겸해서 해봤는데.. ^^ 드뎌 마무리를 짓게 되었습니다.

unit1.cpp

__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
  Form1->Show();
  OnOffOk = false;
  Form2 = new TForm2(this);
  Form2->ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
  delete Form2;
  delete Form3;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
  if(OnOffOk)
  {
    Form3 = new TForm3(this);
    Form3->ShowModal();
    OnOffOk = false;
  }
}
//---------------------------------------------------------------------------
일스님이 알려주신부분이 포함되었죠~ 바로 TTimer부분입니다.

하지만.. 님이 어떤 풀그림을 짜는지 멀라서.. 좀 호환이 될수 있도록 해봤는데요~

OnOffOk 는 퍼블릭 불변수 입니다.

그리고 TTimer 컴포넌트가 추가되었구요.. 전에있던 OnActivate 부분이 사라졌죠?

하지만 OnActivate 부분의 내용이 TTimer 부분으로 바뀌었죠.. ^^

TTimer 컴포넌트를 폼1에 넣어주시는거 잊지 마세요~ ^^

그리고 TTimer 컴포넌트의 Enabled 속성은 false 값으로 초기화 되어있어야 합니다.

네.. 다음 화일

unit2.cpp

//---------------------------------------------------------------------------

void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action)
{
  Form1->Timer1->Enabled = true;
  Form1->OnOffOk = true;
}
//---------------------------------------------------------------------------

이부분만 추가가 돼었구요.. OnOffOk란 불변수의 사용이 무의미 할지도 모르지만..

님이 생각하시는 풀그림이 제 추측과 비슷하다면 아마도 사용하실듯한 변수같군요~ ^^

마지막으로 unit3.cpp 화일입니다.

//---------------------------------------------------------------------------
void __fastcall TForm3::FormShow(TObject *Sender)
{
  Form1->Timer1->Enabled = false;
}
//---------------------------------------------------------------------------

이 부분은 일스님이 안알려주셔서 제가 어거지루 넣은건데요..

이부분이 없으면 폼3이 계속 생성이되서.^^ 넣어주시는게 좋을듯 하네요..

도움이 됐으면 좋겠네요..

덕분에 좋은 공부 하고 갑니다.

컴퓨터 앞에서 꼼지락 거리는 수야였습니다.

추신 : 오늘은 수야의 프로그래밍 경력 40일정도 되는 날입니다. ^^

글믄.. ^^