Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Помогите с гуглом! (https://forum.antichat.xyz/showthread.php?t=164922)

marcos 20.12.2009 17:28
Помогите с гуглом!
 
Всем привет! Я хочу на Делфи написать программу, которая будет переходить по сайтам в гуглах(чет,кажись,непонятн будет...)
Я написал процедуру:
Код:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ShellExecute(TForm(Owner).Handle,nil,PChar('http://www.google.ru/search?hl=ru&rlz=1R2ADFA_ruRU357&newwindow=1&q='), nil, nil,SW_SHOWNORMAL);
end;
НО он в IE и в ОПЕРЕ открывает страницу http://www.google.ru/webhp?hl=ru&rlz=1R2ADFA_ruRU357&newwindow=1

Как это изменить?

0ldbi4 20.12.2009 17:59
Что ты хочешь то?? чтобы в проге гугл работал или чтобы он перекидывал в ИЕ??

marcos 20.12.2009 18:00
Цитата:
Сообщение от 0ldbi4
Что ты хочешь то?? чтобы в проге гугл работал или чтобы он перекидывал в ИЕ??
Я кинул на форму эдит и кнопку.
Мне нужно чтобы после нажатия на кнопку открывался ИЕ с гуглом и производил поиск того что написанно в эдите

slesh 20.12.2009 18:02
и что тебе не нравится? гугль просто редиректит тебя на эту страницу. даже когда ты ввел слово в поиске, то он редиректит тебя на неё.

marcos 20.12.2009 18:04
Цитата:
Сообщение от slesh
и что тебе не нравится? гугль просто редиректит тебя на эту страницу. даже когда ты ввел слово в поиске, то он редиректит тебя на неё.

А можно его обойти, или что-нибудь зделать? Мне нужно чтобы просто открылась страница, с поиском слова, в эдите

lukmus 20.12.2009 19:35
попробуй искать через mail.ru, у них страничка по-проще, а по словам сми они заменили аренду поиска у яндекса на аренду у гугла

consoleus 22.12.2009 17:12
Код:
ShellExecute(Handle,nil,PChar('http://www.google.ru/search?hl=ru&rlz=1R2ADFA_ruRU357&newwindow=1&q=' + edit1.Text), nil, nil,SW_SHOWNORMAL);


Время: 06:58