在Delphi 7中为XSL添加自定义函数

时间:2014-12-23 11:24:59

标签: delphi xslt msxml extension-objects

我试图让XSL在扩展对象上使用函数,但我尝试的所有内容都告诉我函数不存在。

在我的lib_TLB.pas文件中,我有

function Get_ReadOnly: WordBool; safecall;

在实现IDispatch的界面上定义,并且我将IXSLProcessor传递给proc.AddObject( obj, 'foo' );

我在xmlns:foo="foo"元素中声明xsl:stylesheet,但当我尝试使用<xsl:value-of select="foo:Get_ReadOnly()"/>时,它只是说该函数不存在。

我错过了某个地方,或者说错了吗?

编辑:经过仔细检查,它可以正常工作,而不是任何属于财产获取的功能。该函数具有关联属性,foo:get-ReadOnly()工作正常。无论是那个,还是它,因为在该界面的实现上定义的功能受到保护&#39;而不是公共&#39;。

无论哪种方式,如果有人能够阐明其工作规则是什么,而不是我在试错中摸索,我会感激不尽。

0 个答案:

没有答案