Y
YuD
Unregistered / Unconfirmed
GUEST, unregistred user!
各位网友春节好，兄弟我有一问题需要各位的帮助。
有一个 OCX 控件，在DELPHI6中导入，这个控件好像是用VC写的，在说明中提到下边的变量类型，我对VC不懂，在DELPHI6中直接定义变量为 VARIANT 类型，可是在使用该函数实体是错误。在此向大家请教。希望哪位仁兄赐教。这里先谢了
-------*****一下为说明的一部分
参数pSubHeadInfo为VARIANT类型,含有VT_PTR型指针，指向用来容纳子头信息的缓冲区
long GetCurrentSubHeadInfo(const VARIANT& pSubHeadInfo);
------****** 下面是说明文件给的一个例子
读取子头信息(最好把这段代码翻译成Delphi)
BYTE bpSubHeadInfo[SERSUBHEADINFOLENGTH];
VARIANT vtInfo;
vtInfo.vt=VT_PTR;
vtInfo.pbVal=&bpSubHeadInfo[0];
m_SPlayerCtrl.GetCurrentSubHeadInfo(vtInfo);
------***** 下面是我在DELPHI中的调用
VAR FileInfo:Variant;
begin
SPLAYER1.GetCurrentSubHeadInfo(FileInfo);
end;
有一个 OCX 控件，在DELPHI6中导入，这个控件好像是用VC写的，在说明中提到下边的变量类型，我对VC不懂，在DELPHI6中直接定义变量为 VARIANT 类型，可是在使用该函数实体是错误。在此向大家请教。希望哪位仁兄赐教。这里先谢了
-------*****一下为说明的一部分
参数pSubHeadInfo为VARIANT类型,含有VT_PTR型指针，指向用来容纳子头信息的缓冲区
long GetCurrentSubHeadInfo(const VARIANT& pSubHeadInfo);
------****** 下面是说明文件给的一个例子
读取子头信息(最好把这段代码翻译成Delphi)
BYTE bpSubHeadInfo[SERSUBHEADINFOLENGTH];
VARIANT vtInfo;
vtInfo.vt=VT_PTR;
vtInfo.pbVal=&bpSubHeadInfo[0];
m_SPlayerCtrl.GetCurrentSubHeadInfo(vtInfo);
------***** 下面是我在DELPHI中的调用
VAR FileInfo:Variant;
begin
SPLAYER1.GetCurrentSubHeadInfo(FileInfo);
end;
]
]