-
Добрый день, коллеги. Работаю с компонентом DsPask. Программа делает скриншоты с web-камеры и посылает на сайт. Хочу организовать потоковое видео.
Подскажите, как отправлять с клиентской стороны видео на сервер? Голову ломаю, ничего не могу придумать.Заранее всем спасибо. -
Prok12 (20.11.11 21:53) [1]Может, Вам чем-то поможет (использую для переброски кадров - Bitmap - на сервер упаковки анимации в AVI-файл). На стороне клиента (фрагмент кода):
var MyBitmap: TBitMap; MyStream: TMemoryStream;
var Frame: OleVariant; P: Pointer;
.................
MyStream := TMemoryStream.Create;
MyBitmap.SaveToStream(MyStream); MyBitmap.Free;
Size1 := MyStream.Size;
Frame := VarArrayCreate([1, Size1], varByte);
P := VarArrayLock(Frame);
Move(MyStream.Memory^, P^, Size1);
VarArrayUnlock(Frame);
ServerAVI.AddFrame(Frame, Size1);
MyStream.Free; VarArrayRedim(Frame, 0);
На стороне сервера:
procedure TServerAVI.AddFrame(Frame: OleVariant; FrameSize: Integer);
var P: Pointer; MyBytmap: TBitmap; MyStream: TMemoryStream;
begin
MyStream := TMemoryStream.Create;
MyStream.Size := FrameSize;
P := VarArrayLock(Frame);
Move(P^, MyStream.Memory^, FrameSize);
VarArrayUnlock(Frame);
MyBitmap.LoadFromStream(MyStream); MyStream.Free;
........................ -
> Подскажите, как отправлять с клиентской стороны видео на
> сервер?
1) Как и раньше отправлять отдельные кадры, сервер пусть сам клеит по какому то признаку.
2) Клеит пусть клиент, и отправляет готовый файл.
3) RTSP + RTP. Это настоящие протоколы для передачи потокового видео и звука.
Но, обычно не клиент передает потоковое видео на сервер, а сервер передает видео клиенту. У тебя какая то вывернутая логика в программе. Что в результате хочешь добиться, опиши более глобально задачу. -
Подобная проблема. Вообщем есть нэтбуки с usb-модемами на точка(по всей области) нужно чтоб они отправляли видио или кадры на сервер(со статическим ip) для контроля работы сотрудников.
может и не в тему но программок путних не нашел, видимо придется писать.
Заранее спасибо. -
brother © (24.10.13 15:57) [4]webcamXP?
-
scharkhowa (24.10.13 22:50) [5]