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.