DLL Schnitstelle

[venice2]

Zitat von hewy:

Dort wird Length auch nicht weitergereicht.

Nein?
Irgendwie wiedersprüchlich.

Zitat:

// VB übergibt PCertificationID = &H000000000 und CertificationIDLength = 0

Ich weis nicht wie oft du mit Delphi bisher gearbeitet hast.
Aber diese Zeile ist unnötig
CertificationId := String(AnsiString(PCertificationID)); // Oder sehe ich das falsch?

Die Rückgabe der CertificationId ist schon in der Abfrage enthalten
Result := TSeReturnCode(se_getCertificationID(CertificationID, CertificationIDLength));

Denn CertificationID ist ein var parameter.

Wenn du die Funktion so aufrufst
if SeGetCertificationId(CertificationId, 0) = ExecutionOk then

dann befindet sich das Ergebnis in CertificationId.
Ok bin raus.