Ich habe jetzt
function IsDriverInstalled : Boolean; stdcall; external 'io.dll';
hinzugefügt, sowie folgende Veränderung vorgenommen:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
if IsDriverInstalled=true then
form1.Edit1.Text:=inttostr(Portin($378));
end;
Ich erhalte aber immer noch den selben Fehler.
