什么涵数能读取cpu的序列号

解决方案 »

  1.   

    这样的代码N多:
    Baidu找就出来了注意双核心的CPU即可
      

  2.   

    我看LZ的标题,以为是取CUP的序号?
    CUP有A,B,C,D,E 5种型号
      

  3.   

    function getcpuid:string;
      function cpuid:longint;assembler;register;
      var
        temp:longint;
      begin
        asm
          push ebx
          push edi
          mov  edi,eax
          mov  eax,1
          dw   $a20f
          mov  temp,edx
          pop  edi
          pop  ebx
        end;
        result:=temp;
      end;
    begin
      result:=inttohex(cpuid,8);
    end;
      

  4.   

    push ebx
          push edi
          mov  edi,eax
          mov  eax,1
          dw   $a20f
          mov  temp,edx
          pop  edi
          pop  ebx
      

  5.   

    if Cup <= 10 then
      result := 'A Cup'
    else if Cup in [10..12.5] then
      result := 'B Cup'
    else if Cup in [12.5..15] then
      result := 'C Cup'
    else if Cup in [15..17.5] then
      result := 'D Cup'
    else if Cup in [17.5..20] then
      result := 'E Cup'
    else
      result := '超级大奶妈';数据参考:
    http://zhidao.baidu.com/question/2279155.html