Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Штриховка в AutoCad средствами C++ Builder

289
08 сентября 2014 года
Jeyson
207 / / 20.04.2000
Здравствуйте.
Пишу программу, позволяющую работать в AutoCad.
Подключился к Автокаду, рисую примитивы, но споткнулся на штриховке
Требуется нарисовать окружность и залить ее. Окружность создается, но не заливается.

Код:
Variant  OuterLoop;
  IAcadHatch * Hatch;
  IAcadAcCmColor * Color1;
  IAcadAcCmColor * Color2;

  int BoundsA[2]={0,2};
  FirstPoint = VarArrayCreate(BoundsA,1,varDouble);
  FirstPoint.PutElement(0.0,0);
  FirstPoint.PutElement(0.0,1);
  FirstPoint.PutElement(0.0,2);

  int Bounds[]={0};
  OuterLoop= VarArrayCreate(Bounds,1, varDispatch);
  OuterLoop=AcadDocument1->ModelSpace->AddCircle(FirstPoint,100);

  Hatch =AcadDocument1->ModelSpace->AddHatch (acPreDefinedGradient, WideString("LINEAR"), True, Variant(acGradientObject));

  Color1=Hatch ->GradientColor1;
  Color1->SetRGB(200,50,200);
  Hatch->GradientColor1=Color1;

  Color2=Hatch->GradientColor2;
  Color2->SetRGB(0,250,0);
  Hatch->GradientColor2=Color2;

  Hatch->AppendOuterLoop(OuterLoop);
  Hatch->Evaluate();
  AcadDocument1->Application->Update();
В чем ошибка? Спасибо.
289
11 сентября 2014 года
Jeyson
207 / / 20.04.2000
Вопрос отпал. Перешел на Delphi. Все заработало с первого раза.
Вердикт: C++Builder плохо заточен для решения подобных задач (или мне еще учиться и учиться....).
1.9K
11 сентября 2014 года
George22
91 / / 09.12.2007
Очень жаль... Попробую разобраться. Какая хоть версия Builder C++?
289
11 сентября 2014 года
Jeyson
207 / / 20.04.2000
С++Builder 6.
Советую не мучиться, а поставить Delphi 7. Много примеров и уроков в сети. По началу малость не привычно, а потом втягиваешься. И интерфейс похож. Все классно работает. Буквально за сегодня написал приложение экспорта из своей программы (кстати на С++Builder 6 написанной) , около 1000 строк кода и все работает!

Знаете кого-то, кто может ответить? Поделитесь с ним ссылкой.

Ваш ответ

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог