Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.18;
Скачать: CL | DM;

Вниз

Дуга окружности   Найти похожие ветки 

 
San1   (2007-02-28 10:01) [0]

Подскажите пожалуйста, как нарисовать в Image дугу зная координаты ее центра, радиус, начальный и конецный угол.
Заранее спасибо


 
TUser ©   (2007-02-28 10:06) [1]

The Arc function draws an elliptical arc.

BOOL Arc(

   HDC hdc, // handle to device context
   int nLeftRect, // x-coordinate of bounding rectangle"s upper-left corner
   int nTopRect, // y-coordinate of bounding rectangle"s upper-left corner  
   int nRightRect, // x-coordinate of bounding rectangle"s lower-right corner  
   int nBottomRect, // y-coordinate of bounding rectangle"s lower-right corner    
   int nXStartArc, // first radial ending point
   int nYStartArc, // first radial ending point
   int nXEndArc, // second radial ending point
   int nYEndArc  // second radial ending point
  );


 
MBo ©   (2007-02-28 10:29) [2]

procedure DrawArc(ACanvas: TCanvas; XC, YC, R: Integer; StartAngle, SweepAngle:
 Double);
begin
 SetArcDirection(ACanvas.Handle, AD_CLOCKWISE);
 ACanvas.Arc(XC - R, YC - R, XC + R, YC + R,
   Round(XC + R * Cos(StartAngle)),
   Round(YC + R * Sin(StartAngle)),
   Round(XC + R * Cos(StartAngle - SweepAngle)),
   Round(YC + R * Sin(StartAngle - SweepAngle)));
end;



Страницы: 1 вся ветка

Текущий архив: 2007.03.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.042 c
2-1172562572
Lonix
2007-02-27 10:49
2007.03.18
Вопрос по Memo


15-1172042600
Чародей
2007-02-21 10:23
2007.03.18
Кофемашина Brio 250


6-1160050855
Ruta
2006-10-05 16:20
2007.03.18
запуск проги на удал. компутере.


2-1172651336
Alex7
2007-02-28 11:28
2007.03.18
Переименование модуля


3-1166609343
maugly
2006-12-20 13:09
2007.03.18
как сделать инсталятор bde+sql links ?