KOD cpp: UKRYJ
void odczytaj_mail(AnsiString id, AnsiString pas, AnsiString hostwz){ //log,pas,www.o2.pl
ustaw(id,pas,hostwz);
try{
Form1->POP3Client->Connect();
for(int i=1;i<=Form1->POP3Client->MailCount;i++){
Form1->POP3Client->GetMailMessage(i);
if(Form1->POP3Client->MailMessage->From=="nadawca"){
pobierz_link(Form1->POP3Client->MailMessage->Body->Text);
}
}
Form1->POP3Client->Disconnect();
}
catch(exception &e)
{
ShowMessage(e.what());
throw;
}
}
ustaw(id,pas,hostwz);
try{
Form1->POP3Client->Connect();
for(int i=1;i<=Form1->POP3Client->MailCount;i++){
Form1->POP3Client->GetMailMessage(i);
if(Form1->POP3Client->MailMessage->From=="nadawca"){
pobierz_link(Form1->POP3Client->MailMessage->Body->Text);
}
}
Form1->POP3Client->Disconnect();
}
catch(exception &e)
{
ShowMessage(e.what());
throw;
}
}
Pobiera wiadomosc sprawcza czy jest od nadawcy i wykonuje na jej treści funkcje odpowiednią. Problem polega na tym ze mam ustawione usuwanie wiadomości więc każda wiadomość jest kasowana(niezależnie czy jest od nadawcy czy nie); Wycięcie GeTMailMassage i wklejenie do ifa powoduje brak odczytu wiadomosci i nic się nie dzieje. Da się to jakoś objeść?w samym ifie włączyć usowanie i pozniej przy wyjsciu z ifa włączyć?