Guardant API - не срабатывает вызов функции GrdLogin
Среда разработки RAD Studio Delphi 10.4.
Не срабатывает вызов функции GrdLogin (или функции GrdCheck тоже), возвращает значение GrdE_DongleNotFound, хотя перед этим функция GrdFind ключ находит.
Код следующий:
int_GrdStartup := GrdStartup( GrdFMR_Local );
// int_GrdStartup = 0
hGrd := GrdCreateHandle( nil, GrdCHM_MultiThread, nil );
if (hGrd = nil) then exit;
// есть указатель в hGrd
dwId := 0;
pdwId := @dwId;
int_GrdFind := GrdFind( hGrd, GrdF_First, pdwId, nil );
// int_GrdFind равно GrdE_OK, pdwId равно ID ключа
int_GrdLogin := GrdLogin(hGrd, $ffffffff, 0);
// здесь int_GrdLogin равно GrdE_DongleNotFound