VPF::Html в TidMessage - Форум программистов

fizzarum

Дата 28.5.2006, 10:10 (ссылка)

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

Загрузка ...

Новичок

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

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

имеется почтовый клиент на базе инди,
тело письма копируется в Memo..если тело - обычный текст то тут проблем нет,
но вот если письмо приходит в формате Html - то в Memo копируется некрасивый голый Html код..что делать? в какой обьект его засунуть чтоб отображалось все не Html кодом, а красивым текстом?.)

Snowy

Дата 28.5.2006, 10:20 (ссылка)

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

Загрузка ...

Эксперт

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

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

В TWebBrowser конечно.

fizzarum

Дата 28.5.2006, 10:32 (ссылка)

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

Загрузка ...

Новичок

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

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

по-подробнее можно пожалуйста? в каком виде и куда конкретно в TwebBrowser значение присваивать?.
и ещё является ли первая строка
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
определителем Html'ности письма?

Snowy

Дата 28.5.2006, 10:43 (ссылка)

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

Загрузка ...

Эксперт

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

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

Цитата(fizzarum @ 28.5.2006, 10:32

)

в каком виде и куда конкретно в TwebBrowser значение присваивать?.

Код

procedure LoadHtml(wb: TWebBrowser; html: string);    
var ms: TMemoryStream;    
begin    
  ms:=TMemoryStream.Create;    
  ms.Write(html[1], Length(html));    
  ms.Position:=0;    
  try    
    while wb.ReadyState < READYSTATE_INTERACTIVE do    
      Application.HandleMessage;    
    (wb.Document as IPersistStreamInit).Load(TStreamAdapter.Create(ms));    
  finally    
    ms.Free;    
  end;    
end;

Просто передай строку с текстом в эту процедуру.

Цитата(fizzarum @ 28.5.2006, 10:32

)

и ещё является ли первая строка
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
определителем Html'ности письма?

Теоретически да. Практически - она может отсутствовать.
Хотя можно в браузер пихать и не html - он также корректо отобразится, за одним исключением - пропадут переносы строк.

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