Передать изображение из TImage используя Indy

@K12 · Регистрация: 22.08.2010

Author24 — интернет-сервис помощи студентам

Здравствуйте!
Столкнулся с проблемой передачи изображения по сети с помощью TClientSocket и TServerSocket. Затруднение состояит в том, что нужно изображение из TImage в одной программе передать в TImage в другой программе. Минуя файлы.
С передачей файлов проблем не возникает, да и примеров в интернете куча.
Вообще изображение будет сниматься с вебкамеры достаточно часто, поэтому шуршать диском зря не хотелось бы, записывая каждый кадр на носитель и передавая его как файл.

Это глобально, а проблема сводится к тому, что:

Присваиваю изображение Image'у на стороне отправителя таким образом:

C++

1	Image1->Picture->LoadFromClipboardFormat(CF_BITMAP, Clipboard()->GetAsHandle(CF_BITMAP),0);

Не могу понять как преобразовать этот ClipboardFormat в поток для передачи в виде буфера.

Может быть есть идеи у кого?

@Gremlin · 13.01.2013, 12:29

C++

    Image1->Picture->LoadFromClipboardFormat(CF_BITMAP, Clipboard()->GetAsHandle(CF_BITMAP), 0);
 
    TMemoryStream *ms = new TMemoryStream;
    ms->Position = 0;
    Image1->Picture->Bitmap->SaveToStream(ms);
 
    //ms->SaveToFile("c:\\asd.bmp");
 
    ms->Free();

@K12 · 13.01.2013, 13:45 **[ТС]**

Gremlin, очень благодарен за помощь, удачного дня!

@K12 5 / 5 / 1 Регистрация: 22.08.2010 Сообщений: 108
	13.01.2013, 13:45 [ТС]	3
	Gremlin, очень благодарен за помощь, удачного дня! 0