VPF::TWebBrowser русская кодировка. - Форум программистов

Ak47black

Дата 29.8.2007, 17:37 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

Здравствуйте.
Как TWebBrowser в поменять кодировку.
Я вывожу на TWebBrowser чат и вместо русских букв вижу нето что надо smile

.
Поискал но решения не нашол.
Подскажите пожалуйста как исправить>

aktuba

Дата 29.8.2007, 18:43 (ссылка)

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

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

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

в html, который выводишь, прописывай кодировку...

--------------------

Ak47black

Дата 29.8.2007, 21:18 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

aktuba, А как мне тут сделать (где ввести)?
Я вот так html ввожу

Код


var
  HtmlDocument: IHtmlDocument2;
  WebBody: HTMLBody;
  V: OleVariant;
begin
  HtmlDocument := TWebBrowser.Document as IHtmlDocument2;
  WebBody := HtmlDocument.body as HTMLBody;
  WebBody.insertAdjacentHTML('BeforeEnd', '<font face="Tahoma" size="2">Hello world</font>');

Это сообщение отредактировал(а) Ak47black - 29.8.2007, 21:20

aktuba

Дата 30.8.2007, 02:45 (ссылка)

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

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

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

Цитата

aktuba, А как мне тут сделать (где ввести)?

Судя по всему, перед этим блоком, что-то уже есть в WebBrowser. Верно?

--------------------

Ak47black

Дата 30.8.2007, 18:37 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

Я делаю

Код


TWebBrowser.Navigate('about:blank');

, а потом кодом который выше добавляю.

Ak47black

Дата 31.8.2007, 19:33 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

а что добавить то?

Это сообщение отредактировал(а) Ak47black - 31.8.2007, 19:33

December

Дата 31.8.2007, 20:23 (ссылка)

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

Загрузка ...

Antitheorist

Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

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

изучи основы хтмл
там написано про обязательные элементы типа Head, body
сделай заготовку, которая содержит <meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
и уже к ней применяй свой код
примеры можно найти в дркб

--------------------

Для друзей с винграда - скидки на разработку сайтов

Ak47black

Дата 2.9.2007, 21:12 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

December,
А как добавить в Head тот код который ты написал выше?

Это сообщение отредактировал(а) Ak47black - 2.9.2007, 21:14

aktuba

Дата 2.9.2007, 21:33 (ссылка)

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

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

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

Цитата

А как добавить в Head тот код который ты написал выше?

Почитай про структуру документа html и все поймешь...

--------------------

Ak47black

Дата 3.9.2007, 09:39 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

aktuba, Да мне с html кодом то понятно.
Мне не понятно как в этот TWebBrowser добавить html код в заголовок.
Пробовал с WebBody.insertAdjacentHTML, но не работает.

December

Дата 3.9.2007, 09:52 (ссылка)

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

Загрузка ...

Antitheorist

Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

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

невозможно добавлять элементы в хеад
надо навигировать на страницу, в которой он уже есть

--------------------

Для друзей с винграда - скидки на разработку сайтов

Ak47black

Дата 3.9.2007, 09:57 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

December, а ну теперь понятнее ситуация.
Ок. буду пробовать.

aktuba

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

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

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

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

Честно говоря не уверен, но попробуй что-то наподобии:

Код


var
  HTMLDocument: IHTMLDocument2;
begin
  HTMLDocument := WebBrowser.Document as IHTMLDocument2;
  HTMLDocument.charset := 'Windows-1251';
  // Или так
  // HTMLDocument.defaultCharset := 'Windows-1251';

--------------------

Ak47black

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

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

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

aktuba, не проверил оба способа, но тоже самое.
December, а какие есть способы есть загрузить уже готовую страницу ?
Я попробовал загрузить из ресурсов.
Вот я сделал

Код


TWebBrowser.Navigate('res://Project.exe/html/LOADHTML');

Но чтото не работает. (В ресурсах уверен что html есть проверял)
Ошибка

Цитата

Internet Explorer was unable to link to the Web page you requested. The page might be temporarily unavailable.

Я гдето в интернете видел исходник который демонстрирует, как и ресурсов загружать страницы, только шас не могу найти, может кто знает где такой есть?

Это сообщение отредактировал(а) Ak47black - 3.9.2007, 10:22

aktuba

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

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

Загрузка ...

Смышленный

Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

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

Цитата

может кто знает где такой есть?

В DRKB и в DelphiWorld...

P.S.: ты бы тестовый проект выложил - людям проще было бы искать решение...

Это сообщение отредактировал(а) aktuba - 3.9.2007, 10:25

--------------------

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