TUIBSecurity

type TUIBSecurity = class(TUIBService)

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure AddUser;

  procedure DeleteUser;

  procedure ModifyUser;

  procedure DisplayUser;

  procedure DisplayUsers;

  property UserInfo []: TUserInfo; [r]

  property UserInfoCount: Integer; [r]

published

  property Role: string; [rw]

  property User: string; [rw]

  property Pass: string; [rw]

  property FirstName: string; [rw]

  property MiddleName: string; [rw]

  property LastName: string; [rw]

  property UserID: Integer; [rw]

  property GroupID: Integer; [rw]

  property Admin: Boolean; [rw]

end;

TUIBSecurity

TUIBService

TUIBComponent

TObject