....................................................................
	   rec=0;acum=0;
	   for(;;)
	   {
			rec=recv(s,Sr,1024*1024,0);
			Sr+=rec;
			acum=acum+rec;
			if(rec==0){Sr-=acum;break;}
	   }
	   closesocket(s);
	   alen=(strlen(Sr)-strlen(strstr(Sr,"\r\n\r\n")))+4;
	   Sr+=alen;//обрезка заголовка
	   Graphics::TBitmap * Bitmap = new Graphics::TBitmap;
	   TJPEGImage * examp = new TJPEGImage;
	   TMemoryStream *stM = new TMemoryStream;
	   br=acum-alen;//размер картинки
	   memcpy(img,Sr,br);//картинка копируется в буффер
	   stM->Position=0;
	   stM->Write((const void*)img,br);//в поток
	   examp->LoadFromStream(stM);//а тут ошибка 42
	   Bitmap->Assign(examp);
	   PaintBox1->Canvas->Draw(59,59,Bitmap);
	   delete examp;
	   delete Bitmap;
	   delete stM;
	   Sr-=alen;
....................................................................