HGG - wyświetlenie statusów użytkowników

Cześć ;-)
Ostatnio pracuje nad prostym klientem GG. Pojawił mi się problem przy wyświetlaniu statusów użytkowników. Mój klient ma nie obciążać zbytnio systemu więc postanowiłem, że nie będzie zawierał grafiki.
No i problem mam z tym ze moja procedura nie sprawdza lub sprawdza i "mówi" że dostępna jest tylko jedna osoba a to nie prawda :-/
Oto ona:

 HGG.Users.Add(1234567,'dasda',true);
  HGG.Users.Add(1234568,'fsdfsd',true);
  HGG.Users.Add(1234569,'ghgjhj',true);
  HGG.Users.Add(1111111,'klghl,',true);
  HGG.Users.Add(2222222,'nmm',true);
  HGG.Users.Add(3333333,'dsdsd',true);

  sleep(2000);
  for i:=0 to HGG.Users.Count-1 do
  begin
    if HGG.Users[i].Status=usAvailable then
    begin
      Lista.Add('dostępny');
    end else
    begin
      Lista.Add('niedostępny');
    end;
   end;

no i co tutaj jest źle?
wiem, że na tym forum się o takie rzeczy nie prosi ale zaryzykuje...
może ktoś ma po prostu gotową procedurę sprawdzającą ale działającą
z góry bardzo dziękuję ;-)

*numery GG pozmieniałem