Verificarea e-mailului folosind delphi

numai materiale utile

Acționarul principal al Alibaba a devenit cel mai bogat om din China
Articole

Microsoft a început testarea închisă a Office 16
Articole







Experții au găsit găuri de securitate în Windows 8.1
Articole

În metroul din Moscova va fi o rețea mobilă unificată
Articole

eBay va accepta Bitcoin
Articole

Vivitek a prezentat proiectorul "școală" D755WTIR
Articole

Butonul "Cumpărați" a apărut pe Twitter
Articole

"Yandex.News" poate fi acum vizualizat pe iPhone
Articole

În această lecție vom scrie un program pentru verificarea corespondenței.
Primul lucru pe care trebuie să-l facem este să determinăm sarcinile necesare pentru ca acest program să poată fi executat. Și așa:

  1. Verificarea e-mailului
  2. Abilitatea de a seta o perioadă de validare pentru poștă
  3. Rezultatul notificărilor când se primesc mesaje noi

Ca rezultat, obținem următoarea vedere a ferestrei (Fig.2):

Verificarea e-mailului folosind delphi

Fig.2.

Apoi a crea codul pentru butonul eveniment onClick Button1 (pentru a crea evenimentul pe care trebuie să faceți dublu clic pe un buton, sau du-te la Object Inspector du-te la fila Evenimente de citire, apoi faceți dublu-clic pe câmpul liber de lângă numele onClick): După crearea de evenimente generează automat următoarele cod:







procedura TForm1.Button1Click (expeditor: TObject);
începe
se încheie;

După editarea acestuia, obținem următorul cod:

procedura TForm1.Timer1Timer (expeditor: TObject);
începe
se încheie;

Punem în aplicare codul pentru primirea de litere:

Această parte a codului face următoarele:

  1. Trece parametrii pe care i-am introdus cu Edit1. Editați4 în IdPOP31
  2. Conectează la server
  3. Dacă conexiunea are succes, acesta emite un număr de mesaje în Memo1, altfel afișează un mesaj cu o eroare de conectare.
  4. Deconectați-vă de la server

Rezultatul lucrării poate fi văzut în capturile de ecran de mai jos:

Verificarea e-mailului folosind delphi

Figura 3. - Conexiune reușită cu ieșirea numărului de litere

Verificarea e-mailului folosind delphi

Figura 4. - Conectare nereușită la eroare

Această opțiune este conceput pentru incepatori. Desigur, puteți include fantezie și pentru a finaliza programul. Adăugarea unui parametru salva într-un fișier, posibilitatea de a adăuga o mulțime de cutii poștale pentru a verifica, poate fi minimizată la tava de sistem, de notificare va fi afișată - când aveți mesaje noi și multe altele. Dacă cineva interesat de acest subiect - continua fericit.

Vă mulțumesc pentru atenție.

Finalizez materialul și plec în Vietnam și, în timp ce învățați lecțiile de programare bine și dacă sunteți interesat să călătoriți în străinătate, vă sfătuiesc să călătoriți în Vietnam la prețuri minime pentru a călători prieteni!

Materiale conexe







Articole similare

Trimiteți-le prietenilor: