Ich benutze die
inpout32.dll.
Delphi-Quellcode:
procedure Out32(PortAddress:word;Value:byte);stdcall;export;
external 'inpout32.DLL';
function Inp32(PortAddress:word):byte;stdcall;export;
external 'inpout32.DLL';
Zuerst wollte ich es mit etwas einfachem probieren. Also habe ich die Pins 10 und 2 (hoffe mal das ist richtig) verbunden. Danach habe ich versucht abzufragen, ob eine Verbindung besteht. Allerdings will es nicht gelingen.
Delphi-Quellcode:
out32(888, 255); //Ausgänge auf High setzen
if inp32(888)<>0 then
Showmessage('Keine Verbindung :(');
Was mache ich falsch