调用用户自定义函数,可以传一个链表参数
[id(94), helpstring("method CallEx")]
IDispatch* CallEx(BSTR pszFunName, IDispatch* pParam);|
参数 |
说明 |
|
BSTR pszFunName |
自定义函数名 |
|
IDispatch* pParam |
参数链表 |
返回自定义函数返回的链表数据
例如: Delphi下调用例子,把当前图形保为一个jpg文件
procedure TForm2.Button1Click(Sender: TObject);
var
param : IMxDrawResbuf;
ret : IMxDrawResbuf;
begin
// 创建参数对象
param := CoMxDrawResbuf.Create();
// 文件路径,-10是参数的DXF组码,取-10控件自动确定DXF组码
param.AddString('c:test.jpg');
// jpg的宽度
param.AddLong(1200);
// jpg的高度
param.AddLong(500);
// jpg的背景色, 16777215 = 0xFFFFFF,是白色
param.AddLong(16777215);
// 调用自定义函数 Mx_SaveJpgFileEx
ret := IMxDrawResbuf(MxDrawX1.CallEx('Mx_SaveJpgFileEx',param));
if ret.AtString(0) = 'Ok' then
begin
showmessage('保存成功到C:test.jpg');
end;
end;