网络视频发送的问题 ( 积分: 200 )

  • 主题发起人 主题发起人 cwzcwz
  • 开始时间 开始时间
C

cwzcwz

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟初学Delphi,从采集卡返回此函数
procedure StreamDirectReadCallback(channelNumber: ULong;
DataBuf: PChar;
Length: DWord;
FrameType: Integer;
context: Pointer);
cdecl;
请问如何将DataBuf: PChar;
Length: DWord;转成IdUDP可以发送和接收的类型idUDPS.SendBuffer;呢?望给出demo
 
将PChar转为byte类型的进行发送
呵呵,demo就没有了
 
如何转呢?
只要告诉我如何转成idUDPS.SendBuffer可以发送的类型就可以了,谢谢!
 
直接发送不可以?
procedure TForm1.Button1Click(Sender:TObject);
var DataBuf:PChar;
Length:DWord;
begin

IdUDPServer1.SendBuffer ('192.168.107.11',1111,databuf,length);
end;
 
直接发送后接收方的sizeof(databuf)=4
 
procedure TForm1.Button1Click(Sender:TObject);
var DataBuf:PChar;
Length:DWord;
tstr:string;
begin

tstr:=DataBuf;
IdUDPServer1.SendBuffer ('192.168.107.11',1111,tstr,length);
end;
 
DataBuf是缓冲区首地址,是个指针,并不是返回的数据
你必须先获取数据才能发送
 
将获得的指针发送出去即可
 
多人接受答案了。
 
后退
顶部