VPF::вращение ломаной - Форум программистов

rocky7

Дата 10.5.2009, 11:58 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 148
Регистрация: 20.1.2009

Репутация: нет
Всего: нет

Поворот ломаной относительно точки, указанной двойным кликом мыши происходит по спирали , а нужно по окружности. Как исправить?

Код


void __fastcall TForm1::FormDblClick(TObject *Sender)
{
Image1->Enabled=true;
 PatBlt(Image1->Canvas->Handle, // Handle Canvas
       0,                      // начальная координата по X
       0,                      // начальная координата по Y
       Image1->Width,          // конечная координата по X
       Image1->Height,         // конечная координата по Y
       WHITENESS               // как закрашивать
       );
 Image1->Enabled=false;
  float dPhi;
  dPhi=(StrToFloat(Edit2->Text))*0.017;
 int XP,YP;
 TPoint pt;
 GetCursorPos(&pt);
   XP=pt.x - Form1->Left;
   YP=pt.y - Form1->Top;
   pLine.px[0]=XP + (pLine.px[0]-XP)*cos(dPhi) - ( pLine.py[0]-YP)*sin(dPhi);
  pLine.py[0]=YP + (pLine.py[0]-YP)*cos(dPhi) + (pLine.px[0]-XP)*sin(dPhi);
 Image1->Canvas->MoveTo(pLine.px[0],pLine.py[0]);
  for(int i=1;i<=pLine.GetN();i++)
  {
  pLine.px[i]=XP + (pLine.px[i]-XP)*cos(dPhi) - ( pLine.py[i]-YP)*sin(dPhi);
  pLine.py[i]=YP + (pLine.py[i]-YP)*cos(dPhi) + (pLine.px[i]-XP)*sin(dPhi);

 Image1->Canvas->LineTo(pLine.px[i],pLine.py[i]);
 }

Usper

Дата 13.5.2009, 08:47 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15

Что примерно должно быть в Edit2->Text и что такое pLine?

--------------------

На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »