Здравствуйте, пытаюсь нарисовать окружность и применить к ней операцию выталкивания, но пока ничего не выходит. У кого есть какие идеи по этому поводу, поделитесь пожалуйста. Цель пока что, хотя бы научиться выводить окружность на плоскость, мой код пока и этого не выполняет((
Вот код, но после успешной компиляции ничего не появляется на плоскости:
Вот код, но после успешной компиляции ничего не появляется на плоскости:
| Код |
|---|
using System;
using TFlex.Model;
using TFlex.Model.Model2D;
using TFlex.Model.Model3D;
namespace NewMacroNamespace1
{
public class NewMacroClass1
{
public static void NewMacro1()
{
// Выбираем текущий документ
Document tfdoc = TFlex.Application.ActiveDocument;
LineText text = new LineText(tfdoc);
// Открываем блок изменений
tfdoc.BeginChanges("Пытаемся нарисовать окружность");
// Создаем свободные узлы нашего контура
FreeNode node1 = new FreeNode(tfdoc,150,10);
FreeNode node2 = new FreeNode(tfdoc,150,70);
// Замыкаем контур линиями
CircleConstruction circle = new CircleConstruction(tfdoc);
circle.SetCenterAndNode(node1,node2);
// Создаем штриховку и ее контур
Area ar1 = new Area (tfdoc);
Contour cn = ar1.AppendContour();
// Описываем контур штриховки сегментами
// StartNode - начальный узел
// EndNode - конечный узел
ConstructionContourSegment ccs1 = new
ConstructionContourSegment(cn);
ccs1.StartNode = node1;
ccs1.EndNode = node2;
// Создаем стандартную рабочую плоскость
// Top - вид спереди, Front - вид спереди, Left - вид слева и др
StandardWorkplane swp1 = new
StandardWorkplane(tfdoc, StandardWorkplane.StandardType.Top);
// Создаем 3D-профиль на основе штриховки и рабочей плоскости
AreaProfile ap1 = new AreaProfile(tfdoc);
ap1.Area = ar1;
ap1.WorkSurface = swp1;
// Создаем операцию выталкивания
ThickenExtrusion extr = new ThickenExtrusion(tfdoc);
// Длина выталкивания для первого направления
extr.Thickness1 = 50;
// Профиль для выталкивания
extr.Profile.Add(ap1.Geometry.SheetContour);
// Закрываем блок изменений
tfdoc.EndChanges();
}
}
}
|
