Прямокутник Параметри прямокутника (ksRectangleParam) – КОМПАС в DELPHI

Параметри прямокутника задаються інтерфейсом KsRectangleParam Отримати його можна за допомогою методу GetParamStruct інтерфейсу KompasObject, для цього треба як параметр передати йому константу ko_RectangleParam

Нижче представлені властивості цього інтерфейсу

ang – Кут нахилу прямокутника до горизонтальної осі

height – Висота прямокутника

style – Стиль лінії

width – Ширина прямокутника

x і y – Координати лівого нижнього кута прямокутника

Серед методів даного інтерфейсу нам може бути цікавий тільки метод Init (), який не має вхідних параметрів і скидає настройки прямокутника

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

ksRectangle(

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

centre: Smallint / / Ознака позначення центру

): Integer

З першим параметром, думаю все ясно Поговоримо про другий Даний параметр задає позначення центру прямокутника (точку перетину його діагоналей) Він може приймати одне із значень, представлених в таблиці нижче:

Значення

Опис

0

неможливо позначати центр

1

маленьким хрестиком

2

горизонтальна вісь

3

і горизонтальна і вертикальна осі

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

Нижче наводиться приклад програми, яка будує прямокутник розміром 20 × 50, нахилений під кутом 30 градусів

Var

……

Begin

……

kompas: KompasObject Document2D: ksDocument2D

RectangleParam: ksRectangleParam

/ / Заповнюємо параметри прямокутника

RectangleParam:=ksRectangleParam(kompasGetParamStruct(ko_RectangleParam))

RectangleParamang:=30 RectangleParamheight:=20

RectangleParamstyle:=1 RectangleParamwidth:=50 RectangleParamx:=100 RectangleParamy:=100

/ / Будуємо сам прямокутник без позначення центру

Document2DksRectangle(RectangleParam,0)

……

На малюнку нижче наводиться результат роботи даної програми:

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

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


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

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

Ваш отзыв

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

*

*