Einzelnen Beitrag anzeigen

venice2

Registriert seit: 5. Dez 2019
Ort: Köln
969 Beiträge
 
Delphi 2010 Architect
 
#12

AW: DLL Schnitstelle

  Alt 11. Jul 2020, 11:52
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.

Geändert von venice2 (11. Jul 2020 um 11:56 Uhr)
  Mit Zitat antworten Zitat