[Winny]

Здрасьте! Пишу тут веб-браузер по типу Firefox и Opera или MaxthonIE. Не надо говорить, что не получиться. Нету ничего невозможного. Вот, у меня есть список вопросов:
1.Как получить иконку страницы WebBrowser.
2.Как получить заголовок (Title) страницы быстрее, чем это делает WebBrowser, а то задержка очень большая - 10-15 секунд, а то и 20-25?
3.Как очуществить сохранение флеш-анимации на манер Maxthon (точнее получить прямую ссылку к флешу)?

[Admin]

Сообщение от Winny

Здрасьте! Пишу тут веб-браузер по типу Firefox и Opera или MaxthonIE. Не надо говорить, что не получиться. Нету ничего невозможного. Вот, у меня есть список вопросов:
1.Как получить иконку страницы WebBrowser.
2.Как получить заголовок (Title) страницы быстрее, чем это делает WebBrowser, а то задержка очень большая - 10-15 секунд, а то и 20-25?
3.Как очуществить сохранение флеш-анимации на манер Maxthon (точнее получить прямую ссылку к флешу)?

Посмотри этот пример: http://www.delphisources.ru/pages/so...web_brows.html

[Winny]

Я сам разобрался только со вторым вопросом (без помощи этого исходника). Но вот другие ещё актуальны.

[Winny]

С первым вопросом тоже разобрался. Остался последний третий.

[Korshun]

Сообщение от Winny

С первым вопросом тоже разобрался. Остался последний третий.

А не поделишься? 1.Как получить иконку страницы WebBrowser.

[Winny]

У меня есть теоретическое предположение - иконка страницы = URL сайта+'/favicon.ico'. Тем самым можно скачать эту иконку на диск и загрузить в Image. У меня это получилось с yandex.ru, rambler.ru, mail.ru, но с DS не получилось.
Люди, у меня ещё вопросы:
1.Как поставить вместо стандартной страницы "Невозможно отобразить страницу." свою страницу ошибки?
2.Как у WebBrowser поставить полноэкранный режим (Full Screen)?

[Casper-Hacker]

Сообщение от Winny

У меня есть теоретическое предположение - иконка страницы = URL сайта+'/favicon.ico'. Тем самым можно скачать эту иконку на диск и загрузить в Image. У меня это получилось с yandex.ru, rambler.ru, mail.ru, но с DS не получилось.
Люди, у меня ещё вопросы:
1.Как поставить вместо стандартной страницы "Невозможно отобразить страницу." свою страницу ошибки?
2.Как у WebBrowser поставить полноэкранный режим (Full Screen)?

На второй ответить могу делаешь Form1.Align:=ALCLIENT
Dialog Form вырубаешь Стандартно он стаить Single ставишь на None Делаешь отдельную панель нафигации или можешь оставить эту ну и все остальное visible false готово! Ну естествено усмешь навоное горячие клавиши использовать VK_ESCAPE !!!

А вот и на первый if Web[TabControl1.TabIndex].LocationName = 'Internet Explorer не может отобразить эту веб-страницу' then
Web[TabControl1.TabIndex].Navigate('Своя_страница.htm'); Токо я заметил что не на всех IE строка эта одинакова 'Internet Explorer не может отобразить эту веб-страницу' Это IE 7.0 На других сделаешь аналогично!!!

[Casper-Hacker]

Сообщение от Winny

У меня есть теоретическое предположение - иконка страницы = URL сайта+'/favicon.ico'. Тем самым можно скачать эту иконку на диск и загрузить в Image. У меня это получилось с yandex.ru, rambler.ru, mail.ru, но с DS не получилось.

Это можно сделать путем html find! Теория такова страницу сохраняет в txt затем исчет в ней строку img scr<> затем сохранение иконки на рабочий стол затем закгрузка в ImageList

[The Shadow]

Иконка сайта записана в мета-теге
<link href="http://www.delphisources.ru/images/fon/favicon.ico" rel="shortcut icon">
Только его искать надо...

[Winny]

Сообщение от Casper-Hacker

На второй ответить могу делаешь Form1.Align:=ALCLIENT
Dialog Form вырубаешь Стандартно он стаить Single ставишь на None Делаешь отдельную панель нафигации или можешь оставить эту ну и все остальное visible false готово! Ну естествено усмешь навоное горячие клавиши использовать VK_ESCAPE !!!

А вот и на первый if Web[TabControl1.TabIndex].LocationName = 'Internet Explorer не может отобразить эту веб-страницу' then
Web[TabControl1.TabIndex].Navigate('Своя_страница.htm'); Токо я заметил что не на всех IE строка эта одинакова 'Internet Explorer не может отобразить эту веб-страницу' Это IE 7.0 На других сделаешь аналогично!!!

Помоги с удалением и оббновлением всех вкладок?

1.У меня когда я делаю так во время полноэкранного режима WebBrowser чудесным образом как то очищается.
2.Ну ты подумай, а если я сделаю свою страницу и поставлю в качестве заголовка "Internet Explorer не может отобразить эту веб-страницу"? И если у тебя такая логика, то надо писать так:

Код:

if Pos('Internet Explorer не может отобразить эту веб-страницу',Web[TabControl1.TabIndex].LocationName)<>0 then
...

Кстати вопросы мои уже давным-давно решины. Опаздываете с ответами