• gstof
  • Восстановленный участник
  • На форуме с 30 апреля 2007г.
  • Сообщений: 1
  • Спасибо: 0

Тема: Каким методом залить круг штриховкой

Из Дельфи рисую примитивы.
Каким методом заполнить заливкой (штриховкой) примитив, к примеру круг?

  • На форуме с 27 марта 2003г.
  • Сообщений: 24
  • Спасибо: 0

Re: Каким методом залить круг штриховкой

circle:= AcadModel.AddCircle(pt1,r1);
AcadDoc.SendCommand ('_HATCH'+#13+'S'+#13+'LAST'+#13+#13);
где
pt1 - координата центра,
R1 - радиус окружности,
S - заливка Solid,
Last - нарисованный последним замкнутый объект.