Hi,
ich habe folgendes Problem.
Ich habe eine
DLL eingebunden, der Code sieht so aus:
Delphi-Quellcode:
type TAPIRESULTFORMAT = (APIFORMAT_CHAR,
APIFORMAT_BYTE,
APIFORMAT_INTEGER,
APIFORMAT_WORD,
APIFORMAT_LONG,
APIFORMAT_DWORD,
APIFORMAT_TEXT,
APIFORMAT_BINARY,
APIFORMAT_REAL);
function __apiEnd(): Boolean; stdcall; external 'api32.dll';
function __apiInit(): Boolean; stdcall; external 'api32.dll';
procedure __apiJob(ecu, job, para, result: PChar); stdcall; external 'api32.dll';
function __apiResultBinary(buffer:Byte; bufferlen:Cardinal; buffersize:Cardinal; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultByte(buffer:Byte;result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultChar(buffer:PChar; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultDWord(buffer:Cardinal; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultFormat(para:TAPIRESULTFORMAT; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultInt(buffer:SmallInt; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultLong(buffer:LongInt; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultName(buffer:PChar; index:Word; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultNumber(buffer:Word; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultReal(buffer:Double; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
function __apiResultSets(rsets:Word): Boolean; stdcall external 'api32.dll';
function __apiResultText(buffer:PChar; result:PChar; rset:Word; format:PChar): Boolean; stdcall; external 'api32.dll';
function __apiResultVar(variable:PChar): Boolean; stdcall; external 'api32.dll';
function __apiResultWord(buffer:Word; result:PChar; rset:Word): Boolean; stdcall; external 'api32.dll';
Nun hab ich das Problem wenn ich das Programm starte bleibt es sofort im CPU Fenster hängen und wenn ich weiter laufen lasse bekomme ich diese Fehlermeldung:
Code:
Problemsignatur:
Problemereignisname: BEX
Anwendungsname: Project1.exe
Anwendungsversion: 0.0.0.0
Anwendungszeitstempel: 4bf0663d
Fehlermodulname: ntdll.dll
Fehlermodulversion: 6.0.6002.18005
Fehlermodulzeitstempel: 49e03821
Ausnahmeoffset: 00009a3a
Ausnahmecode: c0000409
Ausnahmedaten: 00000000
Betriebsystemversion: 6.0.6002.2.2.0.256.1
Gebietsschema-ID: 1031
Zusatzinformation 1: c024
Zusatzinformation 2: be9414e1f9cf32517da0d4512e5d2663
Zusatzinformation 3: c024
Zusatzinformation 4: be9414e1f9cf32517da0d4512e5d2663
Aber ich hab keine Ahnung warum bzw wo der Fehler liegt