Class T_News (unit tcpip) |
Inherits from
T_MailNews
@\\\0000000601*) (*@/// T_News = class(T_MailNews) // RFC 850
constructor Create(Aowner:TComponent);
- @\\\0000000B01*) (*@\\\0000000801*) (*@/// class t_news(t_mailnews) *) (*@/// constructor t_news.
procedure action;
@\\\0000000603*) (*@/// procedure t_news.
destructor Destroy;
@\\\0000000501*) (*@/// destructor t_news.
procedure SetNewsgroups(Value: TStringList);
@\\\000000030F*) (*@/// procedure t_news.
property Newsgroups : TStringlist
property NNTP : T_NNTP
property Organization : string
f_newsgroups : TStringlist;
f_nntp : T_NNTP;
f_organization : string;
constructor Create(Aowner:TComponent);
@\\\0000000B01*) (*@\\\0000000801*) (*@/// class t_news(t_mailnews) *) (*@/// constructor t_news.Create(Aowner:TComponent);
procedure action;
@\\\0000000603*) (*@/// procedure t_news.action;
destructor Destroy;
@\\\0000000501*) (*@/// destructor t_news.Destroy;
procedure SetNewsgroups(Value: TStringList);
@\\\000000030F*) (*@/// procedure t_news.SetNewsgroups(Value: TStringList);
property Newsgroups : TStringlist
property NNTP : T_NNTP
property Organization : string
f_newsgroups : TStringlist;
f_nntp : T_NNTP;
f_organization : string;