⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit1.cpp

📁 视频采集卡
💻 CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
extern "C"
{
#include "MediaTransmit.h"
}

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TformMain *formMain;
//---------------------------------------------------------------------------
__fastcall TformMain::TformMain(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TformMain::btnConnectClick(TObject *Sender)
{
	if(!MTALoadLibrary(6000,WORK_AS_CLIENT))
	{
		ShowMessage("MTALoadLibrary error");
		return;
	}
	
	RECT rc;
	rc.left = 0;
	rc.top = 0;
	rc.right = wndShow->Width;
	rc.bottom = wndShow->Height;
	if (-1 == MTACreateVideoDevice(wndShow->Handle,
		Handle, rc, 352, 288, 2, TRUE))
	{
		MTACreateVideoDevice(wndShow->Handle,
			Handle, rc, 352, 288, 2, FALSE);
	}

	MTASetSplitMode(1);
	MTACreateAudioDevice(Handle) ;
	
    int nCurIndex=0;
    int  nCallId = -1 ;
    nCallId = MTANewCall(editIP->Text.c_str(), 7000, nCurIndex) ;
	if(nCallId == -1)
	{
		ShowMessage("MTANewCall Error");
		return;
	}
	
   	BYTE biReqType = REQ_VI_STREAM;
	BOOL bRetVideo = MTASetVideoOut(nCallId, nCurIndex) ;
	
	if(!bRetVideo)
	{
		ShowMessage("Please install Micsosoft MPEG4 Codec!");
		MTAClearCall(nCallId,FALSE);
		return;
	}
	
	MTAMakeCall(nCallId, biReqType, FALSE,	"guest", 5, NULL, (EvCmdRespond)&ConnectingProc) ;
}
//---------------------------------------------------------------------------

void WINAPI TformMain::ConnectingProc(int nCallId,unsigned char biCmd,int nResult,BYTE *pRetData)
{
    return;
}
void __fastcall TformMain::FormClose(TObject *Sender, TCloseAction &Action)
{
	MTAFreeLibrary();    
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -