Работа с интерфейсом ksDocAttachedSpcParam

[mkrz]

У кого-нибудь есть исходник с работающим интерфейсом ksDocAttachedSpcParam? Скиньте плиззз!!! (Делфи)

[mkrz]

Может непонятно изложил задачу. Вообщем мне нужно из спецификации получить ссылки на используемые чертежи (внешние ссылки). Нашел в форуме пример, но он у меня не заработал. А пример такой:

//------------------------------------------------------------------------------------------------------------------------------------
iSpcObjParam := ksSpcObjParam(ki.GetParamStruct(ko_SpcObjParam));
iDocSpcObjArr := ksDynamicArray(iSpcObjParam.GetDocArr);
iDocAttachedSpcParam := ksDocAttachedSpcParam(ki.GetParamStruct(ko_DocAttachSpcParam));

for i := 0 to iDocSpcObjArr.ksGetArrayCount - 1 do
begin
  iDocSpcObjArr.ksGetArrayItem(i, iDocAttachedSpcParam);
  ShowMessage(iDocAttachedSpcParam.fileName);
end;
//------------------------------------------------------------------------------------------------------------------------------------

У меня iDocSpcObjArr.ksGetArrayCount выдает 0.

[333]

Интерфейс Вы получили нужно теперь вызвать GetObjParam для объекта спецификации

[mkrz]

333.
Спасибо за ответ, но уточни где нужно вызвать GetObjParam?
Может есть готовый рабочий исходник? Буду очень благодарен.

[333]

У документа.
см ksDocument2D::ksGetObjParam
    ksSpcDocument::ksGetObjParam
    ksDocument3D::ksGetObjParam
т.е. у того документа с которым Вы работаете