Тема: Конструктор и деструктор класса
Подскажите как правильно в VBA для автокада создать свой новый класс с конструктором и деструктором
1. Создаем Class Module - CMyClass
2. Пишем в нем
Private mObj As AcadSelectionSet Private Sub Class_Initialize() Call ThisDrawing.SelectionSets.Item("TMP").Delete Set ssObj = ThisDrawing.SelectionSets.Add("TMP") End Sub Private Sub Class_Terminate() ThisDrawing.SelectionSets.Item(SS_NAME).Delete Set ssObj = Nothing End Sub
Все верно?
Кстати можно ли сделать несколько конструкторов (конструктор по умолчанию и конструктор с определенными полями)?