VPF::Сохранение писем. - Форум программистов

wadas

Дата 25.1.2010, 14:17 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 5
Регистрация: 27.12.2009

Репутация: нет
Всего: нет

Здравствуйте. Подскажите как вывести в мемо тело письма. Отправляю себе на почтовый ящик письмо, где просто написано "12345". Подключаюсь, проверяю, но в мемо ничего не вносится. Почему так? Подскажите.

Код


     if pop.Connected then
    begin
     for i:=1 to pop.CheckMessages do
    begin
     IdMessage1 := TIdMessage.Create(nil);
    try
    if client.CheckMessages = 0 then Exit;
     IdMessage1.NoDecode := false;
     pop.Retrieve(i,IdMessage1);
    Mmo1.Lines.AddStrings(IdMessage1.Body); 
   finally
     IdMessage1.Clear;

Akella

Дата 28.1.2010, 12:37 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 4
Всего: 329

А ты уверен, что письмо получаешь из ящика в свою программу?

Snowy

Дата 28.1.2010, 18:42 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484

Цитата(wadas @ 25.1.2010, 14:17

)

for i:=1 to pop.CheckMessages do

for i:=0 to pop.CheckMessages-1 do

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Сети \| Следующая тема »