Delphi und C++, Import dll

Question

Ich habe eine DLL, mit exportierte Funktion:

int HCalculator::CalculateMC(const char* h, const char* b, const char* d, __int64 numberOfTrials, double* results) 

Wie diese Funktion in Delphi-Projekt importieren?

Es scheint so zu sein:

function CalculateMC(h, b, d: PChar; numberOfTrials: int64; results: ???): integer; stdcall; external 'MYDLL.DLL'; 

Aber was ist ein Array von Doppel? Wie schreibe ich es auf? Und wie soll ich diese Funktion nennen?

Answer 1

Der Parameter results ist ein Array von Doubles. Angenommen, das Array hat numberOfTrials Elemente. Dann würden Sie die DLL wie folgt aufrufen:

function CalculateMC(h, b, d: PChar; numberOfTrials: int64; 
    results: PDouble): integer; stdcall; external 'MYDLL.DLL'; 
..... 
var 
    returnVal: integer; 
    results: array of Double; 
..... 
SetLength(results, numberOfTrials); 
returnVal := CalculateMC(h, b, d, numberOfTrials, @results[0]); 

Ein großes Problem, das ich sehe, ist, dass Ihre C++ Funktion eine Member-Funktion zu sein scheint. Sie könnten das von Delphi aus aufrufen, indem Sie vor allen anderen Parametern, die einen Zeiger auf die C++ Objektinstanz enthielten, einen zusätzlichen Parameter zu CalculateMC hinzufügen. Aber Sie würden einen Weg brauchen, um diese Instanz zu erreichen. Und natürlich müssten Sie die Deklaration CalculateMC in Ihrem Delphi-Code ändern. Vermutlich würde Ihre DLL eine Funktion exportieren, die eine neu erstellte Instanz zurückgibt.

Ein anderes mögliches Problem ist, dass Sie stdcall in Ihrem Delphi-Import angegeben haben, aber nicht in dem C++ - Code. Wenn Sie C++ mit der Option stdcall für Ihre Funktionen kompilieren, werden die Schnittstellen übereinstimmen. Ansonsten können Sie diesen Code überhaupt nicht aus Delphi aufrufen, da MS thiscall in Delphi keine direkte Entsprechung hat. Ich würde eine explizite __stdcall zu Ihrem C++ Code hinzufügen.