Справочная система SDK КОМПАС-3D

Dim kompasDoc As KompasAPI7.KompasDocument

Dim doc2D As KompasAPI7.DrawingDocument

Set kompasDoc = KomApp.ActiveDocument

Set doc2D = kompasDoc // Здесь выполнится QueryInterface.

Подразделы:

(отсутствуют)