DelphiFAQ Home Search:

Read and write I/O ports

 

comments17 comments. Current rating: 2 stars (13 votes). Leave comments and/ or rate it.

In Borland Pascal and Delphi 1, there is a predefined pseudo variable Port.

In the 32bit versions of Delphi you need 2 lines of assembler code..

function InPort(PortAddr:word): byte;
{$IFDEF WIN32}
assembler; stdcall;
asm
  mov dx,PortAddr
  in al,dx
end;
{$else}
begin
  Result := Port[PortAddr];
end;
{$ENDIF}
You don't like the formatting? Check out SourceCoder then!
Content-type: text/html

Comments:

You are on page 2 of 2, other pages: 1 [2]
2020-07-27, 19:22:47
Margarito  
rating
acetaminophen cost
2020-09-17, 18:18:45
Margarita  
rating
generic viagra from mumbai india
You are on page 2 of 2, other pages: 1 [2]

 

 

NEW: Optional: Register   Login
Email address (not necessary):

Rate as
Hide my email when showing my comment.
Please notify me once a day about new comments on this topic.
Please provide a valid email address if you select this option, or post under a registered account.
 

Show city and country
Show country only
Hide my location
You can mark text as 'quoted' by putting [quote] .. [/quote] around it.
Please type in the code:

Please do not post inappropriate pictures. Inappropriate pictures include pictures of minors and nudity.
The owner of this web site reserves the right to delete such material.

photo Add a picture: