求救:如何获取CPU的序列号? 请问如何获取CPU的序列号。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 type TCPUID = array[1..4] of Longint;function GetCPUID : TCPUID; assembler; register; //得到CPU序列号asm PUSH EBX {Save affected register} PUSH EDI MOV EDI,EAX {@Resukt} MOV EAX,1 DW $A20F {CPUID Command} STOSD {CPUID[1]} MOV EAX,EBX STOSD {CPUID[2]} MOV EAX,ECX STOSD {CPUID[3]} MOV EAX,EDX STOSD {CPUID[4]} POP EDI {Restore registers} POP EBXend; TCPUIDARRAY=array[1..4] of Longint;function GetCPUID : TCPUIDARRAY; assembler;register;asm PUSH EBX {Save affected register} PUSH EDI MOV EDI,EAX {@Resukt} MOV EAX,1 DW $A20F {CPUID Command} STOSD {CPUID[1]} MOV EAX,EBX STOSD {CPUID[2]} MOV EAX,ECX STOSD {CPUID[3]} MOV EAX,EDX STOSD {CPUID[4]} POP EDI {Restore registers} POP EBXend;没有整理过的数据,自己处理吧.在Win2000下测试通过. 如何用delphi7编写温度云图? 请详细阐述indy中readfromstack的用法 开发一个软件~请大家来看看! yuyuhaso 进来拿分 ★★★★DELPHI 下CMD的操作问题,大家来看看 语言处理程序是编译器吗? 昨天谁去长城饭店听了北京的DELPHI2005的讲座,感觉如何? 在DELPHI中如何使用In-Proc服务器 如何能知道其它程序的Memo或RichEdit的Handle呢? dephi该怎样入门?? 关于局域网移动文件的问题 诚觅delphi兼职开发高手
TCPUID = array[1..4] of Longint;function GetCPUID : TCPUID; assembler; register; //得到CPU序列号
asm
PUSH EBX {Save affected register}
PUSH EDI
MOV EDI,EAX {@Resukt}
MOV EAX,1
DW $A20F {CPUID Command}
STOSD {CPUID[1]}
MOV EAX,EBX
STOSD {CPUID[2]}
MOV EAX,ECX
STOSD {CPUID[3]}
MOV EAX,EDX
STOSD {CPUID[4]}
POP EDI {Restore registers}
POP EBX
end;
asm
PUSH EBX {Save affected register}
PUSH EDI
MOV EDI,EAX {@Resukt}
MOV EAX,1
DW $A20F {CPUID Command}
STOSD {CPUID[1]}
MOV EAX,EBX
STOSD {CPUID[2]}
MOV EAX,ECX
STOSD {CPUID[3]}
MOV EAX,EDX
STOSD {CPUID[4]}
POP EDI {Restore registers}
POP EBX
end;没有整理过的数据,自己处理吧.在Win2000下测试通过.