Вниз
Скачать: CL | DM;

Как получить заголовок, автора письма БЕЗ ЗАГРУЗКИ ПИСЬМА?   Найти похожие ветки 

← →
Konstantin555 ©   (2006-08-27 02:13) [0]

Собственно сабж
Мне необходимо получить заголовок пришедшего письма, автора и размер письма без его полной загрузки.

Пробывал делать так:

procedure TForm1.Button2Click(Sender: TObject);
var
s1,s2:Integer;
begin
NMPOP31.Connect;
s1:=NMPOP31.MailCount;
ProgressBar1.Max:=s1;
for s2:=1 to s1 do
begin
 ProgressBar1.StepIt;
 NMPOP31.GetMailMessage(s2);
 memo1.Lines.Add(NMPOP31.MailMessage.Subject);
end;
NMPOP31.Disconnect;
end;

В результате 3 первых письма (где только текст), быстро загружаются и  показывается тема письма, но дальше, где письмо большого размера, определяется тема письма намного дольше (через время полной загрузки письма)

Мне надо только узнать тему письма (+автора...) без его содержимого.

То есть, загрузить надо ТОЛЬКО ЗАГОЛОВКИ

КАК ЭТО СДЕЛАТЬ?


← →
Чапаев носками хакера   (2006-08-27 08:57) [1]

> То есть, загрузить надо ТОЛЬКО ЗАГОЛОВКИ
>
> КАК ЭТО СДЕЛАТЬ?

Да в общем случае никак, насколько я знаю. Можно разве что получать не всё письмо, а определённую часть, но скорее всего ты будешь получать или кусок тела письма вместе с заголовком, или получать не весь заголовок.


← →
Dmitrij_K   (2006-08-27 09:39) [2]

У IdPOP3 есть метод Head()
у NMPOP3 я хз


← →
Anatoly Podgoretsky ©   (2006-08-27 13:57) [3]

NMPOP3 это ActiveX компонент, с ним надо работать напрямую, что бы получить полные возможности, обертка Борланда чрезвычайно слабая.


← →
RzCoDer ©   (2006-08-27 14:02) [4]

Учи протокол


← →
Konstantin555 ©   (2006-08-27 18:24) [5]

Да... галимо...

Пришла в голову мысль, но только не могу реализовать её...

Суть её в следующем - использовать тот же NMPOP31.GetMailMessage(s2);, но только, к примеру, в течении 1-2 секунды - за это время заголовок сообщения загрузится 100%. А потом, после прекращения принятия письма (через 1-2 секунды идёт прерывание кода NMPOP31.GetMailMessage(s2);), чтобы вызвался memo1.Lines.Add(NMPOP31.MailMessage.Subject);

Только как это сделать?..


← →
Ketmar ©   (2006-08-27 18:57) [6]

достать гланды через анус? прикольно, наверное...


← →
Fay ©   (2006-08-27 18:59) [7]

TOP


← →
AlexWlad ©   (2006-08-27 20:25) [8]

Работай через Simple MAPI: MAPILogOn, MAPIFindNext, MAPIReadMail. Не так уж и сложно.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
11-1134201796
Vano12
2005-12-10 11:03
2006.10.08
Помогите-Я сделал авторан на диск в Delphi мне надо чтобы кнопка


1-1156603638
angelika
2006-08-26 18:47
2006.10.08
анимированный gif в delphi


2-1158674909
Inna_Z
2006-09-19 18:08
2006.10.08
Drag and Drop


2-1158658563
Lera
2006-09-19 13:36
2006.10.08
Сообщения windows


15-1158124405
kch
2006-09-13 09:13
2006.10.08
Касперский лучший в мире!




   Наверх