Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[14879] [자답]쓰레드 갯수 구하는 방법이 있나요?
하두고 [hadugo] 1932 읽음    2013-11-30 18:10
VAR
  MyThread    : Array[1..10]  of TMyThread;
  rWait       : Cardinal;

Begin
For i = 1 to 10 do
Begin
      MyThread := TMyThread.Create(....)
      MyThread.FreeOnTerminate := true;
      MyThread.Resume;
End;

  repeat
    rWait:= WaitForMultipleObjects(i, @MyThread, True, 100);
    Application.ProcessMessages;
  until rWait<>WAIT_TIMEOUT;

  ShowMessage('와우~! 쓰레드가 끝났다~");
End;

이렇게 하니까 되네요^^


하두고 님이 쓰신 글 :
: For i = 1 to 10 do
: Begin
:      With TMyThread.Create(....) do
:      Begin
:              .....
:              FreeOnTerminate := true;
:              Resume;
:       End;
: End;
:
: 이렇게 했는데요.
:
: 모든 쓰레드가 종료될때 까지 기다리는 방법이 있는지요?

+ -

관련 글 리스트
14878 쓰레드 갯수 구하는 방법이 있나요? 하두고 1797 2013/11/30
14879     [자답]쓰레드 갯수 구하는 방법이 있나요? 하두고 1932 2013/11/30
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.