bonjour
comment récuperer les Frst, middle et last_name de l'user à la connexion à une base FireBird avec les composants IB standards de Delphi 7 ?
merci de votre aide
jlf
bonjour
comment récuperer les Frst, middle et last_name de l'user à la connexion à une base FireBird avec les composants IB standards de Delphi 7 ?
merci de votre aide
jlf
Palette Interbase Admin prendre le composant IBSecurityService.
Extrait de l'aide en ligne :
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
23
24
25
26
27
28
29
30
31
32 procedure TForm1.Button4Click(Sender: TObject); var I: Integer; begin with IBSecurityService1 do begin ServerName := 'Poulet'; LoginPrompt := False; Params.Add('user_name=sysdba'); Params.Add('password=masterkey'); Active := True; Memo1.Lines.Clear; try DisplayUsers; for I := 0 to UserInfoCount - 1 do begin with UserInfo[i] do begin Memo1.Lines.Add('User Name : ' + UserName); Memo1.Lines.Add('Name: ' + FirstName + ' ' + MiddleName + ' ' + LastName); Memo1.Lines.Add('UID: ' + IntToStr(UserId)); Memo1.Lines.Add('GID: ' + IntToStr(GroupId)); Memo1.Lines.Add('-----------------------------------'); end; end; finally Active := False; end; end; end;
merci Barbibulle
Je n'avais pas essayé cette méthode parce que je croyais que l'utilisation de IBSecurityService nécessitait d'avoir les droits d'administration sur la base (?)
il s'agit simplement d'afficher le nom réel de l'user, qui peut être n'importe qui, en tous cas rarement avec des droits d'admin
je vais essayer votre suggestion
merci encore
jlf
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager