Delphi3: Fataler Fehler: ... Interner Fehler D1825

[scp]

Also...
Ich habe Delphi 3 Build 5.83 Pro mit folgendem Update
http://info.borland.com/devsupport/d...2download.html

Folgenden Code habe ich erstellt:

Delphi-Quellcode:

implementation

{$R *.DFM}

function  Inp(PortAddress : Word) : Word; external 'inpout32.dll' name 'Inp32';
procedure Outp(PortAddress : Word; Value : Word); external 'inpout32.dll' name 'Out32';

procedure TForm1.Button1Click(Sender: TObject);
var
 w : word;
begin
  Outp($0295, $80);
  w := Inp($0296);
end;

end.

Bei mir kommt kein Delphi Fehler, es funktioniert.

PS: Der Portzugriff ist nur ein Beispiel, funzt nicht auf jedem Rechner. Ich musste nur die beiden Funktionen irgendwo unterbringen, damit er sie auch tatsächlich importiert.