Thread

__fastcall TTcpThread::TTcpThread(TApplicationInfo *a_pAppInfo)

: TThread(true) // false 이면 생성된 직후에 바로 실행.  false로 실행할때 Suspended = false로 두면

// 실행중인 상태로 인식하여  Error발생.

{                                        

Priority = tpNormal;

FreeOnTerminate = true;                            // 스레드가 Terminate할때 자동으로 파괴할지를 결정하는 property

// Suspended = false로 실행가능상태로 만듦

Suspended = false;                           // 스레드 유예할지 결정하는 property

// Suspended = true 이면 유예한다는 의미로 스레드를 중지하지 않아서 다시실행X

// Suspended = false 이면 resume으로 다시 시작(호출)가능.

}

__fastcall TMainF::~TMainF()

{

// 스레드 소스파일에서 FreeOnTerminate = false로 지정후 메인함수 소멸자에서 호출하면 정상실행.

delete m_pThread;

}