title: Why interrupt 0x2A doesn't work in x64?
body: <p>I ues this code to get system up time :</p>
  
  <pre><code>procedure GetSystemUpTime(var Hour, Minute : integer);
  
  function GetSysTime : dword;
    asm
      int $2a
    end;
  begin
    Hour := GetSysTime() div 3600000;
    Minute := GetSysTime() mod 3600000 div 60000;
  end;
  
  procedure TForm1.Button1Click(Sender : TObject);
  var
    H, M : integer;
  begin
    GetSystemUpTime(H, M);
    Label1.Caption := IntToStr(H) + ':' + IntToStr(M);
  end;
  </code></pre>
  
  <p>I test it in <code>win8 x86</code> and <code>XP x86</code> it works , but fail in <code>win7 x64</code>  with error:</p>
  
  <p><img src="https://i.stack.imgur.com/07AvZ.png" alt="enter image description here"></p>
  
  <p>I wonder how to get system interruption in x64 , can anybody fix it ?</p>