Neues Thema starten

TSE Userlogin

 So langsam verstehe ich gar nix mehr.


Ständig bekomme ich beim User Login die Fehlermeldung WORM_ERROR_TSE_INVALID_PARAMETER egal was ich ausprobiere.


ich habe hier jetzt mal meinen letzten Versuch:


    type

      {$PACKENUM 4}  //<- Lazarus   {$MINENUMSIZE 4} <-- Delphi
      WormUserId = (WORM_USER_UNAUTHENTICATED = $0,
                    WORM_USER_ADMIN           = $1,
                    WORM_USER_TIME_ADMIN      = $2);



function worm_user_login(pContext : IntPtr; ID : WormUserId; pin : TByte; pinLength : Integer; remainingRetries : IntPtr) : WormError; cdecl;




    var
      remainingRetries : IntPtr = 0;
      pinLength : integer;

      TSE_adminPin : TByte;


    begin

      TSE_adminPin := TEncoding.UTF8.GetBytes('123456');

      pinLength := Length(TSE_adminPin);

      TSE_Error := worm_user_login(pContext, WormUserId.WORM_USER_ADMIN, TSE_adminPin, pinLength, remainingRetries);


    end;


Wo habe ich den Denkfehler?


Ich komme einfach nicht mehr weiter.


Vielen Dank für Ihre Hilfe

Carsten Vick


Anmelden oder Registrieren um einen Kommentar zu veröffentlichen