delphi多线程delphi 多线程编程

delphi 多线程中如何得到线程句柄？

如果你的多线程是用TThread实现的，属性ThreadID可以得到指定线程的句柄如果你是通过BeginThread运行的线程函数，可以通过返回值ThreadID得到BeginThread(SecurityAttributes: Pointer; StackSize: LongWord; ThreadFunc: TThreadFunc; Parameter: Pointer; CreationFlags: LongWord; var ThreadId: LongWord): Integer;如果你是通过CreateThread创建的，也可以通过返回值ThreadID得到HANDLE CreateThread( LPSECURITY_ATTRIBUTES lpThreadAttributes, // pointer to thread security attributes DWORD dwStackSize, // initial thread stack size, in bytes LPTHREAD_START_ROUTINE lpStartAddress, // pointer to thread function LPVOID lpParameter, // argument for new thread DWORD dwCreationFlags, // creation flags LPDWORD lpThreadId // pointer to returned thread identifier ); 如果想得到当前运行的线程的句柄用楼上的方法

delphi 多线程编程

要定义相关的对象 var MyThr : MyThread; procedure TForm1.Button1Click(Sender: TObject); begin MyThr:=MyThread.Create(True); MyThr.Resume; end;