firebirdde kullanıcı Listesi Alma

[Fatih!]

Firebirdde tanımlı kullanıcı listesini nasıl alabilirim.
IBSecurityService ile olabileceeğini düşünüyorum ama bi türlü beceremedim
yardımlarınız için şimdiden teşekkürler

[oguzozturk74]

Kod: Tümünü seç

var
  I : Integer;
begin
  with IBSecurityService do
  begin
    try
      Active := true;
      DisplayUsers;
      ListView_KULLANICI.Items.BeginUpdate;
      ListView_KULLANICI.Items.Clear;
      for I := 0 to UserInfoCount - 1 do
      begin
        with UserInfo[i] do
        begin
          with ListView_KULLANICI.Items.Add do
          begin
            Caption := UserName;
            SubItems.Add(FirstName + ' ' + MiddleName + ' ' + LastName);
            SubItems.Add(IntToStr(UserId));
            SubItems.Add(IntToStr(GroupId));
          end;
        end;
      end;
    finally
      ListView_KULLANICI.Items.EndUpdate;
      Active := false;
    end;
  end;
end;

burada o anki kullanıcı listesini bir listview içerisine alabilirsiniz.

[Fatih!]

Kod: Tümünü seç

DisplayUsers; 

bir tek bunu yazmamışım
Allah razı olsun

[oguzozturk74]

Sizden de

[Fatih!]

kullanıcı listeleme tamamda şifreleri listeletemiyorum
acep bunun var mı çaresi