ошибка при создании XML документа [Delphi, Windows]
abasheev © (2006-05-04 10:47:00)
Что делать?
написал програмульку, которая создаёт ХМЛ документ и
созраняет его в файл. при компилировании все отлично, но программа
не работает
говорит, что не может запустить или не запущена CoInitialize
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils, XMLDoc, XMLIntf;
var XMLfile: IXMLdocument;
iNode: IXMLNode;
begin
{ TODO -oUser -cConsole Main : Insert code here }
XMLfile := TXMLDocument.Create(nil);
XMLfile.Active:=true;
iNode:= XMLfile.AddChild('quiz'); //nachalo bloka
zadaniy
XMLfile.SaveToFile('tsk.xml');
end.
wal (2006-05-04 10:52:00) [1]
> не запущена CoInitialize
Собсвенно говоря, этим все сказано.
Создай отдельный модуль, в нем такой код:
...
initialization
CoInitialize(nil);
finalization
CoUninitialize;
end.
Наверх 
ЧАТ |
Орешник |
|
