How to access ports

[bholas]

In the old days of DOS and 16bit Windows, writing to ports (serial, printer, game, video and other ports) in your computer was easy; all you had to do was use the "port[]" command.
Delphi no longer supports the "port[]" command, so you may have to use assembly functions as follows:
function ReadPortB
( wPort : Word ) : Byte;
begin
asm
mov dx, wPort
in al, dx
mov result, al
end;
end;

procedure WritePortB
( wPort : Word; bValue : Byte );
begin
asm
mov dx, wPort
mov al, bValue
out dx, al
end;
end;

Similar Threads:

• OM - Easy access paths
• Web 2.0 Access Control: Part 2
• Web 2.0 Access Control: Part 3