Hi,
ok das wars so war der Code :
Delphi-Quellcode:
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;
end;
Um das Problem mit dem Zugriff unter NT-XP zu lösen nehmt den Anhang.