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

[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