![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#11 |
Старожил
Регистрация: 30.12.2009
Сообщений: 11,434
|
![]()
Гыыы... гении йопта.
Может на сайте расработчика поищите описание протокола? Там точно будет что-то что укажет на проверку соединения. |
![]() |
![]() |
![]() |
#12 |
Пользователь
Регистрация: 25.12.2011
Сообщений: 16
|
![]()
вот http://i062.radikal.ru/1112/19/f3bbeea8801a.jpg выделено красным
|
![]() |
![]() |
![]() |
#13 |
Пользователь
Регистрация: 25.12.2011
Сообщений: 16
|
![]() |
![]() |
![]() |
![]() |
#14 | |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
![]() Цитата:
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. |
|
![]() |
![]() |
![]() |
#15 |
Пользователь
Регистрация: 02.09.2009
Сообщений: 12
|
![]()
Попробуй загонять страницу в TStringList и затем искать строку с твоей командой СМD. Если номер позиции строки [i] не будет меняться, то цикл можно исключить. Как это будет работать на твоём сайте не знаю - пробовал на www.i.ua - работает. Кинь на форму Button1, Label1, Label2 и компонент IdHTTP1.
procedure TForm1.Button1Click(Sender: TObject); var SL: TStringList; i : Integer; CMD: string; begin CMD:='Unknown command '+'"123"'; SL:= TStringList.Create; try SL.Text:= IdHttp1.Get('http://www.callofduty.com/') except end; for i := 0 to SL.Count-1 do if Pos(CMD,SL.Strings[i])>0 then begin Label1.Caption:=SL.Strings[i]; Label2.Caption:='Строка № '+ IntToStr(i); //выполнение твоей программы end; end; Исходник Последний раз редактировалось kjb777; 28.12.2011 в 03:26. |
![]() |
![]() |
![]() |
#16 |
Пользователь
Регистрация: 25.12.2011
Сообщений: 16
|
![]()
kjb777
уважаемый но причём тут сайт? |
![]() |
![]() |
![]() |
#17 |
Участник клуба
Регистрация: 07.12.2011
Сообщений: 1,025
|
![]()
похоже тут дело даже не в "сервере" и сокетах...
он окну мессагу сет_текст шлет и хочет с того окна гет_текст с ответом Нужно винсайтом найти мемо отображения и геттекст вызвать
Не стесняемся, плюсуем!
![]() |
![]() |
![]() |
![]() |
#18 |
Пользователь
Регистрация: 02.09.2009
Сообщений: 12
|
![]()
Уважаемый ursa1992 , ты окончательно меня запутал. Действительно - какое окно ты открываешь, я так понял, что это окно интернет-браузера, т.е. страничка грузится с сервера? На посланную тобой команду серверу-[123] , сервер высылает ответ на твою страничку браузера- [Unknown command "123" ]. И на твоей странице должно отобразиться это послание. И придёт оно только на твой IP-адресс. Если это не так - то тогда действительно запускай Sniffer и ройся в потоке информации и я полагаю, что искать надо будет опять-же сочетание - [Unknown command "123" ].
|
![]() |
![]() |
![]() |
#19 |
Пользователь
Регистрация: 25.12.2011
Сообщений: 16
|
![]()
Slym
вот в точку!) kjb777 какой сайт? это игравой сервер которому я шлю команду но не знаю как получить ответ от него... http://i062.radikal.ru/1112/19/f3bbeea8801a.jpg - это факт не веб браузер Последний раз редактировалось ursa1992; 29.12.2011 в 08:59. |
![]() |
![]() |
![]() |
#20 |
Пользователь
Регистрация: 25.12.2011
Сообщений: 16
|
![]() |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Расшифровать ответ сервера | Shouldercannon | Общие вопросы Delphi | 19 | 10.03.2011 09:33 |
поймать ответ от сервера | miki131 | Работа с сетью в Delphi | 1 | 24.12.2009 20:24 |
Http ответ сервера | lennon | Свободное общение | 4 | 03.08.2009 02:34 |
Ответ от сервера. | mustang007 | Работа с сетью в Delphi | 3 | 23.05.2009 10:33 |
TClientSocket ответ от сервера | JRcoker | Работа с сетью в Delphi | 10 | 02.10.2008 01:55 |