|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Подскажите name у кнопки поиска Yandex
Подскажите как сделать программу на делфи которая вставляет запрос в поиск и нажимает кнопку найти
С этой страницы http://yandex.ru/yandsearch?text=111 |
#2
|
|||
|
|||
А что, религия не позволяет GET'от этот запрос отправить???
Код:
IdHTTP1.Get('http://yandex.ru/yandsearch?text='+Edit1.Text); |
#3
|
|||
|
|||
Цитата:
А как сделать кодировку? |
#4
|
||||
|
||||
см. к примеру в:
Код:
unit IdURI; class function TIdURI.ParamsEncode(const ASrc: string): string; var i: Integer; begin Result := ''; {Do not Localize} for i := 1 to Length(ASrc) do begin if ASrc[i] = ' ' then begin {do not localize} Result := Result + '+'; {do not localize} end else if NOT (ASrc[i] in ['A'..'Z', 'a'..'z', '0'..'9']) then begin {do not localize} Result := Result + '%' + IntToHex(Ord(ASrc[i]), 2); {do not localize} end else begin Result := Result + ASrc[i]; end; end; end; Пишу программы за еду. __________________ |