| 
| 
 | Вопрос # 4 481/ вопрос открыт / | 
 |  Здравствуйте, эксперты!
 
  
procedure TForm1.Button1Click(Sender: TObject);
var
//Создаём переменную res
res,a: string;
begin
//Посылаем get запрос
res:=idHTTP1.get('http://yandex.ru/yandsearch?text='+Edit1.Text+');
//Добавляем загруженную страницу в Memo1
Memo1.lines.add(res);
end;
 
end.Хочу передать текст из Edit1, не пойму никак какой синтаксис.
 
|  |   Вопрос задал: eJay (статус: Посетитель)Вопрос отправлен: 2 августа 2010, 23:27
 Состояние вопроса: открыт, ответов: 0.
 |  
 Мини-форум вопросаВсего сообщений: 12; последнее сообщение — 3 августа 2010, 12:47; участников в обсуждении: 4. 
|   | Вадим К (статус: Академик), 2 августа 2010, 23:35 [#1]:Здесь res:=idHTTP1.get('http://yandex.ru/yandsearch?text='+Edit1.Text+');
 точно одну кавычку не забыли?
 Галочка "подтверждения прочтения" - вселенское зло. |  
|   | eJay (статус: Посетитель), 3 августа 2010, 00:14 [#2]:Точно. Такой вариант не прокатил. |  
|   | min@y™ (статус: Доктор наук), 3 августа 2010, 08:11 [#3]:Смахивает на попытку SQL-injection  ) Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | eJay (статус: Посетитель), 3 августа 2010, 10:10 [#4]:да нет. просто нужно из базы взять команду и передать гет запрос с Id. Не могу нигде найти синтаксис правильный. |  
|   | eJay (статус: Посетитель), 3 августа 2010, 10:29 [#5]:procedure TForm1.Button1Click(Sender: TObject); var
 //Создаём переменную res
 res: string;
 begin
 //Посылаем get запрос
 res:=idHTTP1.get('http://192.168.0.16/test/test.php?id='+Edit1.Text+'');
 //Добавляем загруженную страницу в Memo1
 Memo1.lines.add(res);
 end;
 
 procedure TForm1.Button2Click(Sender: TObject);
 begin
 Memo1.Clear;
 Edit1.Clear;
 end;
 |  
|   | eJay (статус: Посетитель), 3 августа 2010, 10:30 [#6]:Так работает! |  
|   | Вадим К (статус: Академик), 3 августа 2010, 10:31 [#7]:если передаются английские буквы и без пробелов. то 
 res:=idHTTP1.get('http://yandex.ru/yandsearch?text='+Edit1.Text+')';должно работать.Если же нужно передавать и их, то нужно использовать URL кодирование. к примеру пробел заменяется на %20.
 Галочка "подтверждения прочтения" - вселенское зло. |  
|   | min@y™ (статус: Доктор наук), 3 августа 2010, 10:34 [#8]: Цитата (eJay): Не могу нигде найти синтаксис правильный.  А в хэлпе смотреть пробовал? Там же всё написано:
 
 procedure Get(AURL: string; const AResponseContent: TStream); overload;
function Get(AURL: string): string; overload; Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | min@y™ (статус: Доктор наук), 3 августа 2010, 10:44 [#9]: Цитата (Вадим К): res:=idHTTP1.get('http://yandex.ru/yandsearch?text='+Edit1.Text+')'; Исправь ошибку. Перегрелся от жары?
 Как у вас там в Одессе погодка? Хорошо, наверно: море рядом, значит есть ветер. А ветер - это есть гут.
 
 А у нас тут +35...+40°С и сплошная дымка от лесных пожаров. И ещё месяц мне в этом аду плавиться, билет в Крым на 3 сентября...
 Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | Вадим К (статус: Академик), 3 августа 2010, 10:57 [#10]:to  min@y™  ? Исправь? ну что же такой недогретый и не смог исправить
  ? Галочка "подтверждения прочтения" - вселенское зло. |  
|   | min@y™ (статус: Доктор наук), 3 августа 2010, 11:10 [#11]: Цитата (Вадим К): Исправь? ну что же такой недогретый и не смог исправить  ? У меня нет на этом сайте таких полномочий.
 Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп! |  
|   | DNK (статус: Студент), 3 августа 2010, 12:47 [#12]: res:=idHTTP1.get('http://yandex.ru/yandsearch?text='+Edit1.Text+'&lr=50');"Digital Networked Knight" |  Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |