¿Cómo ver a los usuarios conectados desde mi aplicacion?

[AGAG4]

Pasa saber que Usuario(s) estan accesando a tu aplicación, solamente añade una tabla nueva a tu base de datos donde tengas registradas las Computadoras agregando un campo USUARIO.

[Fita]

Para saber que usuarios estan conectados a la base de datos debes utilizar el componente IBDatabaseInfo que esta en la paleta Interbase Admin.

En mi aplicacion tengo un botón que muesta los usuarios conectados en un form, aqui te muestro el codigo que utilizo:

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

end;

Espero te sirva.
Saludos