Trimite e-mail mijloace delphi

Trimiterea de e-mail Delphi înseamnă.

Începem să realizăm clientul nostru, acest lucru se va plasa pe formularul idSMTP. Doar face forma aspectul setare (nume, dimensiune, etc). Dacă este necesar, puteți schimba portul, dar cel mai important, nu uitați că portul trebuie să fie deblocat în firewall. Pentru a vă conecta la serverul SMTP, trebuie să specificați gazdă (proprietatea gazdă). De exemplu: 'smtp .mail .ru' IdSMTP1.Host:=; Sau (așa cum facem noi) pentru a plasa pe formularul eticheta iEdit. Un pic Privind în perspectivă să spunem că conexiunea la server este efectuată de Conectare.

procedureConnect (constATimeout: Integer); suprascrie;

în cazul în care ATimeout - parametru opțional specifică timpul maxim în milisecunde să aștepte un răspuns de la serverul SMTP, după care o încercare de a stabili o conexiune este terminată. De exemplu: IdSMTP1.Connect (5000);

După aplicarea metodei Connect pentru a verifica rezultatul executării sale. Acest lucru se face cu proprietatea Connected, dacă este adevărat. atunci conexiunea este normal.

Pentru a trimite mesaje utilizând funcția Trimitere.

Acum, o privire mai atentă la structura scrisorii. Așa cum am menționat mai devreme, metoda de trimitere trimite corpul mesajului, este o structură de tip TIdMessage. Structura de scrisori Sheer Delphi realizat TIdMessage componente separate. Acesta este situat pe paleta de componente Indy pt.

EXEMPLU determinarea structurii TIdMessage:

Msg.Recipients.EMailAddresses: = 'constructor @ mail.ru, [email protected]';

Din proprietatea este un tip TIdEmailAddressItem de obiect, acesta conține informații despre expeditor. Această proprietate este format din trei proprietăți: Nume, Adresa, Text. Adresa proprietate conține informații despre caseta de e-mail a expeditorului, acesta este de tipul String.

Proprietatea Numele este numele expeditorului are un tip de String.

Proprietatea Textul conține informații agregate în prezent aceste două proprietăți. Acum am ajuns la corpul scrisoare, este de tip TStrings. Acum, hai sa vorbim despre aderarea la scrisoarea de fișiere, care este, atașamentele. Dacă aveți nevoie să atașați un fișier la, va trebui să creați o clasă de obiect TidAttachment. Pentru a face acest lucru, va fi necesar să se utilizeze constructorul de forma:

constructor Creare (colectare: TIdMessageParts; Const AFileName: TFileName = ''); reintroducă;

în care colecția este o colecție de aplicații de la scrisoare, TIdMessageParts tip. AFileName Kontstanta are TFileName tip yavlyaetsya șir de text simplu. Este necesar să specificați calea corectă la dosar.

După trimiterea mesajului, este de dorit să se rupă conexiunea la server, care nu ar navă canal. decalaj de comunicare produse de deconectare.