通过调用库LIBRTMP Delphi记录流

时间:2012-10-10 07:54:12

标签: delphi delphi-xe2 rtmp

var
  MY_RTMP: RTMP;
  URL_str: AnsiString;
begin
  URL_str: = 'rtmp :/ / localhost: 1935/Video/test.stream';
  MY_RTMP: = RTMP_Alloc;
  RTMP_Init (MY_RTMP);
  RTMP_SetupURL (MY_RTMP, pcchar (URL_str));
  RTMP_Connect (MY_RTMP, 0);
  RTMP_ConnectStream (MY_RTMP, 0);
end;

错误RTMP_Connect(MY_RTMP,0); - [DCC错误] fMain.pas(36):E2033实际和正式var参数的类型必须相同 提前谢谢

1 个答案:

答案 0 :(得分:2)

您在the code中链接的previous question中定义的RTMP_Connect期望将声明的RTMPPacket变量作为第二个参数传递。因此,使用您的命名约定,您可以尝试这样做:

var
  URL_str: AnsiString;
  MY_RTMP: RTMP;
  MY_RTMPPacket: RTMPPacket;
begin
  URL_str := 'rtmp://localhost:1935/Video/test.stream';
  MY_RTMP := RTMP_Alloc;
  RTMP_Init (MY_RTMP);
  RTMP_SetupURL (MY_RTMP, pcchar (URL_str));
  RTMP_Connect (MY_RTMP, MY_RTMPPacket);
  RTMP_ConnectStream (MY_RTMP, 0);
end;

MY_RTMPPacket被调用之前,可能需要初始化RTMP_Connect。但毫无疑问,你可以从图书馆的文档中找到我们的工作。