Bonjour !

sous IBExpert quand j'exécute cette ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
GRANT MAJ_BD to LOLA
ça me donne le résultat attendu.
Cette même ligne de code quand elle est exécutée à partir de Delphi ça donne erreur. Voici le code suspect :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
         try
            AddUser;
            IBCQuery_USERS.Close;
            with IBCQuery_USERS.SQL do
            begin
              Clear;
              ch_SQL := 'GRANT MAJ_BD TO ' + USER_INT;
              IBCQuery_USERS.SQL.Text := ch_SQL;
            end;
            IBCQuery_USERS.Execute;
            MessageDlg(Format('L''utilisateur %s a était ajouter avec succès.', [UserName]),
                        mtInformation, [mbOk], 0);
            Result := True;
          except
            on E:Exception do
             begin
              Result := False;
              MessageDlg('Veuillez contacter l''Administrateur de la base de données',
                        mtError, [mbOk], 0);
            end;
          end;
Avez-vous une idée d'où peut venir cette erreur ?!

Merci par avance.