菜鸟想问这个函数有什么用？

Question

procedure setTs(ATS:dword);
begin
  asm
    push eax
    mov         ecx,00800EC8h
    mov         eax,00443050h
    call eax
  end;
end;
请问这个函数有什么用？如果我这么用有什么后果？？
procedure TForm1.Button1Click(Sender: TObject);
begin
setTs($00ffffff);
end;

Answer 1

试一试不就知道了
-----------------------
这台机器没有Delphi就不帮你试了 :)

Answer 2

procedure setTs(ATS:dword);
begin
  asm
    push eax
    mov         ecx,00800EC8h
    mov         eax,00443050h
    call eax
  end;
end;
请问这个函数有什么用？如果我这么用有什么后果？？
procedure TForm1.Button1Click(Sender: TObject);
begin
setTs($00ffffff);
end;//返回一个基于错误码的错误消息。此处，你试着改00443050h。则错误信息也变，而改
00800EC8h或$00ffffff都不会影响结果！是有你的过程来决定的 ！