Как получить свойства чертежа и preview?

Автор Rebel, 08.01.05, 18:34:32

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

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

Rebel

помогите новичку в компас API
пишу прогу, которая оперирует чертежами и спцификациями, сделаными в компас 7.
для проги трпбуется получение свойста чертежа/спецификации, таких как автор, дата и т.п. и картинки preview, как??
если возможно поделитесь примерами на VB6...
заранее спасибо =)

333

Для получения параметров документа использется функция GetObjParam
В автоматизации ksGetObjParam

Для отрисовки изображения документа в любом окне используется функция ksDrawKompasDocument

Rebel


333

В Step4 есть пример вызова ksDrawKompasDocument см функцию
ShowFrame_Paint
docActive.ksDrawKompasDocument CLng(ShowFrame.hWnd), kompasDocName
данная строчка закоментарена но ее можно откоментарить и закоментарить отрисовку группы


333

Public Kompas As Kompas6API5.Application      ’ Интерфейс KompasObject

’ Работа с документом

Sub WorkDocument(doc As Kompas6API5.Document2D)
 
  Dim docPar As Kompas6API5.DocumentParam     ’ Интерфейс ksDocumentParam
  ’ Структура параметров документа
  Set docPar = Kompas.GetParamStruct(ko_DocumentParam)

If Not docPar Is Nothing Then               ’ Интерфейс создан
   
    docPar.Init                               ’ Инициализация
    if doc.ksGetObjectParam(  doc.reference, docPar, ALLPARAM  ) then
    ...

новый

Привет! Если уже разобрался, как работать со свойсвами чертежа, расскажи мне, как установить размер шрифта размерной надписи на всем чертеже ?