VPF::XMLDocument и CoInitialize - Форум программистов

AndreyANM

Дата 2.8.2006, 23:12 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 57
Регистрация: 4.1.2006

Репутация: нет
Всего: нет

Здравствуйте.

У меня возникла необходимость использования компонента XMLDocument из библиотеки. При использовании его
в обычной программе никаких сложностей не возникает, но когда я пытаюсь создавать компонент в библиотеке, то
при активизации возникает ошибка "Не был произведен вызов CoInitialize". Как бороться с этой ошибкой?

Вот упрощенный код процедуры:

Код


Function GetGroupList(XML:TStrings):TStrings;
  Var DOM: TXMLDocument;
      I:integer;
Begin
      // создаю екземпляр класса (в библиотеке имеется форма Form1)
  Dom:=TXMLDocument.create(Form1);


  Dom.Active:=False;
       // вставляю XML текст
  Dom.XML.Text:=UTF8Encode(XML.Text);
  Result:=TStringList.Create;
  Result.Clear;
  try
      // именно на этом месте возникает данная ошибка
    Dom.Active:=true;

    Dom.DocumentElement.ChildNodes.Count;
    For I:=0 to Dom.DocumentElement.ChildNodes.Count-1 do
      Begin
        Result.Add(Dom.DocumentElement.ChildNodes.Nodes[I].NodeValue)
      end;
  except;
  end;
end;

jack128

Дата 3.8.2006, 00:54 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 81
Регистрация: 18.5.2005

Репутация: 2
Всего: 4

Цитата(AndreyANM @ 2.8.2006, 23:12

)

Как бороться с этой ошибкой?

Произвести вызов CoInitialize.

Quadr0

Дата 3.8.2006, 01:07 (ссылка)

(голосов: 1)

Загрузка ...

Unregistered

...

Это сообщение отредактировал(а) Quadr0 - 15.7.2011, 11:49

AndreyANM

Дата 3.8.2006, 13:37 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 57
Регистрация: 4.1.2006

Репутация: нет
Всего: нет

Спасибо огромное, сейчас попробую...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »