Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.07.15;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.019 c
2-1182156493
ssss
2007-06-18 12:48
2007.07.15
Как закруглить уголки формы ?


15-1181924295
reonid
2007-06-15 20:18
2007.07.15
D1


2-1182324749
Gentos
2007-06-20 11:32
2007.07.15
fsMDIChild


2-1182105782
Bullfrog
2007-06-17 22:43
2007.07.15
TWebBrowser


15-1181851885
homm
2007-06-15 00:11
2007.07.15
Ничего не понимаю. Лыжи затупились?