: void __fastcall TAgentThread::Execute()
: {
:     try
:     {
:         //Thread가 Terminated상태가 아니면 실행
:         while(!Terminated)
:         {
:             Synchronize(RunAgentThread);
              Sleep(10);  <----------------------------요렇게 하면 안될까염 ^^
:         }//while
:     }
:     catch ( ... ) {}
: }

초보빌더 님이 쓰신 글 :
: 쓰레드를 사용하는데 CPU를 심하게 점유합니다.
:
: 쓰레드를 이용하는 프로그램을 만들고 있는데요 CPU를 80%이상 점유해서
: PC가 느려질 정도로 만드네요.
: 아직 쓰레드내에 업무처리는 없고 몇가지 플레그들 확인하는 소스뿐인데요
: 보시고 잘못된부분 지적해주세요(쓰레드는 첨이라 무지 많을듯..)
:
: 메인폼
: TfrmMain *frmMain;
: TAgentThread *AgentThread;
: //---------------------------------------------------------------------------
:
: __fastcall TfrmMain::TfrmMain(TComponent* Owner)
:     : TForm(Owner)
: {
:     //Thread생성
:     AgentThread = new TAgentThread(true);
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TfrmMain::FormActivate(TObject *Sender)
: {
:     if (startFlag)
:     {
:     startFlag = false;
:     AgentThread->Resume(); <-- 프로그램 실행 시 자동으로 쓰레드 시작
:     }
: }
:
: 쓰레드 폼
:
: void __fastcall TAgentThread::RunAgentThread(void)
: {
:     //DB연결정보가 정상적인지 확인
:     if (frmMain->runAgent.dbConnect)
:     {
:         //에이전트 정책정보가 정상적인지 확인
:         if (frmMain->runAgent.readAgent)
:         {
:             //정상적이면 에이전트 실행할 수 있도록 변수 정의
:             startThread = true;
:         }
:         else
:         {
:             startThread = false;
:         }
:     }
:     else
:     {
:         startThread = false;
:     }
:
:     //환경설정이 정상적으로 완료되면 에이전트 실행
:     if (startThread)
:     {
:         //에이전트 기본정책 확인에 따른 업무 처리
:         if (Trim(frmMain->infoAgent.runx_type) == "N")
:         {
:         }
:
:         if (Trim(frmMain->infoAgent.runx_type) == "S")
:         {
:         }
:
:         if (Trim(frmMain->infoAgent.runx_type) == "B")
:         {
:         }
:
:         //에이전트 정책을 다시 읽는다.
:         frmMain->getAgentInfo(); <----- 데이터베이스 쿼리문을(SELECT)실행해서 구조체에 값을 저장하는 함수입니다.
:     }
: }
:
: __fastcall TAgentThread::TAgentThread(bool CreateSuspended)
:     : TThread(CreateSuspended)
: {
:     Priority    = tpTimeCritical;
:     startThread = false;
: }
: //---------------------------------------------------------------------------
:
: void __fastcall TAgentThread::Execute()
: {
:     try
:     {
:         //Thread가 Terminated상태가 아니면 실행
:         while(!Terminated)
:         {
:             Synchronize(RunAgentThread);
:         }//while
:     }
:     catch ( ... ) {}
: }
: //---------------------------------------------------------------------------