ICredentials.SlotCount

Синтаксис

SlotCount: Integer;

Описание

Свойство SlotCount возвращает количество столбцов в таблице учётных данных репозитория.

Пример

Добавьте ссылку на системную сборку Metabase.

Sub UserProc;
Var
    Package: ISecurityPackage;
    Creds: ICredentials;
    i, c: Integer;
Begin
    Package := New StandardSecurityPackage.Create;
    Creds := Package.CreateCredentials(AuthenticationMode.Password);
    c := Creds.SlotCount;
    For i := 0 To c - 1 Do
        Debug.WriteLine(Creds.SlotName(i));
    End For;
    Creds.SlotValue("USERNAME") := "USERNAME";
    Creds.SlotValue("PASSWORD") := "PASSWORD";
    //...
    // Дальнейшая работа с учётными данными
    //...
End Sub UserProc;

При выполнении примера будут созданы учётные данные, использующие парольную аутентификацию. В консоль среды разработки будет выведен список слотов, которые могут быть заданы для учётных данных.

См. также:

ICredentialsBase