Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |

20.12.2009, 17:28
|
|
Участник форума
Регистрация: 08.11.2009
Сообщений: 114
Провел на форуме: 201148
Репутация:
-4
|
|
Помогите с гуглом!
Всем привет! Я хочу на Делфи написать программу, которая будет переходить по сайтам в гуглах(чет,кажись,непонятн будет...)
Я написал процедуру:
Код:
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
Как это изменить?
|
|
|

20.12.2009, 17:59
|
|
Постоянный
Регистрация: 14.04.2008
Сообщений: 327
Провел на форуме: 584699
Репутация:
69
|
|
Что ты хочешь то?? чтобы в проге гугл работал или чтобы он перекидывал в ИЕ??
|
|
|

20.12.2009, 18:00
|
|
Участник форума
Регистрация: 08.11.2009
Сообщений: 114
Провел на форуме: 201148
Репутация:
-4
|
|
Сообщение от 0ldbi4
Что ты хочешь то?? чтобы в проге гугл работал или чтобы он перекидывал в ИЕ??
Я кинул на форму эдит и кнопку.
Мне нужно чтобы после нажатия на кнопку открывался ИЕ с гуглом и производил поиск того что написанно в эдите
|
|
|

20.12.2009, 18:02
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
и что тебе не нравится? гугль просто редиректит тебя на эту страницу. даже когда ты ввел слово в поиске, то он редиректит тебя на неё.
|
|
|

20.12.2009, 18:04
|
|
Участник форума
Регистрация: 08.11.2009
Сообщений: 114
Провел на форуме: 201148
Репутация:
-4
|
|
Сообщение от slesh
и что тебе не нравится? гугль просто редиректит тебя на эту страницу. даже когда ты ввел слово в поиске, то он редиректит тебя на неё.
А можно его обойти, или что-нибудь зделать? Мне нужно чтобы просто открылась страница, с поиском слова, в эдите
Последний раз редактировалось marcos; 20.12.2009 в 18:07..
|
|
|

20.12.2009, 19:35
|
|
Постоянный
Регистрация: 18.11.2009
Сообщений: 709
Провел на форуме: 1410429
Репутация:
214
|
|
попробуй искать через mail.ru, у них страничка по-проще, а по словам сми они заменили аренду поиска у яндекса на аренду у гугла
|
|
|

22.12.2009, 17:12
|
|
Новичок
Регистрация: 20.08.2009
Сообщений: 1
Провел на форуме: 153269
Репутация:
0
|
|
Код:
ShellExecute(Handle,nil,PChar('http://www.google.ru/search?hl=ru&rlz=1R2ADFA_ruRU357&newwindow=1&q=' + edit1.Text), nil, nil,SW_SHOWNORMAL);
|
|
|
|
 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|