Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: LPT1 Steuerung von LEDs

    Delphi
    by 3242, 21. Apr 2004
  hallo flomei,
  möchte mit einem Source Code von dir den Parallelport ansteuern....
  
  procedure PortOut(x:byte);
  begin
  asm //erklärt dem Compiler, dass Assembler Code anfängt
  mov dx,378h //378h ist die Adresse von LPT 1
  mov al,x //x müssen wir noch einen Wert zuweisen
  out dx,al
  end;