оПХБЕР бяел. яЕЦНДМЪ ЛШ АСДЕЛ ЦНБНПХРЭ Н ЯЕРЕБНЛ ОПНЦПЮЛХПНБЮМХХ(вЮЯРЭ 1).
яЕРЕБНЕ ОПНЦПЮЛЛХПНБЮМХЕ БННАЫЕ НВЕМЭ ХМРЕПЕЯМЮЪ РЕЛЮ, Ъ ФДС БЮЬХУ ЯРЮРЕИ МЮ ЩРС Х ДПСЦХЕ РЕЛШ.
еЯКХ С БЮЯ ЕЯРЭ ОПЕДКНФЕМХЪ ХКХ ГЮЛЕВЮМХЪ, ОПНЬС ОХЯЮРЭ ЛМЕ ForDelphi@Narod.ru

б ЩРНЛ БШОСЯЙЕ

1)оХЬЕЛ ОПНЯРЕИЬЕЕ ОПХКНФЕМХЕ ЙКХЕМР-ЯЕПБЕП -->
2)йНЛОНМЕМР TNMSMTP ХКХ НРОПЮБЙЮ ОНВРШ Б DELPHI-->
3)йНЛОНМЕМР TNMPOP3 ХКХ ОНКСВЕМХЕ ОНВРШ Б DELPHI-->
4)бНОПНЯШ-->

оХЬЕЛ ОПНЯРЕИЬЕЕ ОПХКНФЕМХЕ ЙКХЕМР-ЯЕПБЕП

йНЛОНМЕМРШ TNMStrm Х TNMStrmServ ОПХЛЕМЪЧРЯЪ ДКЪ НАЛЕМЮ ОНРНЙЮЛХ ДЮММШУ. оЕПБШИ ЙНЛОНМЕМР ХЯОНКЭГСЕРЯЪ Б ЙКХЕМРЯЙНИ ОПНЦПЮЛЛЕ, Ю БРНПНИ, ЯННРБЕРЯРБЕММН, Б ЯЕПБЕПМНИ. мЕ НЯОНПХЛ РНР ТЮЙР, ВРН ЙКХЕМРЯЙЮЪ ОПНЦПЮЛЛЮ ЛНФЕР РНКЭЙН ОНЯШКЮРЭ ДЮММШЕ МЮ ЯЕПБЕП, Ю ЯЕПБЕП ЛНФЕР РНКЭЙН ОНКСВЮРЭ ДЮММШЕ НР ЙКХЕМРЮ. яКЕДНБЮРЕКЭМН, ЕЯКХ бШ УНРХРЕ ВРНАШ БЮЬЮ ОПНЦПЮЛЛЮ ЛНЦКЮ Х ОНЯШКЮРЭ, Х НРОПЮБКЪРЭ ОНРНЙХ, бШ ДНКФМШ ХЯОНКЭГНБЮРЭ Б МЕИ НАЮ ЩРХУ ЙНЛОНМЕМРЮ.

лЕУЮМХГЛ ОНРНЙНБ ХЯОНКЭГСЕРЯЪ ДКЪ ПЮАНРШ Я ЛЮЯЯХБЮЛХ ДЮММШУ, ЙНРНПШЕ МЕНАЪГЮРЕКЭМН ЛНЦСР ЯНДЕПФЮРЭЯЪ Б ТЮИКЮУ. б РНЛ ВХЯКЕ ЩРН ЛНФЕР АШРЭ Х АСТЕП Б ОЮЛЪРХ, ДКХММЮЪ ЯРПНЙЮ ЯХЛБНКНБ Х Р.О. йНЛОНМЕМРШ, МЕНАУНДХЛШЕ МЮЛ, БУНДЪР Б ЯРЮМДЮПРМШИ ОЮЙЕР BorlandDelphi Х МЮУНДЪРЯЪ МЮ БЙКЮДЙЕ FastNet.

пЮЯЯЛНРПХЛ МЕАНКЭЬНИ ОПХЛЕП.

нРЙПНЕЛ МНБШИ ОПНЕЙР Х ПЮГЛЕЯРХЛ МЮ МЕЛ ЯРЮМДЮПРМСЧ ЙМНОЙС ЙКЮЯЯЮ TButton, ЙНЛОНМЕМРШ TNMStrmХ TNMStrmServ. б НАПЮАНРВХЙ ЙМНОЙХ OnClickГЮОХЬЕЛ ЯКЕДСЧЫХИ ЙНД:

procedure TForm1.Button1Click(Sender: TObject);
var
MyStream: TMemoryStream;
begin
MyStream := TMemoryStream.Create; // яНГДЮМХЕ ЙКЮЯЯЮ
NMStrm1.Port := 6711; // гМЮВЕМХЕ ОНПРЮ ОНКСВЮРЕКЪ
NMStrm1.TimeOut := 3000; // гЮДЕПФЙЮ ОПХ ОНДЙКЧВЕМХХ (TimeOut)
NMStrm1.Host := '127.0.0.1'; // IP-юДПЕЯЯ ОНКСВЮРЕКЪ
NMStrm1.FromName := 'йКХЕМР'; // хЛЪ НРОПЮБХРЕКЪ
MyStream.LoadFromFile('C:\AutoExec.bat'); // тЮИК ДКЪ НРОПЮБЙХ
NMStrm1.PostIt(MyStream); // нРОПЮБЙЮ ДЮММШУ
MyStream.Free; // нЯБНАНФДЕМХЕ ОЮЛЪРХ
end;

йНД ДНЯРЮРНВМН ОПНЯРНИ. оНЯКЕ ЯНГДЮМХЪ ОНРНЙЮ Б ДХМЮЛХВЕЯЙНИ ОЮЛЪРХ, Б МЕЦН ГЮЦПСФЮЕРЯЪ ТЮИК ДКЪ НРОПЮБЙХ. оНЛХЛН ЩРН, Б НАПЮАНРВХЙЕ ЙМНОЙХ ГЮДЮЧРЯЪ ЯБНИЯРБЮ ЙНЛОНМЕМРЮ TNmStrm, ЯПЕДХ ЙНРНПШУ ХЛЪ НРОПЮБХРЕКЪ, ЮДПЕЯ ОНКСВЮРЕКЪ, ОНПР Х БПЕЛЪ НФХДЮМХЪ НРБЕРЮ НР ЯЕПБЕПЮ. лЕРНД «PostIt» НРОПЮБКЪЕР ЯНДЕПФХЛНЕ ОНРНЙЮ МЕОНЯПЕДЯРБЕММН МЮ ЯЕПБЕП. оНЯКЕ РНЦН, ЙЮЙ ЯЕПБЕП ОНРНЙ ОНКСВЮЕР, МЮ МЕЛ ЦЕМЕПХПСЕРЯЪ ЯНАШРХЕ «OnMsg» ЙНЛОНМЕМРЮ TNMStrmServ, Б НАПЮАНРВХЙ ЙНРНПНЦН бШ ДНКФМШ ДНАЮБХРЭ ЙНД, ПЮЯОНКНФЕММШИ МХФЕ.

procedure TForm1.NMStrmServ1MSG(Sender: TComponent; const sFrom: String;
Strm: TStream);
var
MyStream: TMemoryStream;
begin
MyStream := TMemoryStream.Create;
MyStream.CopyFrom(Strm, NMStrmServ1.BytesTotal); // хГБКЕЙЮЕЛ ТЮИК
MyStream.SaveToFile('D:\AutoExec.bat'); // яНУПЮМЪЕЛ ОНКСВЕММШИ ТЮИК
end;

йНЛОНМЕМР TNMSMTP.

йНЛОНМЕМР TNMSMTP ОНГБНКЪЕР НРОПЮБКЪРЭ ЩКЕЙРПНММСЧ ОНВРС ВЕПЕГ ОНВРНБШИ ЯЕПБЕП хМРЕПМЕР ХКХ БШОНКМХРЭ МЕЙНРНПШЕ ДПСЦХЕ ЙНЛЮМДШ, НОХЯЮММШЕ Б ЯРЮМДЮПРЕ RFC 821.

бНР ОПНЖЕДСПЮ НРОПЮБЙХ ЯННАЫЕМХЪ:

procedure TForm1.sendClick(Sender: TObject);
begin
NMSMTP1.Host := 'mail.ru';{яЕПБЕП НРОПЮБЙХ}
NMSMTP1.UserID := 'user@mail.ru';{сВРМЮЪ ГЮОХЯЭ МЮ ЯЕПБЕПЕ}
NMSMTP1.Connect;{яНЕДХМЕМХЕ}
NMSMTP1.PostMessage.FromAddress:= 'User@mail.ru';{нР ЙНЦН}
NMSMTP1.PostMessage.ToAddress.Text:= 'User2@list.ru';{йНЛС}
NMSMTP1.PostMessage.Body.Text:= memo1.Text;{рЕЙЯР ЯННАЫЕМХЪ}
NMSMTP1.PostMessage.Subject:='оПНБЕПЙЮ!';{рЕЛЮ}
NMSMTP1.PostMessage.Date:='27.01.54 ;{дЮРЮ}
NMSMTP1.PostMessage.localprogram:='ЛшkПНяНСР нСРцЭЧЙ';{оПНЦЮ НРОПЮБЙХ}
NMSMTP1.SendMail;{нРОПЮБЙЮ}
NMSMTP1.Disconnect;{нРЯНЕДХМЕМХЕ}
end;

йНЛОНМЕМР TNMPOP3

йНЛОНМЕМР TNMPOP3 ОПХЛЕМЪЕРЯЪ ДКЪ ОНКСВЕМХЪ ЩКЕЙРПНММШУ ОХЯЕЛ НР POP3-ЯЕПБЕПЮ.

бЮЛ ЛНФЕР ОНРПЕАНБЮРЭЯЪ ЩРНР ЙНЛОНМЕМР ОПХ МЮОХЯЮМХХ ОПНЦПЮЛЛШ ДКЪ МЕЙНЕЦН ЙНПОНПЮРХБМНЦН ОПХКНФЕМХЪ, ХЯОНКЭГСЧЫЕЦН ЯБНХ, БМСРПЕММХЕ ОНВРНБШЕ ЯЕПБХЯШ. хКХ БШ ЛНФЕРЕ МЮОХЯЮРЭ ОПНЦПЮЛЛС ОНД ЯБНХ ЯНАЯРБЕММШЕ МСФДШ, ЙНРНПЮЪ ЯНАХПЮКЮ АШ ОНВРС Я МЕЯЙНКЭЙХУ ОНВРНБШУ ЯЕПБЕПНБ, ЯПЮГС АШ ЯНПРХПНБЮКЮ Е Х НРАПЮЯШБЮКЮ МЕМСФМШИ УКЮЛ Х Д.Р.

оЕПЕД РЕЛ ЙЮЙ ОНКСВХРЭ ЩКЕЙРПНММСЧ ОНВРС Я ОНЛНЫЭЧ ЙНЛОНМЕМРЮ TNMPOP3, БЮЛ МСФМН СЯРЮМНБХРЭ ЯНЕДХМЕМХЕ Я ЯЕПБЕПНЛ POP3, МЮ ЙНРНПНЛ МЮУНДХРЯЪ БЮЬ ОНВРНБШИ ЪЫХЙ. дКЪ ЩРНЦН МСФМН ГЮДЮРЭ ГМЮВЕМХЕ ДКЪ ЯБНИЯРБЮ Host, Б ЙНРНПНЛ МСФМН СЙЮГЮРЭ ХЛЪ ОНВРНБНЦН ЯЕПБЕПЮ ХКХ ЕЦН IP-ЮДПЕЯ. бШ ДНКФМШ ГЮДЮРЭ РЮЙ ФЕ ХЛЪ ОНКЭГНБЮРЕКЪ Х ОЮПНКЭ Б ЯБНИЯРБЮУ UserID Х Password ЯННРБЕРЯРБЕММН, НРЙПШБЮЧЫХЕ БЮЛ ДНЯРСО Й БЮЬЕЛС ОНВРНБНЛС ЪЫХЙС. оНЯКЕ ЩРНЦН БЮЛ МСФМН БШГБЮРЭ ЛЕРНД Connect, ЙНРНПШИ Х СЯРЮМНБХР ЯНЕДХМЕМХЕ.

вРНАШ ОНКСВХРЭ ОНВРС БЮЛ МСФМН БШГБЮРЭ ЛЕРНД GetMailMessage. оНКСВЕММНЕ ЯННАЫЕМХЕ АСДЕР ОНОЮДЮРЭ Б ЯБНИЯРБН MailMessage.

щРН АШК ЙПЮРЙХИ НАГНП ЙНЛОНМЕМРЮ. яЕИВЮЯ ЛШ НАЯСДХЛ ДЕРЮКХ ОН ЛЕПЕ НГМЮЙНЛКЕМХЪ ЯН ЯБНИЯРБЮЛХ, ЛЕРНДЮЛХ Х ЯНАШРХЪЛХ ЩРНЦН ЙНЛОНМЕМРЮ.

б ЯБНИЯРБЕ MailCount ЩРНЦН ЙНЛОНМЕМРЮ СЙЮГШБЮЕРЯЪ ВХЯКН ЯННАЫЕМХИ, МЮУНДЪЫХУЯЪ Б ОНВРНБНЛ ЪЫХЙЕ ОНКЭГНБЮРЕКЪ МЮ ЯЕПБЕПЕ. щРН ЯБНИЯРБН ОНКСВЮЕР ГМЮВЕМХЕ ОНЯКЕ СЯРЮМНБЙХ ЯНЕДХМЕМХЪ Я ЯЕПБЕПНЛ. яБНИЯРБС MailMessage ОПХЯБЮХБЮЕРЯЪ ГМЮВЕМХЕ ОНЯКЕ БШГНБЮ ЛЕРНДЮ GetMailMessage. б МЛ МЮУНДЪРЯЪ БЯЕ ЩКЕЛЕМРШ ОНКСВЕММНЦН ЩКЕЙРПНММНЦН ЯННАЫЕМХЪ. щРХ ЩКЕЛЕМРШ БЙКЧВЮЧР Б ЯЕАЪ ЯБНИЯРБЮ Attachments, Body, From, Head, MessageID Х Subject. б ОЕПБНЛ ОНЛЕЫЮЧРЯЪ ХЛЕМЮ БКНФЕММШУ ТЮИКНБ, БН БРНПНЛ - РЕЙЯР ЯННАЫЕМХЪ, Б РПЕРЭЕЛ - ЮДПЕЯ НРОПЮБХРЕКЪ, Б ВЕРБПРНЛ - ГЮЦНКНБНЙ ОХЯЭЛЮ. б ЯБНИЯРБЕ MessageID ПЮГЛЕЫЮЕРЯЪ СМХЙЮКЭМШИ ХДЕМРХТХЙЮРНП ОХЯЭЛЮ, Ю Б ЯБНИЯРБЕ Subject - РЕЛЮ ОХЯЭЛЮ.

яБНИЯРБН Summary ЯНДЕПФХР ЙПЮРЙСЧ ХМТНПЛЮЖХЧ НА ЩКЕЙРПНММНЛ ЯННАЫЕМХХ. щРН ЯБНИЯРБН ХГЛЕМЪЕРЯЪ ОНЯКЕ БШГНБЮ ЛЕРНДЮ GetSummary. б ЯНЯРЮБ ЩРНЦН ЯКНФМНЦН ЯБНИЯРБЮ БУНДЪР ЯБНИЯРБЮ: Bytes, From, Header, MessageID, Subject. яБНИЯРБЮ ЩРНЦН ЯНЯРЮБМНЦН ЯБНИЯРБЮ ОНБРНПЪЧР ЯБНИЯРБЮ ХГ MailMessage, МН Б НРКХВХХ НР ЯБНИЯРБЮ MailMessage ГДЕЯЭ МЕ УБЮРЮЕР ЯБНИЯРБ Attachments Х Body Х ДНАЮБКЕМН МНБНЕ ЯБНИЯРБН Bytes - ПЮГЛЕП ЯННАЫЕМХЪ. яНДЕПФХЛНЕ ЯБНИЯРБ MailMessage Х Summary ХГЛЕМЪЕРЯЪ ОНЯКЕ ЙЮФДНЦН БШГНБЮ ЛЕРНДЮ GetMailMessage ХКХ GetSummary ЯННРБЕРЯРБЕММН. оНЩРНЛС, ЕЯКХ БШ ЯВХРШБЮЕРЕ МЕЯЙНКЭЙН ОХЯЕЛ МЕ ГЮАШБЮИРЕ НАПЮАЮРШБЮРЭ ОНКСВЕММШЕ ЯННАЫЕМХЪ Х РНКЭЙН ОНЯКЕ ЩРНЦН ОЕПЕУНДХРЕ Й ЯКЕДСЧЫЕЛС БШГНБС ЛЕРНДЮ GetMailMessage ХКХ GetSummary. б ЯБНИЯРБЕ AttachFilePath БШ ЛНФЕРЕ ГЮДЮРЭ ЙЮРЮКНЦ ДКЪ ПЮГЛЕЫЕМХЪ ОПХЯНЕДХМММШУ Й ЯННАЫЕМХЧ ТЮИКНБ. еЯКХ ЩРНЦН МЕ ЯДЕКЮРЭ, РН ОН СЛНКВЮМХЧ ЩРХ ТЮИКШ АСДСР ЯНУПЮМЪРЭЯЪ Б РНЛ ФЕ ЙЮРЮКНЦЕ, ХГ ЙНРНПНЦН ГЮОСЯЙЮКНЯЭ ОПХКНФЕМХЕ. еЯКХ ЙЮРЮКНЦ, СЙЮГЮММШИ Б ЯБНИЯРБЕ AttachFilePath МЕ ЯСЫЕЯРБСЕР, РН ОПХЯНЕДХМММШЕ ТЮИКШ АСДСР ЯНУПЮМЪРЭЯЪ Б РЕЙСЫЕЛ ЙЮРЮКНЦЕ. дНАЮБКЪРЭ Б ЙНМЖЕ ОСРХ ЯХЛБНК "ЯКЩЬ" МЕНАЪГЮРЕКЭМН, ЕЯКХ ЕЦН МЕ СЙЮГЮКХ, РН ДНАЮБХРЯЪ ЮБРНЛЮРХВЕЯЙХ. б ГЮБХЯХЛНЯРХ НР ГМЮВЕМХЪ ЯБНИЯРБЮ DeleteOnRead ОПНВХРЮММШЕ ЯННАЫЕМХЪ ЛНЦСР СДЮКЪРЯЪ ХКХ НЯРЮБЮРЭЯЪ Б ОНВРНБНЛ ЪЫХЙЕ МЮ ЯЕПБЕПЕ. яННАЫЕМХЪ СДЮКЪЧРЯЪ ОНЯКЕ БШОНКМЕМХЪ ЛЕРНДЮ GetMailMessage, ЕЯКХ ЯБНИЯРБН DeleteOnRead СЯРЮМНБКЕМН Б true. еЯКХ ГМЮВЕМХЕ DeleteOnRead ПЮБМН false, РНЦДЮ ЯННАЫЕМХЪ НЯРЮЧРЯЪ МЮ ЯЕПБЕПЕ. оН СЛНКВЮМХЧ ЯННАЫЕМХЪ МЕ СДЮКЪЧРЯЪ. сДЮКЕМХЕ ЯННАЫЕМХИ ОПНХЯУНДХР ОНЯКЕ ГЮБЕПЬЕМХЪ ЯЕЮМЯЮ ПЮАНРШ Я ЯЕПБЕПНЛ. лЕРНД Reset ОНГБНКЪЕР ЯМЪРЭ ЛЕРЙС МЮ СДЮКЕМХЕ, ОНЩРНЛС, ОНЙЮ ЯЕЯЯХЪ МЕ НЙНМВЕМЮ БЯЕ СДЮКММШЕ ЛЕРНДЮЛХ DeleteOnRead Х DeleteMailMessage ЯННАЫЕМХЪ ЛНФМН "БЕПМСРЭ".

дКЪ ПЕЦХЯРПЮЖХХ МЮ ЯЕПБЕПЕ БЮЛ МСФМН ГЮДЮРЭ ГМЮВЕМХЪ ЯБНИЯРБЮЛ UserID Х Password. б ЯБНИЯРБЕ Password СЙЮГШБЮЕРЯЪ ОЮПНКЭ, ХЯОНКЭГСЕЛШИ ДКЪ ОНКСВЕМХЪ ДНЯРСОЮ Й ОНВРНБНЛС ЯЕПБЕПС. еЯКХ СЙЮГЮМ МЕБЕПМШИ ОЮПНКЭ ХКХ ХЛЪ ОНКЭГНБЮРЕКЪ, РН Б ЩРНЛ ЯКСВЮЕ АСДЕР БШГБЮМН ЯНАШРХЕ OnAuthenticationFailed, ЕЯКХ ОЮПНКЭ ХКХ ХЛЪ ОНКЭГНБЮРЕКЪ МЕ СЙЮГЮМШ БШГШБЮЕРЯЪ ЯНАШРХЕ OnAuthenticationNeeded.

рЕОЕПЭ НАЯСДХЛ ЛЕРНДШ ЩРНЦН ЙНЛОНМЕМРЮ. лЕРНД UniqueID БНГБПЮЫЮЕР ХДЕМРХТХЙЮРНП ЯННАЫЕМХЪ, СЙЮГЮММНЦН Б ОЮПЮЛЕРПЕ ЛЕРНДЮ ОН МНЛЕПС. хДЕМРХТХЙЮРНП ОПЕДЯРЮБКЪЕР ЯНАНИ ЯРПНЙНБНЕ СМХЙЮКЭМНЕ ГМЮВЕМХЕ, ОПХЯБЮХБЮЕЛНЕ ЙЮФДНЛС ОХЯЭЛС ОНВРНБШЛ ЯЕПБЕПНЛ. щРН ГМЮВЕМХЕ ОНЛЕЫЮЕРЯЪ Б ЯБНИЯРБН MessageID, ЪБКЪЧЫЕЕЯЪ ВЮЯРЭЧ ЯНЯРЮБМНЦН ЯБНИЯРБЮ Summary РХОЮ TSummary. оЮПЮЛЕРП MailNumber ХГЛЕМЪЕРЯЪ НР 1 ДН ЛЮЙЯХЛЮКЭМНЦН ГМЮВЕМХЪ, НОПЕДЕКЪЕЛНЦН ЯБНИЯРБНЛ MailCount.

лЕРНД DeleteMailMessage СДЮКЪЕР СЙЮГЮММНЕ ОН МНЛЕПС ЯННАЫЕМХЕ ХГ ОНВРНБНЦН ЪЫХЙЮ МЮ ОНВРНБНЛ ЯЕПБЕПЕ. б ЯКСВЮЕ БНГМХЙМНБЕМХЪ НЬХАЙХ БНГМХЙЮЕР ЯНАШРХЕ OnFailture Х БНГАСФДЮЕРЯЪ ХЯЙКЧВХРЕКЭМЮЪ ЯХРСЮЖХЪ. еЯКХ ЯННАЫЕМХЕ СЯОЕЬМН ОНЛЕВЮЕРЯЪ ЙЮЙ СДЮКММНЕ, РН ОПНХЯУНДХР ЯНАШРХЕ OnSuccess. сДЮКММНЕ ЩРХЛ ЛЕРНДНЛ ЯННАЫЕМХЕ РНКЭЙН ОНЛЕВЮЧРЯЪ ЙЮЙ СДЮКММШЕ, ПЕЮКЭМН НМХ СДЮКЪЧРЯЪ РНЦДЮ, ЙНЦДЮ БШ ГЮЙЮМВХБЮЕРЕ ПЮАНРС Я ОНВРНБШЛ ЯЕПБЕПНЛ. ю ОНЙЮ БШ ЩРНЦН МЕ ЯДЕКЮКХ БШ ЛНФЕРЕ БШГБЮРЭ ЛЕРНД Reset, Х БЯЕ "СДЮКММШЕ" Б ДЮММНЛ ЯЕЮМЯЕ ЯБЪГХ ЯННАЫЕМХЪ НОЪРЭ ЯРЮМСР ДНЯРСОМШЛХ. лЕРНД GetMailMessage ХГБКЕЙЮЕР СЙЮГЮММНЕ ОН ЯБНЕЛС МНЛЕПС ЯННАЫЕМХЕ Х ОНЛЕЫЮЕР ЕЦН Б ЯБНИЯРБН MailMessage. еЯКХ ОПХ БШОНКМЕМХХ ЛЕРНДЮ БНГМХЙЮЕР НЬХАЙЮ, РН БНГАСФДЮЕРЯЪ ХЯЙКЧВХРЕКЭМЮЪ ЯХРСЮЖХЪ. йНЦДЮ МЮВХМЮЕРЯЪ ОПНЖЕЯЯ ГЮЦПСГЙХ ЯННАЫЕМХЪ, МЮЯРСОЮЕР ЯНАШРХЕ OnRetrieveStart. оН НЙНМВЮМХХ ГЮЦПСГЙХ ЦЕМЕПХПСЕРЯЪ ЯНАШРХЕ OnRetrieveEnd. еЯКХ ЯННАЫЕМХЕ АКЮЦНОНКСВМН ОНКСВЕМН ОПНХЯУНДХР ЯНАШРХЕ OnSuccess. еЯКХ ЯБНИЯРБН DeleteOnRead СЯРЮМНБКЕМН Б true, РН ЛЕРНД GetMailMessage, ЙПНЛЕ РНЦН, ОНЛЕРХР МЮ ЯЕПБЕПЕ ОНКСВЕММНЕ ЯННАЫЕМХЕ МЮ СДЮКЕМХЕ.

лЕРНД GetSummary ХГБКЕЙЮЕР ЙПЮРЙСЧ ХМТНПЛЮЖХЧ Н ОХЯЭЛЕ Х ЯНУПЮМЪЕР Е Б ЯБНИЯРБЕ Summary. лЕРНД List ОНКСВЮЕР ЯОХЯНЙ МНЛЕПНБ Х ПЮГЛЕПШ ЯННАЫЕМХИ. дКЪ ЙЮФДНЦН ЯННАЫЕМХЪ Б ЯОХЯЙЕ ЦЕМЕПХПСЕРЯЪ ЯНАШРХЕ OnList, ЙНРНПНЛС ВЕПЕГ ОЮПЮЛЕРПШ ОЕПЕДЮЧРЯЪ МНЛЕП ЯННАЫЕМХЪ Х ПЮГЛЕП ЯННАЫЕМХЪ.

мЮЛ НЯРЮКНЯЭ ПЮЯЯЛНРПЕРЭ ЯНАШРХЪ ДЮММНЦН ЙНЛОНМЕМРЮ. яНАШРХЕ OnAuthenticationFailed ОПНХЯУНДХР Б ЯКСВЮЕ, ЙНЦДЮ ДКЪ ПЮАНРШ Я ОНВРНБШЛ ЯЕПБЕПНЛ РПЕАСЕРЯЪ ХДЕМРХТХЙЮЖХЪ, Б НДМНЛ ХГ ЯБНИЯРБ UserID ХКХ Password ГМЮВЕМХЕ ББЕДЕМН МЕБЕПМН. еЯКХ ЯБНИЯРБС Handled ОПХЯБНХРЭ ГМЮВЕМХЕ true, РН ОНОШРЙЮ ПЕЦХЯРПЮЖХХ ОНБРНПЪЕРЯЪ. еЯКХ Б ЯБНИЯРБЕ Handled ОПНОХЯЮМН false [ВРН ЪБКЪЕРЯЪ ГМЮВЕМХЕЛ ОН СЛНКВЮМХЧ], РН БНГАСФДЮЕРЯЪ ХЯЙКЧВХРЕКЭМЮЪ ЯХРСЮЖХЪ, Х ЯНЕДХМЕМХЕ НАПШБЮЕРЯЪ.

яНАШРХЕ OnDecodeStart БНГМХЙЮЕР РНЦДЮ, ЙНЦДЮ МЕНАУНДХЛН ДЕЙНДХПНБЮРЭ Х ГЮОХЯЭ МЮ ДХЯЙ ОПХЯНЕДХМММШИ Й ОХЯЭЛС ТЮИК. б НАПЮАНРВХЙЕ ЩРНЦН ЯНАШРХЪ ХЛЕЕРЯЪ ОЮПЮЛЕРП FileName, НОПЕДЕКЪЧЫХИ ХЛЪ ОПХЯНЕДХМММНЦН ТЮИКЮ. щРН ХЛЪ ЛНФМН ХГЛЕМХРЭ, ЕЯКХ БШ УНРХРЕ ЯНУПЮМХРЭ ТЮИК ОНД ДПСЦХЛ ХЛЕМЕЛ. еЯКХ Б ОХЯЭЛЕ МЕР БКНФЕММШУ ТЮИКНБ, Н ЯНАШРХЕ МЕ МЮЯРСОЮЕР. дНАЮБКЪРЭ ОСРЭ Й ХЛЕМХ ТЮИКЮ МЕ ЯКЕДСЕР, О.В. ОСРЭ СЙЮГШБЮЕРЯЪ Б ЯБНИЯРБЕ AttachFilePath.

яНАШРХЕ OnList ОПНХЯУНДХР Б ОПНЖЕЯЯЕ ПЮАНРШ ЛЕРНДЮ List ОНЯКЕ ОНКСВЕМХЪ МНЛЕПЮ Х ПЮГЛЕПЮ РЕЙСЫЕЦН ЯННАЫЕМХЪ Б ЯОХЯЙЕ. яНАШРХЕ OnReset ЦЕМЕПХПСЕРЯЪ Б ЯКСВЮЕ СЯОЕЬМНЦН БШОНКМЕМХЪ ЛЕРНДЮ Reset Х НГМЮВЮЕР ЩРН РНР ТЮЙР, ВРН ЯН БЯЕУ ЯННАЫЕМХИ, ОНЛЕВЕММШУ Б РЕЙСЫЕЛ ЯЕЮМЯЕ МЮ СДЮКЕМХЕ, ЯМЪРЮ ЛЕРЙЮ МЮ СДЮКЕМХЕ.

яНАШРХЕ OnRetrieveEnd ОПНХЯУНДХР РНЦДЮ, ЙНЦДЮ ГЮБЕПЬЮЕРЯЪ ГЮЦПСГЙЮ ОХЯЭЛЮ ХКХ ЕЦН ПЕГЧЛЕ. яНАШРХЕ OnRetrieveStart ЦЕМЕПХПСЕРЯЪ ЙНЦДЮ МЮВХМЮЕРЯЪ ОПНЖЕЯЯ ГЮЦПСГЙХ ЯННАЫЕМХЪ. щРХ ЯНАШРХЪ ГЮЛЕМЪЧР ЯБНХ ОПЕДШДСЫХЕ БЕПЯХХ, МЮГБЮММШЕ НЬХАНВМН OnRetriveEnd Х OnRetriveStart. щРХ ОПЕДШДСЫХЕ БЕПЯХХ, РЕЛ МЕ ЛЕМЕЕ, ДНЯРСОМШ ЙЮЙ Public, РЮЙ ВРН ОПХКНФЕМХЪ, ХЯОНКЭГСЧЫХЕ ХУ, АСДСР ПЮАНРЮРЭ.

бНОПНЯШ

бНОПНЯ #1 НР юМРНМ

дНАПНЕ БПЕЛЪ ЯСРНЙ!!
еЯРЭ АХАКХНРЕЙЮ Async Professional v.4.06.
оНДЯЙЮФХРЕ ЙЮЙ СЯРЮМНБХРЭ Х ЙЮЙ ОНКЭГНБЮРЭЯЪ.
я СБЮФЕМХЕЛ юМРНМ.

нрберхрэ

бНОПНЯ #2 НР _yurok_@tut.by

с ЛЕМЪ БНОПНЯ. лМЕ МЕНАУНДХЛН ОПНЦПЮЛЛМН ГЮОХЯЮРЭ МЮ CD НОПЕДЕКЕММШИ
ЙЮРЮКНЦ Я БХМВЕЯРЕПЮ. фЕКЮРЕКЭМН ХЯОНКЭГНБЮРЭ АХАКХНРЕЙС NeroAPI.dll.
лНФЕР АШРЭ С бЮЯ ЕЯРЭ ХЯУНДМХЙХ ДКЪ РЮЙНЦН ГЮДЮМХЪ ХКХ ЯЯШКЙХ, ЦДЕ
ЛНФМН СГМЮРЭ ЩРН. нВЕМЭ МСФМН!
гЮПЮМЕЕ АКЮЦНДЮПЕМ.

нрберхрэ

бНОПНЯ #3 НР Igor Ivanov

уНРЕК АШ СГМЮРЭ ЙЮЙ ХГБКЕВ ПЕЦХНМЮКЭМШЕ МЮЯРПНИЙХ Ю ХЛЕММН ПЮГДЕКХРЕКЭ ДПНАМНИ ВЮЯРХ.

нрберхрэ

бНОПНЯ #4 НР jurik200@rol.ru

ю ЯЙЮФХРЕ ЛМЕ
ОНФЮКСИЯРЮ,МЕЯБЕДСЧЫЕЛС ВЕКНБЕЙС, Ю ВРН РЮЙНЕ DELCHI?ю РН ВРН-РН Ъ МХ ПЮГС Н МЕЛ МЕ ЯКШУЮК. ДКЪ ВЕЦН
НМ МСФЕМ Х ВЕЛ НМ НРКХВЮЕРЯЪ НР ДПСЦХУ,ОНДНАМШУ ЕЛС ОПНЦПЮЛЛ ХКХ ЪГШЙНБ(ЯЛНРПЪ ЙНМЕВМН,ВРН ЩРН РЮЙНЕ,Ю Ъ МЕ
ГМЮЧ).лнфер лме ецн яеае онярюбхрэ мю йнло. вРН БШ ЛМЕ ОНЯНБЕРСЕРЕ ОН ЩРНЛС ОНБНДС!

нрберхрэ

я СБЮФЕМХЕЛ, Angel(http://www.fordelphi.narod.ru)