Q&A

  • Thread를 실행 중간에 종료시키려하는데...
안녕하십니까?

Thread가 실행중에 종료를 시키려 하는데 어찌하나요.

Thread실행중에 강제로 종료를 시키려 합니다.

다음은 프로그램을 간단하게 정리하여 보았습니다.

한수 가르침 바랍니다.



// Thread Create Program

unit MainCntl;

interface

uses

............., PGMTrans_Thread,......;

procedure TFormCntl.BitBtn1Click(Sender: TObject);

begin

PGMThread.Create(False);

end;



// Thread Program

unit PGMTrans_Thread;

type

PGMThread = class(TThread)

protected

procedure Execute; override;

procedure PGMThread.Execute;

begin

FreeOnTerminate := True;

Repeat

...

until x=a;

end;

0  COMMENTS