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

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

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

Какой браузер по умолчанию, User-Agent.

Tcount © (2012-11-24 22:07:00)
Вечер добрый. Подскажите, пожалуйста, как можно определить, какой установлен браузер в системе по умолчанию? Вроде как через реестр можно, ток не знаю как.
А если уж точнее, то мне нужно узнать User-Agent браузера или его версию.

Palladin (2012-11-27 00:33:00) [1]

> DVM © (25.11.12 15:06) [7]

Это будет новый браузер, с своим блэкджеком и шлюхами.

Styx (2012-11-25 21:55:00) [2]

> Tcount © (25.11.12 00:22) [5]
> Ну я скрыл WebBrowser, потом написал так

Это будет UserAgent Internet Explorer-а, а не браузера по умолчанию. Но, главное -

> DVM © (25.11.12 15:06) [7]
> зачем тебе все эти пляски? Объясни.

DVM (2012-11-25 15:06:00) [3]

> Tcount © (24.11.12 22:07)

зачем тебе все эти пляски? Объясни.

QAZ9 (2012-11-25 14:03:00) [4]

> Ну я скрыл WebBrowser, потом написал так (WB - это WebBrowser):

facepalm

Tcount (2012-11-25 00:22:00) [5]

> Через TWebBrowser тоже нельзя. :)

Ну я скрыл WebBrowser, потом написал так (WB - это WebBrowser):
---------------------------
procedure TForm1.Button1Click(Sender: TObject);
var
Doc: IHTMLDocument2;
S:string;
begin
WB.Navigate(' http://onlinebots.net/useragent.php');
while WB.ReadyState<READYSTATE_COMPLETE do
begin
Application.ProcessMessages;
end;
Doc:=WB.Document as IHTMLDocument2;
s:=doc.body.innerHTML;
Memo1.Text:=s;
end;
----------------------

Styx (2012-11-25 00:16:00) [6]
Через TWebBrowser тоже нельзя. :)

Tcount (2012-11-24 23:38:00) [7]
В смысле, неужели только через TWebBrowser?

Tcount (2012-11-24 23:37:00) [8]
Тупанул я...Сам же отправляю запрос со своим агентом и его же и получаю)
Неужели можно вытащить это все дело через TWebBrowser?

Tcount (2012-11-24 22:31:00) [9]
Попробовал через TIdHTTP:
STR:=TidHTTP1.Get(' http://onlinebots.net/useragent.php');
---------
Но! когда перехожу по этому адресу непосредственно через браузер, выдает:
Mozilla/5.0 (Windows NT 6.1; rv:17.0) Gecko/17.0 Firefox/17.0
А через через Delphi:
Mozilla/3.0 (compatible; Indy Library)
-----------
Почему так?

Наверх

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