Объект создаю следующим образом:
Код:
OPC_Server:=CreateComObject(ProgIDToClassID('RSLinx OPC Server')) As IOPCServer;
Но задача стоит создать не просто приложение, а службу и тут начали появляться проблемы - запуск службы прерывается именно на этой строчке.
Event Viewer пишет следующее:
Event Type: Error
Event Source: S_Data_Collection_Service
Event Category: None
Event ID: 0
Date: 2009-05-21
Time: 17-15-53
User: N/A
Computer: QWERT
Description:
The description for Event ID ( 0 ) in Source ( S_Data_Collection_Service ) cannot be found. The local computer may not have the necessary registry information or message DLL files to display messages from a remote computer. You may be able to use the /AUXSOURCE= flag to retrieve this description; see Help and Support for details. The following information is part of the event: Service failed on start: CoInitialize has not been called.