Componenta TNMPOP3 este utilizată pentru a primi e-mailuri de la un server POP3.
Este posibil să aveți nevoie de această componentă atunci când scrieți un program pentru o anumită aplicație corporativă care utilizează propriile servicii de poștă internă. Sau puteți scrie un program pentru propriile dvs. nevoi, care ar colecta e-mailuri de la mai multe servere de mail, sortează imediat și aruncă gunoi inutile etc.
Pentru a primi e-mail, trebuie să apelați metoda GetMailMessage. Mesajul primit va intra în proprietatea MailMessage.
Aceasta a fost o scurtă trecere în revistă a componentei. Acum vom discuta detaliile pe măsură ce ne vom familiariza cu proprietățile, metodele și evenimentele din această componentă.
Pentru a vă înregistra pe server, trebuie să setați valori pentru proprietățile UserID și Password. Proprietatea Parolă specifică parola utilizată pentru a accesa serverul de e-mail. Dacă este specificată o parolă sau un nume de utilizator incorect, atunci va fi apelat evenimentul OnAuthenticationFailed, dacă parola sau numele de utilizator nu sunt specificate, evenimentul OnAuthenticationNeeded este ridicat.
Acum vom discuta metodele acestei componente. Metoda UniqueID returnează identificatorul mesajului specificat în parametrul metodei cu numărul. Un identificator este o valoare unică a șirului atribuită fiecărei litere de către serverul de poștă electronică. Această valoare este plasată în proprietatea MessageID, care face parte din proprietatea Rezumat a tipului TSummary. Parametrul MailNumber se modifică de la 1 la valoarea maximă specificată de proprietatea MailCount.
Metoda DeleteMailMessage elimină mesajul specificat din căsuța poștală de pe serverul de poștă electronică. În cazul unei erori, apare un eveniment OnFailture și se generează o excepție. Dacă mesajul este marcat cu succes ca șters, apare evenimentul OnSuccess. Mesajul șters prin această metodă este marcat doar ca șters, de fapt este șters când terminați lucrul cu serverul de poștă electronică. Până când faceți acest lucru, puteți apela metoda Resetare și toate mesajele "șterse" din această sesiune vor fi din nou disponibile. Metoda GetMailMessage preia mesajul specificat de numărul său și îl plasează în proprietatea MailMessage. Dacă apare o eroare în timpul executării metodei, se ridică o excepție. Când începe procesul de descărcare a mesajului, apare evenimentul OnRetrieveStart. La sfârșitul descărcării, evenimentul OnRetrieveEnd este generat. Dacă mesajul este primit cu succes, apare evenimentul OnSuccess. Dacă proprietatea DeleteOnRead este setată la true, metoda GetMailMessage marchează mesajul primit pe server pentru ștergere.
Metoda GetSummary extrage informații sumare despre mesaj și o salvează în proprietatea Rezumat. Metoda Listă primește o listă cu numerele și dimensiunile mesajelor. Pentru fiecare mesaj din listă este generat un eveniment OnList, care, prin parametri, transmite numărul mesajului și dimensiunea mesajului.
Rămâne pentru noi să luăm în considerare evenimentele acestei componente. Evenimentul OnAuthenticationFailed apare atunci când doriți să lucrați cu serverul de poștă electronică care trebuie identificat, într-una dintre proprietățile UserID sau Password, valoarea nu este introdusă corect. Dacă proprietatea Handled este setată la true, atunci încercarea de autentificare se repetă. Dacă proprietatea Handled specifică false [care este valoarea implicită], se ridică o excepție și conexiunea este terminată.
Evenimentul OnDecodeStart apare când trebuie să decodificați și să scrieți pe disc un fișier atașat la literă. În procedura de tratare a evenimentului, există un parametru FileName care specifică numele fișierului atașat. Acest nume poate fi modificat dacă doriți să salvați fișierul sub un nume diferit. Dacă în mesaj nu există fișiere atașate, evenimentul nu apare. Nu adăugați o cale către numele fișierului, p.ch. calea este specificată în proprietatea AttachFilePath.
Evenimentul OnList apare în timpul funcționării metodei List după ce a obținut numărul și mărimea mesajului curent din listă. Evenimentul OnReset este generat atunci când metoda Reset reușește, ceea ce înseamnă că toate mesajele marcate în sesiunea curentă sunt șterse pentru a elimina semnalul de ștergere.
Evenimentul OnRetrieveEnd apare când e-mailul sau CV-ul se termină. Evenimentul OnRetrieveStart este generat atunci când începe procesul de descărcare a mesajului. Aceste evenimente înlocuiesc versiunile anterioare, numite în mod eronat OnRetriveEnd și OnRetriveStart. Aceste versiuni anterioare, cu toate acestea, sunt disponibile ca Public, deci aplicațiile care le utilizează vor funcționa.
Un exemplu de utilizare pentru DELPHI6 este c: \ Program Files \ Borland \ Delphi6 \ Demo \ FastNet \ Pop3 \ POP3DEMO.DPR
Articole similare
Trimiteți-le prietenilor: