delphi多线程_delphi三层架构源码_delphi多线程串行执行(5)

附上这个结构 TContext(或叫: CONTEXT、_CONTEXT) 的定义:

PContext = ^TContext; _CONTEXT = record   ContextFlags: DWORD;   Dr0: DWORD;   Dr1: DWORD;   Dr2: DWORD;   Dr3: DWORD;   Dr6: DWORD;   Dr7: DWORD;   FloatSave: TFloatingSaveArea;   SegGs: DWORD;   SegFs: DWORD;   SegEs: DWORD;   SegDs: DWORD;   Edi: DWORD;   Esi: DWORD;   Ebx: DWORD;   Edx: DWORD;   Ecx: DWORD;   Eax: DWORD;   Ebp: DWORD;   Eip: DWORD;   SegCs: DWORD;   EFlags: DWORD;   Esp: DWORD;   SegSs: DWORD; end; 

CreateThread 的最后一个参数是 "线程的 ID";

既然可以返回句柄, 为什么还要输出这个 ID? 现在我知道的是:

1、线程的 ID 是唯一的; 而句柄可能不只一个, 譬如可以用 GetCurrentThread 获取一个伪句柄、可以用 DuplicateHandle 复制一个句柄等等.

2、ID 比句柄更轻便.

在主线程中 GetCurrentThreadId、MainThreadID、MainInstance 获取的都是主线程的 ID.

㈡、启动选项

function CreateThread(   lpThreadAttributes: Pointer;   dwStackSize: DWORD;   lpStartAddress: TFNThreadStartRoutine;   lpParameter: Pointer;   dwCreationFlags: DWORD; {启动选项}   var lpThreadId: DWORD ): THandle; stdcall;

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-25504-5.html