C++ DLL in Delphi einbinden

[shmia]

Zitat von Muetze1:

Kann es sein, das du Speicher für den PChar alloziieren musst? Stichwort StrAlloc()...

Mit Sicherheit muss man das tun.

Delphi-Quellcode:

var
   otrailer : string;
   tr: TRAB;
   erg : integer;
begin
   // record tr mit Daten füllen
   ....
   // Speicher für otrailer anlegen
   SetLength(otrailer, 1000);    // das sollte reichen   

   erg := versacom(tr, PChar(otrailer));  // der Aufruf

   // string otrailer verkürzen bis zum 1. Auftreten von #0
   otrailer := PChar(otrailer);

   // Auswertung von erg nicht vergessen !
end;