Nochma Com-Port... help!!

daPhil · 25.10.2000

Moin,

ich hab ma wieda n Problem in Delphi... in Pascal konnte man mit dem Befehl Port irgend nen Port, z. B. LPT oder COM-Port ansteuern... wie geht das in Delphi???

thx
daPhil

daPhil · 25.10.2000

Ich habs schon...

Code:

{ Routines from Peter Blow. }

    procedure PortOut(IOport:word; Value:byte); assembler;
    asm
      xchg ax,dx
      out dx,al
    end;

    function PortIn(IOport:word):byte; assembler;
    asm
      mov dx,ax
      in al,dx
    end;

    function PortInW(IOport:word):word; assembler;
    asm
      mov dx,ax
      in ax,dx
    end;

    procedure PortOutW(IOport:word; Value:word); assembler;
    asm
      xchg ax,dx
      out dx,ax
    end;

daPhil

Nochma Com-Port... help!!

daPhil

daPhil

Nochma Com-Port... help!!

ANGEBOTE & SPONSOREN

Neueste Beiträge

Statistik des Forums