TXMLDocument tworzony dynamicznie

0

Witam, potrzebuję przetworzyć dokument XML w drugim wątku. W tym celu dynamicznie tworzę TXMLDocument.

procedure TWatek.XML;
var
 responseXML:TXMLDocument ;

begin
 responseXML:=TXMLDocument.Create(nil); 
 responseXML.LoadFromFile(localfile); //localfile - string ze ścieżką do pliku.
// i tu dalsze instrukcje które się nie wykonają(...)

Procedura wywala się przy ładowaniu pliku. Miał ktoś może podobny problem? Niestety nie mam pomysłu czego tu brakuje, proszę więc o wskazówki ;)

0

Wybacz... ;)
"Project xxx.exe raised exception class EOleSysError with message 'Funkcja CoInitialize nie została wywołana'.".

2

i oczywiście to Funkcja CoInitialize nie została wywołana nic ci nie mówi.....

0

W aplikacjach okienkowych nie trzeba wołać CoInitialize(). W ServiceApp trzeba ręcznie to robić.
To powinno załatać problem:

uses
  XMLDoc,
  XMLIntf,

FXML: IXMLDocument;
  FXML := NewXMLDocument;
  FXML := nil;

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0