Get Main Thread ID
时间：2011-03-19 来源：Jekhn
今天在群里面看到的，通过TEB结构获取主线程ID，XP系统下测试可能，不同系统的TEB结构可能有所不同。
View Code
View Code
function GetThreadID:DWORD;
asm
xor esi,esi
mov eax,fs:[esi+$18]
mov eax,[eax+$24]
end;
procedure TForm1.Button1Click(Sender: TObject);
var
thid: DWORD;
begin
thid := GetThreadID;
ShowMessageFmt('%d',[thid]);
end;
相关阅读 更多 +
排行榜 更多 +
