간단한 thread 클래스를 만들었습니다.
== thread.h==
class TMythread : public TThread
{
    private:
            int i ;
    protected:
        virtual void __fastcall Execute(void);
    public:
        __fastcall TMythread(int i);
};

==thread.cpp ==
void __fastcall TMythread::Execute()
{
        AnsiString msg;
        int i=0;
  while ( 1 )
  {
    i ++;
    Memo1->Lines->Add( msg + IntToStr ( i ) );
     if (Terminated) return;
  }
}

__fastcall  TMythread::TBunSeokth(int arg) : TThread(False ){
   i = arg;

}


메인폼에서... thread 객체를 만들어서... 실행시켰습니다.
TForm:: FormCreate(TObject *Sender)
{
mytrhead = new TMythread (1);
}
이 thread는 mainform close될때... 이 Thread를 죽여야 하는데.. (kill이나 Terminate 같은 신호를
보내서 죽여야 하는데... 어떻게 해야하는지요?
예제에 보면  thread function안에서... Terminated 를 체크해서  return 하고 있습니다..

main form 이 Close될때 ...delete mythread; 하기전에 Terminate signal을 보내줘야 할것 같아서요?

수고하세요.