Вниз
Скачать: CL | DM;

Нарисовать дугу по радиусу, начальной точке и углу   Найти похожие ветки 

 
Newlifeforme ©   (2007-06-17 21:31) [0]

Здравствуйте. Нужно нарисовать дугу. Изветна точка начала дуги, радиус и угол. Пожалуйста подскажите как это сделать.


 
Kolan ©   (2007-06-17 21:36) [1]

> Пожалуйста подскажите как это сделать.

1.Найти уравнение в интернете:
Вроде тут есть: http://ru.wikipedia.org/wiki/%D0%9E%D0%BA%D1%80%D1%83%D0%B6%D0%BD%D0%BE%D1%81%D1%82%D1%8C

2. В цикле его использовать

3. Результаты отображать на экране.

Что не получается?


 
Углук ©   (2007-06-17 21:47) [2]

Canvas.Arc?


 
TUser ©   (2007-06-18 05:23) [3]

С помощью циркуля и линейки?


 
MBo ©   (2007-06-18 06:33) [4]

вот с другими начальными условиями:

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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
1-1178808671
Ддеенниисс
2007-05-10 18:51
2007.07.15
Рисунок из буфера обмена


2-1182416406
_Asph
2007-06-21 13:00
2007.07.15
onclick в TWinControl


15-1181469811
Ega23
2007-06-10 14:03
2007.07.15
Короче, я вернулся.


2-1181998370
Angelka
2007-06-16 16:52
2007.07.15
Memo


2-1182153246
Сатир
2007-06-18 11:54
2007.07.15
Как при сворачивании формы убрать её из панели задач?




   Наверх