关于汇编的问题。

procedure TForm1.FormCreate(Sender: TObject);
begin
  asm
    push bx
    mov dx,3fh
    in eax,dx
    pop bx
  end;
end;编译通过，但是运行时出现priviledged instruction错误。
请问是什么原因。错误出现在in eax,dx,
请问在Delphi中，win2k或XP中怎么使用in和out指令。