Ostatnio zabrałem się za pisanie programu do grup dyskusyjnych, ale szybko stanąłem w miejscu z powodu jednego głupiego błędu i nie mogę dojść co właściwie go powoduje :[

Exception class ERangeError with message 'Range check error'

Ten błąd wyskakuje dopiero po ściągnięciu 201 nazw grup dyskusyjnych z serwera więc chyba z połączeniem jest wszystko w porządku :-/

procedure TForm1.FormCreate(Sender: TObject);
begin
  IdNNTP1.Host:='news.tpi.pl';
  IdNNTP1.Connect;
  IdNNTP1.GetNewsgroupList;     // tutaj wyskakuje błąd
end;
procedure TForm1.IdNNTP1NewsgroupList(ANewsgroup: string; ALow, AHigh: Integer;
  AType: string; var ACanContinue: Boolean);
begin
    ListBox1.Items.Add(ANewsgroup);
end;