TUserControl.AddUser

public function TUserControl.AddUser(

  Login: string;

  Password: string;

  Name: string;

  Mail: string;

  Profile: Integer;

  UserExpired: Integer;

  DaysExpired: Integer;

  Privuser: Boolean

):Integer;