当前位置:编程学习 > Delphi >>

取得自从开机到现在CPU运行的周期数,超毫秒级的精度

取得自从开机到现在CPU运行的周期数,超毫秒级的精度
function Ticker : DWord; register;
begin
  asm
          push EAX
          push EDX
          db $0f,$31
          mov Result, EAX
          pop EDX
          pop EAX
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 showmessage(inttostr( Ticker));
end;

//rock
//转载请保留此信息

补充:软件开发 , Delphi ,
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,