PureBasic

PathPointAngle()

Синтаксис

Result.d = PathPointAngle()

Описание


Возвращает угол траектории Векторного контура в точке на заданном расстоянии от начала текущего Векторного контура.

Параметры

Distance.d Определяет расстояние от начала Векторного контура.
Если этот параметр отрицателен или больше, чем общая длина Векторного контура, возвращается соответственно начальная / конечная точка Векторного контура.
Общая длина Векторного контура может быть получена с помощью PathLength().

Возвращаемое значение

Угол траектории Векторного контура в заданной точке, в градусах. Угол 0 обозначает положительную ось X.

Пример

If OpenWindow(0, 0, 0, 400, 200, "PathPointAngle", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    CanvasGadget(0, 0, 0, 400, 200)

    If StartVectorDrawing(CanvasVectorOutput(0))

        ; Создаём векторный контур
        MovePathCursor(150, 125)
        AddPathCurve(0, 270, 0, -150, 350, 180)

        ; расположение и угол точки на векторном контуре
        x = PathPointX(200)
        y = PathPointY(200)
        a = PathPointAngle(200)

        ; Выбираем источник и обводим векторный контур
        VectorSourceColor($FF0000FF)
        StrokePath(5)

        ; нарисуем маркер в точке на векторном контуре
        AddPathCircle(x, y, 10)
        VectorSourceColor($FFFF0000)
        FillPath()

        MovePathCursor(x, y)
        AddPathLine(30*Cos(Radian(a)), 30*Sin(Radian(a)), #PB_Path_Relative)
        StrokePath(5)

        StopVectorDrawing()
    EndIf

    Repeat
        Event = WaitWindowEvent()
    Until Event = #PB_Event_CloseWindow
EndIf

См. также

PathPointX(), PathPointY(), PathLength()

Поддерживаемые OS

Все

<- PathLength() - Оглавление VectorDrawing - PathPointX() ->