
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
02.04.2007, 01:48
|
|||
|---|---|---|---|
Indy в делфи и билдере |
|||
|
#18+
Доброго времени суток У меня такой вопрос, есть сервис в который я хочу отправить пост - запрос, но результат он отдаёт примерно через 5 минут, вот код на делфи 2006, всё отлично работаеткод C++ Builder procedure TForm1.Button1Click(Sender: TObject); var str:TStringList; ms: TMemoryStream; begin str:=TStringList.Create; ms := TMemoryStream.Create; str.Add('pole1=1'); str.Add('pole2=2'); str.Add(‘pole3=3’); try IdHTTP1.Post('http://servis//servis.php', str, ms); ms.Position := 0; Memo1.Lines.LoadFromStream(ms); finally ms.Free; str.Free; end; end; procedure TForm1.FormCreate(Sender: TObject); begin Memo2.Lines.LoadFromFile('dom.txt'); Memo3.Lines.LoadFromFile('word.txt'); end; Вот код на билдере 6 код C++ Builder void __fastcall TForm1::Button1Click(TObject *Sender) { TStringList *str = new TStringList ; TMemoryStream *ms = new TMemoryStream; try { str->Add(“pole1=1"); str->Add("pole2=2"); str->Add("pole3=3"); IdHTTP1->Post("http://servis//servis.php ",str,ms ); ms->Position = 0; Memo1->Lines->LoadFromStream(ms) ; } __finally { delete str; delete ms ; } Всё хорошо, только возвращает значение сразу, не дожидаясь ответа сервера. Результат, получаю обычный код страницы, а не результат выдачи сервера. Может причина в разных версиях Индии? В любом случае хотелось бы узнать в чём дело и как решить эту проблему. П.С. В 2006 билдере вообще не компилируется, наверное версия индии не поддерживается… ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=57&tablet=1&tid=2029134]: |
0ms |
get settings: |
6ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
152ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
22ms |
get tp. blocked users: |
1ms |
| others: | 194ms |
| total: | 397ms |

| 0 / 0 |
