哪位VC++高手帮我译成delphi,谢!!! ( 积分: 200 )

  • 主题发起人 主题发起人 rzqcjwrz
  • 开始时间 开始时间
R

rzqcjwrz

Unregistered / Unconfirmed
GUEST, unregistred user!
void CALLBACK CapPicFun(long nPort,/
char * pBuf,long nSize,/
long nWidth,long nHeight,/
long nStamp,long nType,long nReceaved)
{
if(!((g_bCapPic) &&
(nPort == ipos)))
return;
CString csFile;
switch(nType)
{
case T_UYVY:
csFile="c://uyvy.bmp";
break;
case T_YV12:
csFile="c://yv12.bmp";
break;
case T_RGB32:
csFile="c://rgb.bmp";
break;
default:
return ;
}
MP4_ClientSavePicFile(pBuf,nSize,nWidth,nHeight,nType,csFile.GetBuffer(csFile.GetLength()));
g_bCapPic=FALSE;

}
 
procedure CapPicFun(nPort:longint;
pBuf:PChar;
nSize,nWidth,long nHeight,
nStamp, nType, nReceaved:longint);stdcall;
Var
csFile:String;
begin

if not ((g_bCapPic) and (nPort = ipos)) then

Exit;
case nType of
T_UYVY:
csFile:='c:/uyvy.bmp';
T_YV12:
csFile:='c:/yv12.bmp';
T_RGB32:
csFile:='c:/rgb.bmp';
else

Exit;
end;

MP4_ClientSavePicFile(pBuf,nSize,nWidth,nHeight,nType,PChar(csFile));
g_bCapPic:=FALSE;//g_bCapPic 应该是一个全局的boolean类型变量
end;
 
但不能回调成功,是不是有错?
 
MP4_ClientSavePicFile(pBuf,nSize,nWidth,nHeight,nType,[red]csFile.GetBuffer(csFile.GetLength())); [/red]这句怎么表达?
 
MP4_ClientSavePicFile(pBuf,nSize,nWidth,nHeight,nType,[red]csFile.GetBuffer(csFile.GetLength()));

好像参数给错了。。你仔细看看
 
能否提供详细的解答!!!
 
这是一个回调函数,好像是根据返回保存图片的 MP4_ClientSavePicFile是一个自定义过程,你要把原型贴出来
 
MP4_ClientSavePicFile(char * pBuf,long nSize,long nWidth,long nHeitht,long nType,char * sFileName): pBuf, nSize, nWidth, nHeitht, nType同抓图回调函数中的参数,sFileName要保存的文件名,最好以BMP作为文件扩展名.返回TRUE表示成功,返回False表示失败.
 
帮顶,接分
 
MP4_ClientSavePicFile(pBuf,nSize,nWidth,nHeight,nType,csFile.GetBuffer(csFile.GetLength())); 这句怎么表达?
 
接受答案了.
 
后退
顶部