DelphiFAQ Home Search:
Programming
    C#
    C++ (7)
    Delphi (618)
        .NET (2)
        Database (71)
        Delphi IDE (90)
        Network (39)
        Printing (3)
        Strings (12)
        VCL (83)
        Windows with Delphi (280)
    Java (8)
    JavaScript (30)
    perl (9)
    php (4)
    VBScript (1)
    Visual Basic (1)

 
Exchange Links
 
About this site

Links to us


Tell a friend
Friend's name
Friend's email
My name
My email
Short note
 
Bookmark this
Add to del.icio.us Digg! Add to Reddit Add to Yahoo MyWeb Add to Windows Live Add to Google Bookmarks Share via Facebook

Read and write I/O ports

 

comments6 comments. Current rating: 3 stars (3 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!

Comments:

2006-03-04, 10:54:14
anonymous from Bosnia and Herzegovina  
rating
something I was looking for
2006-08-27, 09:29:56
anonymous from Iran  
what must I do next? I mean in the place of PortAddr what must be replaced?
2006-08-27, 10:02:25
[hidden] from Iran  
rating
I want to read data from female port in windows xp and in delphi what must I do?
2006-11-15, 08:28:53
HUNTER from China  
READING DATA FROM PORT?
2006-12-13, 03:05:11
hunter from China  
you application must runing of the ring0
2007-03-18, 16:13:43
same from Lithuania  
rating
not usefull

 

 

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.
 
It seems that you are
from Los Angeles, US .

Info/ Feedback on this

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:
photo Add a picture:

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.