![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с Pop3Server в Indy10 [D7, Win2k]
inew © (2005-04-01 05:03:00)Использую компонент Pop3Server из Indy10. У этого компонента есть события POP3Server1CheckUser(AThread: TIdContext; LThread: TIdPOP3ServerContext);, там пользователь авторизируется и к примеру POP3Server1RETR(ASender: TIdCommand;
AMessageNum: Integer);, где собственно и происходит раздача почты. Вопрос, как в событии POP3Server1RETR мне понять кто именно запросил почту и соответственно что ему отдать?
В SmtpServer того же Indy10 есть событие
SMTPServer1MsgReceive(ASender: TIdSMTPServerContext; AMsg: TStream; var LAction: TIdDataReply) где Asender имеет свойство Username и соответсвенно легко можно положить сообщение в нужное место, а в Pop3Server у ASender нет такого свойства.
АНТИСпаммер (2005-04-04 02:31:00) [1]При аутентификации (checkuser) в свойство AThread.Connection.Socket.SocksInfo.Tag (или username) записываешь соответствующий идентификатор. А в остальных событиях (кроме onDisconnect) его аналогично читаешь. Т.е это свойство для каждого потока уникальное
inew (2005-04-03 17:18:00) [2]>АНТИСпаммер
Indy 10 на Delphi7
АНТИСпаммер (2005-04-02 02:29:00) [3]Такое свойство ЕСТЬ
Но спарва вопрос : Indy 10 на какой Delphi ?