Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.02.26;
Скачать: CL | DM;

Вниз

передача картинки в потоке через сокет   Найти похожие ветки 

 
3asys ©   (2011-11-17 23:34) [0]

Добрый день,
Нужно передать bitmap между клиентом (IdTCPClient) и сервером (IdTCPServer):
Клиент:
procedure TForm1.Button2Click(Sender: TObject);
var
 ms: TMemoryStream;
 b : TBitmap;
begin
//Запись:
 IdTCPClient1.Connect(1000);
 ms := TMemoryStream.Create;
 b:=TBitmap.Create;
 b := self.GetFormImage;
 b.SaveToStream(ms);
 ms.Position:=0;
 IdTCPClient1.WriteStream(ms);
end;


Вопрос: Как эту картинку принять на сервере и вывести на Image ?


 
Плохиш ©   (2011-11-18 02:37) [1]


>  b:=TBitmap.Create;
>  b := self.GetFormImage;
>

Это что за маразм?

> Вопрос: Как эту картинку принять на сервере и вывести на
> Image ?

С помощью соответствующего события сервера, подробности написаны в справке по используемому компоненту.


 
И. Павел ©   (2011-11-18 12:25) [2]


> 3asys ©   (17.11.11 23:34)

Вот хорошая статья по работе с сокетами в инди. Сам ее читал, когда нужно было организовать такую связь. Там описана в том числе  и передача картинки:
http://www.delphimaster.ru/books/978594723593/fragment.html


 
3asys ©   (2011-11-18 17:03) [3]

> И. Павел ©

Спасибо Большое. Это то, что нужно.



Страницы: 1 вся ветка

Текущий архив: 2012.02.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
2-1321616574
alex-2011h
2011-11-18 15:42
2012.02.26
DBGrid и ScrollBar


15-1320615148
KilkennyCat
2011-11-07 00:32
2012.02.26
TreeView для XE бесплатный,


2-1321864635
megagenom
2011-11-21 12:37
2012.02.26
Мониторинг свободного пространства на удаленном сервере.


2-1321475790
DnoProgrammer
2011-11-17 00:36
2012.02.26
свой Opendialog


15-1320735969
ищу хелп
2011-11-08 10:06
2012.02.26
А есть у кого хелп от Delphi 7?