取得自从开机到现在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
//转载请保留此信息
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/10748419/viewspace-996470/ ,如需转载,请注明出处,否则将追究法律责任。