delphi 到底如何取CPU序列号？
我在网上找的代码：
FUNCTION GetCPUID : TCPUID; 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 EBX
END;
function TForm1.GetCPUIDStr: String;
var
CPUID:TCPUID;
begin
CPUID:=GetCPUID;
Result:=IntToHex(CPUID[1],8)+IntToHex(CPUID[2],8)+IntToHex(CPUID[3],8)+IntToHex(CPUID[4],8);
end;
end.
但是这个代码获得的结果是变化的的，准确的说CPUID[2]是变化的，变化不大，有1位时而为1时而为0，不知道这是什么原因。
如果想作为硬件指纹的话，把第二节去掉好了。
不过这个功能并不是所有的CPU都默认开启的，因为会涉及的用户隐私的问题，而且在主板BIOS中也有个开关可以设置�
相关问答：
请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？
无人回答？
做成资源� ......
请问Delphi有树形控件吗？
怎样使用？
Ttreeview
treeview.items.addchild(nil(上级节点),'案发时发'(text));
raize 控件包里面有，csdn有下载的
查帮助TTreeView和TNode两个类
TTreeView ......
最近换了家公司，郁闷的是关于Delphi的问题，公司之前用的也是D版Delphi7企业版的。后来被送了律事函以后，就强制改用Delphi7个人版，剧说这个版本是免费版，或者说很便宜，如果查出来，就买个好了。这下可好。苦了� ......
要求能实现二人在同台电脑上对战的 不用太花哨 最好还加上人机对战的 急需 谁帮下忙啊呀!!!!!!!!
up
baidu，google
up
http://www.codepub.com/software/view-software-4061.html
网站上有
......
