Foros Club Delphi - Lista de clientes del BDE

Tengo una aplicación cliente-servidor que funciona con paradox. Tanto
desde el cliente como desde el servidor se pueden modificar las tablas; si
uno está editando un registro, a los demás les avisa de registro bloqueado;
si uno modifica un registro se refresca en los otros ... es decir perfecto :D
.

Ahora bien, cuando desde el servidor ejecuto el siguiente código para saber
los usuarios activos del BDE, sólo me indica los usuarios que hay activos
en el servidor, si hay algún cliente trabajando no me lo muestra.

Código:

procedure GetUsers(UserList: TStrings);

var

  TmpCursor: hDbiCur;

  rslt: dbiResult;

  UsrDesc: USERDesc;

begin

  UserList.Clear;

  Check(DbiOpenUserList(TmpCursor));

  try

        repeat

          Rslt:= DbiGetNextRecord(TmpCursor, dbiNOLOCK, @UsrDesc, nil);

          if Rslt <> DBIERR_EOF then

                UserList.Add(UsrDesc.szUserName);

        until Rslt <> DBIERR_NONE;

  finally

        Check(DbiCloseCursor(TmpCursor));

  end;

end;

El código está sacado de la página del dr. Marteens. En el archivo PDOXUSRS.NET del directorio net veo como aparece el nombre del cliente cuando se conecta. Alguien sabe porqué falla el código.Gracias anticipadas.