When calling TIpNntpClient's GetList_Newsgroups does
not return the group names. The server returns the
group names, but the component does not save the
names or call any events to indicate that the list has
been retrieved.
I tracked the problem down to this line of the
TIpCustomNntpClient.DoNntpMultiLineResponseEvent
method:
if (FState = nsList) and (FResponse[1] = '2') then begin
To correct the problem, I changed the line as follows:
if (FState = nsListNewsGroups) and (FResponseCode
[1] = '2') then begin
GetList_Newsgroups sets the state to
nsListNewsGroups, not nsList. Also, at the time the
routine was called FResponse was the last line
received - which is a '.' indicating the end of the list. I
believe the intention is to check FResponseCode, which
is retrieved from the first line returned by the news
server.
Brian Wheatley