powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / C++ [игнор отключен] [закрыт для гостей] / Indy в делфи и билдере
1 сообщений из 1, страница 1 из 1
Indy в делфи и билдере
    #34430213
Фотография Rohoss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Доброго времени суток

У меня такой вопрос, есть сервис в который я хочу отправить пост - запрос, но результат он отдаёт примерно через 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 билдере вообще не компилируется, наверное версия индии не поддерживается…
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / C++ [игнор отключен] [закрыт для гостей] / Indy в делфи и билдере
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]