Usuário Atual

insert into tbx
(codigo, nome, usuario)
values
(1, ´JOAO´, USER)

Acredito que não tenha me expressado bem.
Como faço para saber qual foi o usuário que logou no banco de dados.
ex.
Campo Usuario:= [i:38e286be0a]UsuarioAtual[/i:38e286be0a]
Ou seja uma função que retorna-se o usuário que está logado no banco de dados.

Eu sei que tem uma forma, mas estou no trabalho e nao me lembro da sintaxe, vou ver se consigo trazer amanha, existem algumas tabelas internas no banco que armazenam este tipo de informação, eu não me lembro do nome.

Uso o componente IBSECURITYSERVICE para retornar os usuarios no sistema, segue uma parte do codigo: {não sei se era isso, mas tá ai }

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