TIBDatabaseInfo

[sur-se]

Hola. Utilizo Delphi 5. Estoy cambiando mi aplicación para trabajar con FIBPlus, pero me he encontrado con el componente TIBDatabaseInfo de IBX que lo utilizo para ver la propiedad UserNames.Count que me indica el número de usuarios conectados a la base de datos. No encuentro un componente FIBPlus homólogo. ¿Como puedo saber el número de usuarios conectados a la base de datos?
Salu2.

[Casimiro Notevi]

Puedes hacerlo con TFIBDatabase. Tienes un fichero de ayuda donde explica todos los componentes con sus propiedades y métodos.

 procedure TForm1.Button1Click(Sender: TObject);
 var
   I: Integer;
 begin
   with Database1 do 
   begin
 	for I := 0 to UserNames.Count - 1 do
 	  Memo1.Lines.Add(UserNames.Strings[i]);
   end;
 end;