Registriert seit: 7. Aug 2008
Ort: Brandenburg
1.464 Beiträge
Delphi 12 Athens
|
AW: Aufruf DLL: Wie nur das Array?
20. Okt 2014, 17:23
Ich würde das auch so übersetzen:
Delphi-Quellcode:
TApiMem = ^PApiMem;
PApiMem = record
dLength: LongInt;
dpRef: PBYTE;
end;
function YZ(var pRef: FApiMem; length: LongInt): LongInt stdcall; external 'my.dll' name '_FAPIXY@40';
var
apiMem: array of PApiMem;
begin
SetLength(apiMem, 2);
New(apiMem[0]);
// Initialisierung apiMem[0]
New(apiMem[1]);
// Initialisierung apiMem[1]
YZ(apiMem[0], 2);
end;
|