[BorodaOleg]

Что-то совсем запутался
Win7 x64, Delphi 3

Идея - передавать в ListBox вместе со строкой ссылку на IXMLNode, дабы затем можно было посмотрить из чего оно состоит.

Добавляю так:

Код:

ListBox2.Items.AddObject(LNode.NodeName,TObject(LNode));

Получаю, соответственно так:

Код:

LNode:=IXMLNode(ListBox2.Items.Objects[ListBox2.ItemIndex]);

Компилятор ругается на несоответствие типов IXMLNode и TObject, притом, если делаю так:

Код:

var   LNode: IXMLNode;
      i : integer;
begin
  i := integer(ListBox2.Items.Objects[ListBox2.ItemIndex]);
  LNode:=IXMLNode(i);
end;

компилятор все проглатывает, ошибки начинаются уже на процессе выполнения