delphi中Service Application使用XML Data Binding的问题

Question

我使用XML Data Binding把一个XML生成了一个单元文件，然后使用单元文件中的Load函数加载XML，在VCL Forms Application中使用一切正常，可是在Service Application中使用就会报错，我开始install上服务程序后，我就点启动，就一直报错，然后我就在每个语句下面加一个save语句来保存不同的文字信息来查看看是哪个语句地方出错，结果查出是XML Data Binding中的Load函数报错，执行到这个函数就执行不下去了，在VCL Forms Application中使用一切正常，这是为什么呀

Answer 1

是不是文件路径问题，用GetModuleFileName可以获取Windows服务程序的路径

Answer 2

CoInitialize(nil)CoUninitialize等接分