C++ DLL (Funktion) nach Delphi

[Fritzew]

Zeig mal bitt Deine Delphi Deklaration von

My_get_pointer

Wenn ich das richtig verstehe wird der Pointer in der c dll belegt.

Gibt es auch eine function zur freigabe?

[AJ_Oldendorf]

ja es gibt auch eine Funktion für die Freigabe.
Hier die Deklaration:

function My_get_pointer(Handle: LongWord; TimeOut : LongWord; my_struct: PMy_Struct; aError: PERROR): LongWord;stdcall;external DP_DLL;

[Fritzew]

Zitat von AJ_Oldendorf:

ja es gibt auch eine Funktion für die Freigabe.
Hier die Deklaration:

Delphi-Quellcode:

// auf var geändert
function My_get_pointer(Handle: LongWord; TimeOut : LongWord; var my_struct: PMy_Struct; aError: PERROR): LongWord;stdcall;external DP_DLL;

Die Deklaration ist falsch. Ändere zu var myStruct : PMy_Struct.

Die Dll liefert Dir den Pointer auf das Struct zurück.
Du musst nicht selber Speicher belegen.

[Neutral General]

Zitat von Fritzew:

Die Dll liefert Dir den Pointer auf das Struct zurück.
Du musst nicht selber Speicher belegen.

So wie du es gemacht hast ist es aber definitiv falsch.

Entweder
my_struct: PMy_Struct
oder
var my_struct: TMy_Struct

var my_struct: PMy_Struct
ist doppelt gemoppelt (= falsch).

[Fritzew]

Nee

Zitat:

So wie du es gemacht hast ist es aber definitiv falsch.

Definition der C-Func:

Delphi-Quellcode:

My_DWORD My_get_pointer ( 
  My_DWORD my_handle, // in 
  My_DWORD timeout, // in 
  My_Struct_T volatile **data, // out //Pointer auf Pointer
  My_ERROR_T *err); // out

data is als Pointer auf Pointer definiert also ein var zu einem Pointer.

Man könnte auch

Delphi-Quellcode:

type
 PPMy_Struct = ^PMy_Struct;

// und dann
function My_get_pointer(Handle: LongWord; TimeOut : LongWord;  my_struct: PPMy_Struct; aError: PERROR): LongWord;stdcall;external DP_DLL;

[AJ_Oldendorf]

Ich versuche das gleich mal.
Muss ich denn ein New(my_struct) vorher machen oder nicht?

[Zacherl]

Zitat von AJ_Oldendorf:

Muss ich denn ein New(my_struct) vorher machen oder nicht?

Ne, in dem Falle tatsächlich nicht. Du wirst aber vermutlich eine weitere API aufrufen müssen, um den Speicher für das Struct später wieder freizugeben.

[Fritzew]

So wie ich es aus Deiner Dokumentation gelesen habe nicht.

Zitat:

Der Funktionsaufruf „my_get_pointer“ liefert die Basisadresse (C-Zeiger) auf die
Struktur My_Struct_T. Mit diesem C-Zeiger kann Ihr Programm
hochperformant auf die Daten im zugreifen.

[Zacherl]

Zitat von Fritzew:

Du musst nicht selber Speicher belegen.

Doch doch, eben schon. MyStruct* bzw. MyStruct& als Parameter in C/C++ bedeutet, dass du selbst einen Zeiger/Referenz übergibst. Den Speicher für das dahinterliegende Struct musst du durchaus selbst (entweder auf dem Stack oder dem Heap) bereitstellen. Als Zeiger/Referenz übergibt man die Structs, wenn man deren Inhalt ändern möchte (C/C++ kennt kein var ). const MyStruct*/& sieht man auch ab und zu, wobei es sich hierbei nur um eine manuelle Optimierung handelt, damit der Inhalt der
Structs beim Aufruf nicht auf den Stack gepusht werden.

Wie Neutral General schon angedeutet hat, ist MyStruct* äquivalent zu var (T)MyStruct in Delphi, was wiederrum äquivalent zu PMyStruct ist.

Zitat von Fritzew:

Die Dll liefert Dir den Pointer auf das Struct zurück.

In dem Falle wäre es MyStruct** bzw. MyStruct*&

Edit: Falsch gelesen, ist ja sogar void**