- Kod: Zaznacz cały
void __fastcall TForm1::Button1Click(TObject *Sender)
{
IdMessage1->From->Name = "Laik"; //pobiera nazwę nadawcy wiadomości
IdMessage1->From->Address = "Laik@wp.pl"; //pobiera adres e-mail nadawcy wiadomości
IdMessage1->Recipients->EMailAddresses = "Laik@wp.pl"; // pobiera adres e-mail odbiorcy wiadomości
IdMessage1->Subject = "COS"; // pobiera tytuł (temat) wiadomości
IdMessage1->Body->Append(Memo1->Text); //pobiera treść wiadomości
IdSMTP1->Host = "smtp.wp.pl"; // pobiera adres serwera SMTP
IdSMTP1->Password = "zaqwsx"; // pobiera hasło nadawcy wiadomości
IdSMTP1->Username = "Laik@wp.pl"; // pobiera nazwę nadawcy wiadomości - ID użytkownika
IdSMTP1->AuthenticationType = atLogin; // wymagana autoryzacja
IdSMTP1->Port = 25;
IdSMTP1->Connect();
try
{
IdSMTP1->Send(IdMessage1);
}
__finally
{
IdSMTP1->Disconnect();
}
}
Dlaczego nie wysyła mi wiadomości ?