ParamCount: Integer;
The ParamCount property returns the total number of the user parameters.
Sub UserProc;
Var
MB: IMetabase;
User: IMetabaseUser;
SPUD: ISecurityPackageUserData;
i, c: integer;
Begin
MB := MetabaseClass.Active;
User := MB.LogonSession.User;
SPUD := User.PackageData;
c := SPUD.ParamCount;
For i := 0 To c - 1 do
Debug.WriteLine(SPUD.ParamName(i));
End For;
End Sub UserProc;
After executing the example the development environment console displays the list of user security parameters.
See also: