Poczta

0

Posiadam Delphi 7 en i chciałbym napisać program sprawdzający ilość wiadomości w mojej skrzynce. Wiem, że ten temat był poruszany, ale niestety nie mogę znaleźć komponentu TNMPOP3. W Delphi 7 mam takie komponenty jak TidSMTP oraz TidMessage za pomocą, których mam możliwość wysłania poczty. Czy można też za pomocą tych komponentów sprawdzić ilość wiadomości w skrzynce, jeżeli tak to, w jaki sposób?

0

a TIdPOP3 ?

0

Czy są jakieś różnice między tymi komponentami, (TNMPOP3, TIdPOP3)? Czy kod mógłbym zastosować ten sam co w komponencie TNMPOP3?

0

Niestety sprawdziłem i nie mogę zastosować tego kodu zmieniając komponent TNMPOP3 na TidPOP3, ponieważ nie wszystkie instrukcje chcą działać w komponencie TidPOP3!! :

var
LiczbaMaili : Intger;
begin
NMPOP31.TimeOut := 20000; <font color="violet">// nie działa w komponencie TidPOP3</span>
NMPOP31.AttachFilePath := '.'; <font color="violet">// nie działa w komponencie TidPOP3</span>
NMPOP31.Host := 'Host serwera POP3 np. pop3.poczta.onet.pl';
NMPOP31.UserID := 'Twoj id np. ReNe'; <font color="violet">// wystarczy poprawić na username</span>
NMPOP31.Password := 'Twoje haslo np. 4programmers';
NMPOP31.ReportLevel := Status_Basic; <font color="violet">// nie działa w komponencie TidPOP3</span>
NMPOP31.Connect;
LiczbaMaili := NMPOP31.MailCount; <font color="violet">// nie działa w komponencie TidPOP3</span>
end;

0

Użyj komponentu Mail2000, który jest na 4programmers.

0

w kodach źródłowych jest przykład takiego programu, oparty na TIdPOP3

0

a demos katalog demos przejrzeć nie łaska? gdybyś to zrobił, to wiedziałbyś, że TIdPOP3 mimo swojej prostoty posiada naprawde zaawansowane procedury/funkcje ina dodatek jest duzo lepszy (i szybsz) od komponentów fastnet'a

0

Grzegorz
a pozmieniałes z NMPOPxx na idPOPxx najpierw pomysc gdzie moze byc gafa bo to sie tak zuca ze nie trudno tego przegapic
[code]
IdPOP31.TimeOut := 20000; // nie działa w komponencie TidPOP3
IdPOP31.AttachFilePath := '.'; // nie działa w komponencie TidPOP3
//itd.
[/code]

a ja mam taki problem zkozystałem z zródła a-nim.zip i pozmieniałem ale nie wiem co mam zrobic z PostMessage.FromAddress takiego czegos nie ma w indy idsmtp, co mam z tym zrobic,a mam [b]Delphi 7[/b].

[code]
idSMTP1.PostMessage.FromAddress := Email.Text;
idSMTP1.PostMessage.FromName := Enazwa.Text;
idSMTP1.PostMessage.Subject := Etemat.Text;
idSMTP1.PostMessage.ToAddress.Add(Edo.Text);
idSMTP1.PostMessage.Attachments.AddStrings(zalacznik.Items);
idSMTP1.PostMessage.Body.Assign(piszesz_co_kcesz.Lines);
idSMTP1.SendMail;// tu tez mi wywala blad ze nie ma takiego polecenia
[/code]
chyba wruce z powrotem na [b]Delphi 6[/b] bo te 7 to cos nie wypał
a i nie wiem czy to wysyła otwierajac okienko nowa wiadomosc z outloka i potem wysyła czy Od razu, bo ja potrzebuje by Od razu wysyłał

0

nie wracaj. wystarczy sciagnac komponenty Indy w wersji do delphi 7.0 a nie do 4,5,6 i je instalowac na 7. Pokaze sie ze uaktualni, ale ta komenda nie dziala. Astalavista baby

1 użytkowników online, w tym zalogowanych: 0, gości: 1