Редактирование свойств (Delphi)

[eugen47]

Добрый день!
Подскажите, пожалуйста, можно ли как-нибудь через API5 отредактировать свойства детали, а именно "Обозначение", "Наименование" и "Цвет" ?
Заранее благодарю за помощь!

[Sabahs]

IPart.marking - Обозначение компонента
IPart.name - Имя детали или подсборки в составе сборки
IPart.useColor - Используемый цвет (цвет источника, цвет хозяина, собственный цвет)
IPart.SetAdvancedColor - Установить параметры цвета и визуальных свойств объекта

[eugen47]

   Document3D:=ksDocument3D(kompas.Document3D());
   Document3D.Create(FALSE,true);
   Part:= ksPart(Document3D.GetPart(pTop_Part));

   marking := Part.marking;
   showmessage(marking);
   //part.name := 'Àáðàçèâíûé êðóã';
   //Part.marking := '123456';

выдаёт пустое значение(

[eugen47]

простите, туплю совсем, всё работает 

[eugen47]

хотя...

Part:= ksPart(Document3D.GetPart(pTop_Part));

   Part.name := 'Абразивный круг';
   name := Part.name;
   showmessage(name);

значение отображается в сообщении, но не отображается в компасе

[eugen47]

Разобрался, забыл добавить Part.Update();

Благодарю Sabahs за помощь!