delphi - 通过调用库 LIBRTMP Delphi 录制流

Question

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 参数的类型必须相同，提前致谢

Answer 1

正如您在上一个问题中链接的代码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但毫无疑问，您可以从图书馆的文档中进行操作。