Использование ассемблера в Дельфи


         

Прямой доступ к портам в Windows 95 и 98


function PortInByte(PortAddress: Word): Byte;

asm

mov dx,ax

in al,dx

end;

procedure PortOutByte(PortAddress: Word; Data: Byte);

asm

xchg dx,ax

out dx,al

end;


Содержание раздела