Indy News Server

[Lenny-k]

Hat jemand ein Tutorial, wie ich mit Indy einen Newsserver machen kann?

MfG Lenny

[Aenogym]

hi,

eine TidNNTPServer-komponente aufs formular und Active := true setzen.
mal im ernst: deine frage ist das gleiche, wie: "Wie kann ich einen Ego-Shooter mit DIrectX machen?"

schau dir doch mal die indy demos (delphi indy demos) an. da gibts sicher auch einen newsserver

Aenogym

[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?