视频压缩 VC TO Delphi ,请高手翻译(100分)

  • 主题发起人 主题发起人 emitsong
  • 开始时间 开始时间
E

emitsong

Unregistered / Unconfirmed
GUEST, unregistred user!
AVICOMPRESSOPTIONS opts;
AVICOMPRESSOPTIONS FAR * aopts[1] = {&opts};
PAVISTREAM ps = NULL,

AVISaveOptions(NULL, 0, 1, &ps, (LPAVICOMPRESSOPTIONS FAR *) &aopts))

翻译后
var
ps:IAVISTREAM;
opts:TAVICOMPRESSOPTIONS;
aopts:PAVICOMPRESSOPTIONS;
//指针型 ^TAVICOMPRESSOPTIONS;

begin

aopts:=@opts;
AVISaveOptions(null,0,1,ps,aopts);
老是报类型转换错误

请高手指教




 
aopts 是数组指针,所以应该是指针的指针。
 
指针的指针如何定义???
 
aopts:^PAVICOMPRESSOPTIONS;
begin

new(aopts);
aopts^:=@opts;
 
编译都通不过
 
何必搞那么多呢,你想搞视频方面的东西是不是,到http://www.delphi-jedi.org/Jedi:APILIBRARY
去下载vfw.pas就可以了
 
哪个变量类型转换错误就改哪个就行了嘛:)
 
有vfw.h文件
 
后退
顶部