procedure TForm1.Button1Click(Sender: TObject);

procedure TForm1.Button1Click(Sender: TObject);
begin
asm
mov dx,37ah ;
    mov AL,data ;
    out dx,AL   ;
    mov dx,378h ;
    mov AL,data ;
    out dx,AL   ;
end;
end;
运行编译没问题,但执行事件就有问题。提示是：privileged instruction
在DELPHI下对并口送数据的东西有没有啊？？