Invalid pointer operation

[BluesKid]

Moin moin

So, also hab jetzt mal folgendes gemacht:

die Funktion Readdata sieht in der DLL bei mir jetzt so aus:

Delphi-Quellcode:

function Readdata:Integer;stdcall;
begin
 result:=treiber_readdata(hTreiber);
end;

Die Funktion gibt jetzt einen Integer-Wert zurück. Sprich das 'inttostr' musst du dann beim Aufrufen davor setzen..

Analog dazu die Einbindung:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages,..

.
.

procedure Open_Driver;stdcall;
procedure Close_Driver;stdcall;
function Readdata:Integer;stdcall;



var
  Form1: TForm1;


implementation

{$R *.DFM}

procedure Open_Driver;stdcall; external 'treiber2_project.dll';
procedure Close_Driver;stdcall; external 'treiber2_project.dll';
function Readdata:Integer;stdcall; external 'treiber2_project.dll';

.
.
.

Auch hier von String auf Integer gewechselt, so hatte ich keine Fehlermeldung mehr...schau mal ob dir das hilft


schönen Gruß

Sam