Как правильно написать код в OLE

"Привожу пример кода в Delphi:<br><br><br><br>procedure TForm1.LoadReport;<br><br>var<br><br> doc, comp:olevariant;<br><br>begin<br><br> doc := Obj_1C.CreateObject('Документ.GetReport');<br><br><br><br> comp:= Obj_1C.CreateObject('Справочник.Computers');<br><br> doc.new;<br><br> comp.FindByDescr('VPN',0,1);<br><br><br><br> doc.Computer := comp.getattrib('Наименование');<br><br> doc.newline;<br><br> doc.Objects := 'память';<br><br> doc.Results := 'в порядке';<br><br> doc.write;<br><br><br><br>end;<br><br>Все работает, кроме записи значения в doc.computer.<br><br>В документе GetReport реквизит Computer имеет тип Справочник.Computers, но он его не присваивает, хотя код<br><br>поиска по наименованию успешен...Код Showmessage(comp.getattrib('Наименование')); показывает ожидаемый результат...<br><br><br><br>Буду признателен за подсказу и помощь..."