TIP: Click on subject to list as thread! ANSI
echo: delphi
to: JANNIEK HUMMELINK
from: FRANCOIS PIETTE
date: 1996-08-10 19:44:00
subject: Delphi 2.0 communication...

Salut Janniek Hummelink !
  JH> Hallo All!I use a LabCard multi I/O card for communication with a
  JH> machine. The analog data are converted to digital data. The program
  JH> reads via the statement PORT[adress] the content of the specified
  JH> adress. In Delphi 1.0 I can use thestatement PORT[adress]. Delphi 2.0
  JH> however does not recognise the statement PORT. How can I continously
  JH> read the contents of a specific adress?
I wrote for you this function:
function PortInput(Port : word) : byte;
begin
    asm
        mov dx,port
        in al,dx
        mov result, al
    end;
end;
It does what you wants...
Amiti‚s,
{-Francois Piette-}
--- SvFido 1.32
---------------
* Origin: OverByte BBS (Embourg-Belgium) 32-41-651395 V-FAST (2:293/2202)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.