Crear el usuario lo hago conectándome a la base de datos security.fdb y usando una sentencia como esta:
Código SQL
[-]insert into users (user_name, first_name, middle_name, last_name, passwd) values(:user_name, :first_name, :middle_name, :last_name, assword)
Hay que encriptar la password usando UnixCrypt:
Código Delphi
[-]
function CreateFirebirdPassword(const password: String): String;
begin
Result := Copy(UnixCrypt(password, '9z'),3,99);
Result := Copy(UnixCrypt(Result, '9z'),3,99);
end;
Espero que te sirva.