Спецификация на Delphi

Автор sachokus, 01.09.06, 09:37:09

« предыдущая - следующая »

0 Пользователей и 1 гость просматривают эту тему.

sachokus

Здравствуйте, Добрые люди!!! :)
Помогите пожалуйста!!
Необходимо создать приложение, которое запускало бы КОМПАС и создавало спецификацию (именно перечень покупных).
Все это необходимо сделать с использованием Delphi (другого не знаю)  :-\
Все необходимые модули я подключил, КОМПАС запустил.........ПОМОГИТЕ СОЗДАТЬ СПЕЦИФИКАЦИЮ!!!!!
Очень хотелось бы подробный примерчик, где так же происходит обращение к полям спецификации  (и хоть к-либо запись в них)
Заранее благодарен!!!!!!

IronMaxxx

В папке SDK есть очень хорошие примеры по работе со спецификациями. Сомневаюсь, что здесь Вам кто-либо сможет предложить что-то лучшее и более подробно комментированное.

Gek

Все довольно банально.
1. Инициализируем документ, настраиваем стиль
StrCopy(doc.comment, 'Сгенерированный перечень элементов');
StrCopy(doc.author, 'Evgenius');
doc.regim := 0;
doc._type := 4;
doc.shtType := 3;
doc.layoutName := 'ecad_gr.lyt'; { нужная тебе библиотека стилей }
2. Заполняем строчки
  Strcopy(B, PChar(S));          {B - array of Char, S - вносимая строка }
  ksSpcObjectCreate('ecad_gr.lyt', 3, razdel, 0, 0, 0);
  ksSpcChangeValue( column, item, Addr(B), STRING_ATTR_TYPE);
Собственно и все  :w:

Piran_ya

Пробовали вставлять этот код, чето не работает. В чем может быть проблема? может быть из-за того что программа сделана библиотекой (вызывается из компас-менеджера)? Подскажите плз, а то делать срочно надо, а ниче не получается  8-)