Indy News Server

[Lenny-k]

Okay, also in der Indy demo hab ich schon geschaut, da is nix dabei...
Ich frag mal hier schritt für schritt ^^
Ich bin schonmal soweit, dass ich die Gruppen Test und Test2 in der Gruppenliste anzeigen kann!

Delphi-Quellcode:

procedure TForm1.IdNNTPServer1ListGroups(AContext: TIdContext);
var gruppen:TStrings;
begin
gruppen:=TStringList.Create;
gruppen.Add('test');
gruppen.Add('test2');
AContext.Connection.WriteRFCStrings(gruppen);
end;

Wie schaffe ich es jetzt, Beispielsweise alle Nachrichten von der Gruppe "News" anzuzeigen?