При работе с компонентом IdHTTP(indy) возникает ошибка "Out of memory".

[Stilet]

Не все индеские функции

Смитт, хватит пить. Эта функция не относится к INDY

[HelloWold]

Stilet, оставшийся код - это функции обращения к VCL компонентам из потока(unit2) и код создания потока(unit1). Ну если Вы посчитаете нужным, то я его предоставлю.

waleri, а можно по подробней? Как так получается, что память не выделилась ? Разве в этом случае ошибка не должна появляться при первой итерации цикла?

Smitt&Wesson, все равно ошибка.

TIdHTTP* IdHTTP1= new TIdHTTP(false) ;

Спасибо за отзывчивость.

[Stilet]

если Вы посчитаете нужным, то я его предоставлю.

Ну иначе у меня нет никаких идей, я согласен с Валерием, где-то не выделяется память, или поток пытается отрабатывать во время его освобождения.

[HelloWold]

Unit1

void __fastcall TForm1::Button1Click(TObject *Sender)
{
	MyThread *Thr = new MyThread(true);
	Thr->Priority = tpHigher;
	Thr->FreeOnTerminate = true;
	Thr->Start();
}

Unit2

void __fastcall MyThread::Progress()
{
	Form1->ProgressBar1->Position = Form1->ProgressBar1->Position + 1;
}
//---------------------------------------------------------------------------
void __fastcall MyThread::ProgressInit()
{
	Form1->ProgressBar1->Min = 0;
	Form1->ProgressBar1->Max = Form1->ListBox1->Count;
	Form1->ProgressBar1->Step = 1;
	Form1->Caption = "Go";
}
//---------------------------------------------------------------------------
void __fastcall MyThread::Log()
{
	Form1->Edit3->Text = StrToInt(Form1->Edit3->Text) + 1;
}

void __fastcall MyThread::LogSaveToFile()
{
	Form1->Memo1->Lines->Add(Form1->Logs);
}

[Stilet]

Form1->Logs

А зачем, если не секрет, свойством формы сделал? По хорошему Logs стоит упаковать в MyThread свойством. Я не думаю, что именно из-за этого проблема, так что это рекомендация.

Form1->Edit3->Text = StrToInt(Form1->Edit3->Text) + 1;

А чего не SpinEdit?

Ну а по теме: Не вижу я тут граблей. Может плохо смотрю, но код вроде кошерный.

[HelloWold]

Logs

лежит в Unit1.h и служит для того, что бы выводить ошибки в мемо( хотя это и так видно). А не сделал я эту переменную членом класса из-за того, что в дальнейшем буду реализовывать многопоточность.
Или я не верно поступил?

А чего не SpinEdit?

Да как бы это не нужно(хотя не знаю). Ведь в эдит дублируется итерации цикла(от 1 до 1000)

Так получается, что мы таки не знаем из-за чего происходит ошибка?

[Stilet]

Или я не верно поступил?

Ну верно или нет я не берусь решать, но я бы его не делал глобальным.

мы таки не знаем из-за чего происходит ошибка?

Увы и ах. Если убрать 1000 в цикле и поставить скажем 50 - ошибка будет?

[HelloWold]

Ну верно или нет я не берусь решать, но я бы его не делал глобальным.

Просто я размышлял так : если будет несколько потоков, то достаточно одной переменной, в которую они будет записывать логи. Но теперь мне кажется, что действительно лучше создать эту переменную в каждом объекте TThread. Иначе мне придется с этой переменной работать через критические секции - следовательно будет падать производительность(повысится время работы). А так возрастет(чуть-чуть) потребление памяти.

А насчет проблемы : я тут вспомнил, что в XE2 был(и есть) косяк с GZip - сжатие страниц. Когда-то я сталкивался с подобными ошибками ссылка

Может быть все таки косяк не в коде, а в самом INDY ? Как думаете?

[Stilet]

Иначе мне придется с этой переменной работать через критические секции

Вот именно.

в XE2 был(и есть) косяк с GZip

Впервые об этом слышу. У меня никогда не было таких проблем с ним.

P.S. Кстати, если грешишь на GZip может подключишь тогда компонент TIdZLibCompressor к своему содаваемому объекту?

[HelloWold]

Stilet, здравствуйте.
Я переустановил студию. Ошибка исчезла