Текущий архив: 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.021 c
