Еліпс Параметри еліпса (ksEllipseParam) – КОМПАС в DELPHI

Параметри еліпса описуються інтерфейсом ksEllipseParam Для його отримання потрібно викликати метод GetParamStruct інтерфейсу KompasObject з параметром ko_EllipseParam Розглянемо властивості цього інтерфейсу:

A, B – розміри півосей еліпса

angle – відповідно до документації це кут нахилу осі еліпса style – стиль лінії еліпса

xc, yc – координати центру еліпса, тобто точки перетину його осей

Метод у інтерфейсу всього один Init () Він обнуляє значення властивостей інтерфейсу ksEllipseParam

Для побудови еліпса використовується метод ksEllipse інтерфейсу ksDocument2D Ось прототип даного методу:

ksEllipse(

const par: IDispatch / / Інтерфейс ksEllipseParam

): Integer

У разі успіху даний метод повертає покажчик на еліпс, а в разі помилки нуль

Давайте подивимося, як це робиться на практиці Нижче наводиться фрагмент програми, в якому будується еліпс розміром 100 × 40 нахилений до вертикальної осі під кутом 30 ◦

var

kompas: KompasObject Document2D: ksDocument2D EllipseParam: ksEllipseParam

………

begin

………

/ / Заповнюємо параметри еліпса

EllipseParam:=ksEllipseParam(kompasGetParamStruct(ko_EllipseParam)) EllipseParamA:=20

EllipseParamB:=50 EllipseParamangle:=30 EllipseParamstyle:=1 EllipseParamxc:=100 EllipseParamyc:=100

/ / Будуємо сам еліпс

Document2DksEllipse(EllipseParam)

………

На малюнку нижче представлений еліпс, побудований цією програмою:

Джерело: Норсеев Сергій, «розробка програм під КОМПАС У DELPHI»

Схожі статті:


Сподобалася стаття? Ви можете залишити відгук або підписатися на RSS , щоб автоматично отримувати інформацію про нові статтях.

Коментарів поки що немає.

Ваш отзыв

Поділ на параграфи відбувається автоматично, адреса електронної пошти ніколи не буде опублікований, допустимий HTML: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

*

*