[firebase-br] Verificação de usuários conectados

[Carlos Sá]

Rafael Cabral escreveu:
> Pessoal,
> 
> Tem alguma forma de verificar quais usuários estão conectados ao banco de
> dados via linha de comando? Alguns daqueles programas da pasta bin do
> Firebird tem esse recurso?
> 
> []s,
> 
> Rafael Cabral
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
> Para editar sua configuração na lista, use o endereço http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
> 

Para quem usa FIB... do manual do Firebird ....


Getting a list of currently attached users

Getting a list of currently attached users using FreeIBComponents is as 
simple as query-ing the TFIBDatabase.UserNames property. This property 
is of the type TStrings, and it can be used very easily to display a 
list of currently connected users.

To demonstrate this, let’s write some code for the “File, Show connected 
users” menu option:

(*
* 1. Only continue if the database is connected.
* 2. Instantiate the connected users form, if necessary.
* 3. Set the list box in fConnectedUsers to the list of
* current users.
* 4. Show the form.
*)

if Db.Connected then begin // (1)
if fConnectedUsers = nil then // (2)
fConnectedUsers := TfConnectedUsers.Create(Application);
fConnectedUsers.lbUsers.Items.Assign(Db.UserNames); // (3)
fConnectedUsers.ShowModal;
end;

Wow! That was easy..