![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не могу передать Image через сокет [D5, Win2k]
Dmitry V. © (2001-12-25 15:15:00)Мне нужно по запросу передать рисунок от сервера к клиенту
в "onClientRead" в ServerSocket помещаю следубщий код :
If R = "GET" then
Begin
MSTream := TMemoryStream.Create;
JPEG_Image := TJPEGImage.Create;
JPEG_Image.Assign ( Form1.Image.Picture.BitMap );
Jpeg_Image.Smoothing := True;
Jpeg_Image.CompressionQuality := 50;
Jpeg_Image.Compress;
Jpeg_Image.SaveToStream (MSTream);
MStream.Position := 0;
Socket.SendStream(Mstream); <<< Ошибка ТУТ
MSTream.Free;
Jpeg_Image.Free;
Вместо Socket.SendStream(Mstream);
пробовал ServerSocket.Socket.Connections[0].SendStream(Mstream);
результат тот-же.
End; { If R="GET"}
panov (2001-12-26 15:15:00) [1]см. статьи на сайте.
Dmitry V. (2001-12-26 14:24:00) [2]Ну хоть ссылочку на примерчик
Dmitry V. (2001-12-26 11:26:00) [3]Очень прошу вас помочь мне !