Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не так всё прсто TIdPOP3 [D2005, XP]

Ksenom © (2006-03-21 14:36:00)
Великолепный indy... слов нету блин...
Кроче... Конеутюс по поп3
Получаю письмо... Смотрю body а там MIME... Ну да ладно...Берём IIIdText, делаем проверочку каждой части (Msg.MessageParts.Items[0] is TIdText) и пробуем так получит текст...
Оппа... И текст=текс и куча html хлама тоже как текст... Да ещё и глюки.. Пару писем просматривает а остальные извеняйте...

ПОМОГИТЕ... гадом буду Си займуся...
Msg:=Tidmessage.Create(self); Form1.Memo1.Lines.Clear; Form1.Caption:=inttostr(Form1.POP3.CheckMessages); for i:=1 to Form1.POP3.CheckMessages do begin Msg.Clear; Form1.POP3.Retrieve(i,Msg); for j:=0 to Msg.MessageParts.Count-1 do begin if (Msg.MessageParts.Items[0] is TIdText) then Form1.Memo1.Lines.AddStrings(TIdText(Msg.MessageParts.Items[0]).Body); end; end; Msg.Free; end;

Ksenom (2006-03-30 10:37:00) [1]
palva...
Хотел ответить, но не стал, не вижу смысла продолжать МОНОЛОГ...

palva (2006-03-29 17:48:00) [2]
Ksenom (29.03.06 16:05) [6]
Учитесь грамотно писать. Учитесь внятно выражать свои мысли. Заинтересуйте форум вашим вопросом. Отвечайте на наши дополнительные вопросы о ситуации. А до тех пор... Разбирайтесь по хэлпам и книжкам. Либо наймите себе учителя, который за деньги будет терпеть ваше остроумие.

Ksenom (2006-03-29 16:05:00) [3]
stone, наезды это когда на улице денег просят... Я констатировал факт. И ваши слова лишь подтверждение. Мои слова лишь сарказм и не более, но если вы это видите как наезд... увольте...

Джо, я в курсе, что html это "язык" гипертекстовой разметки (одно из объяснений), но я в простой и ироничной форме просто сказал что согласно MIME (я вопреки вашему мнению не слабоумный) есть такое понятие как text\plain. И в примере это поле находили проверкой, которая у меня возвращала вообще все поля... То есть и html и версию, и параметры и т.д. кроме вложения.

stone, мой пост давно валяется здесь, хотел бы помочь, помог бы... Когда мужчина говорит он ещё и делает...

Почитайте себя, я не только к stone обращаюсь, вдумайтесь... у половины манера письма попахивает маний величия... Люди за советом приходят, научится хотят... умнее стать...
По вашему любой кто спрашивает это всё, глупец... Глуп тот, кто думает, что всё знает...

stone (2006-03-23 17:38:00) [4]

> Джо © (23.03.06 17:26) [4]

Не трудись. Сначала было желание ответить, объяснить, но после таких наездов передумал, пусть сам разбирается.

Джо (2006-03-23 17:26:00) [5]
Интересно, а что можно ответить на кучу невнятных выкриков?

> Оппа... И текст=текс и куча html хлама тоже как текст...
> Да ещё и глюки..

Что такое "текст=текс"? Что такое "куча html хлама тоже как текст"? Html — это, собственно, и есть текст. Какие глюки? Где они? В чем выражаются? Одни вопросы...

Ksenom (2006-03-23 16:55:00) [6]
Я так погляжу у мастеров идей кончились...
Кучу раз тут прикалывалися над моладнеком и кучу раз насмехались...
Везде только и слышу как у всех всё замечательно работает... Или как замечательно в демке в папке делфей описанно всё...
А тут вопрос по практике и тишина... Где ваша гордость любезные...

Ksenom (2006-03-23 12:18:00) [7]
stone, и чем же моя реализация отличается от вашей... ??? Строчкой Break???
Я конечно не мастер делфей но и не идиот....
if (Msg.MessageParts.Items[0] is TIdText) then Form1.Memo1.Lines.AddStrings(TIdText(Msg.MessageParts.Items[0]).Body);

моя строка всё тоже самое тока без Break!!!!!!!!
Ещё идеи есть... Или тоже будут советовать искать другие компоненты... А ещё мастера )

stone (2006-03-21 15:31:00) [8]
if (Msg.MessageParts.Items[0] is TIdText) then begin Form1.Memo1.Lines.AddStrings(TIdText(Msg.MessageParts.Items[0]).Body); Break; end;

> ПОМОГИТЕ... гадом буду Си займуся...

Не поможет :) Формат MIME един для всех.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »