[SOLVED] Application capable of measuring angles and distances.

klaus said:

I have not tested the form resizing.

Click to expand...

Public Sub Draw
    If Mode = "Measure" Then Return

    pthScene.Initialize(SceneOriginX, 0)
    pthScene.LineTo(cvsGrid.TargetRect.Width, 0)
    pthScene.LineTo(cvsGrid.TargetRect.Width, SceneOriginY)
    pthScene.LineTo(SceneOriginX, SceneOriginY)
    'cvsScene.ClipPath(pthScene)                        <= Commented out
  
    cvsCursor.ClearRect(cvsScene.TargetRect)
    cvsScene.ClearRect(cvsScene.TargetRect)
    For o = 0 To ListObjects.Size - 1
        Private Obj As ObjectData
        Obj = ListObjects.Get(o)
        If Obj.ObjectType = "Building" Then
            Obj.Item.As(BuildingObject).Draw
        End If
    Next
    For o = 0 To ListObjects.Size - 1
        Private Obj As ObjectData
        Obj = ListObjects.Get(o)
        If Obj.ObjectType = "Load" Then
            Obj.Item.As(LoadObject).Draw
        End If
    Next
    For o = 0 To ListObjects.Size - 1
        Private Obj As ObjectData
        Obj = ListObjects.Get(o)
        If Obj.ObjectType = "Crane" Then
            Obj.Item.As(CraneObject).Draw
        End If
    Next
    cvsScene.Invalidate
End Sub

klaus said:

You need to create a new class similar to the Crane class.
In the new class you need to declare the different parts, set their dimensions and define their degrees of liberty, define characteristic points, treat and calculate their movements in a Touch event or with sliders to modify their degrees of liberty.
The Touch event must be transmitted from the B4XMainPage module in the mouse and Gesture routines.
Then you need to choose what the user can do.
- Methods to set the angles of the four rotation points.
- Possible movements of the four points with the mouse, stylus or finger.
As an example: In the crane you can move the top of boom with the mouse, this implies a change of its length and rotation angle.
And with the sliders you can change the length and rotation angle independently like the real crane.
And of course this implies all the geometric calculations.
You know the different lengths and angles and you can calculate the different positions.
Or do you want to get all the equations for the calculation ?

Click to expand...

amorosik said:

I don't understand where those 'end stops' of the various segments can be modified

Click to expand...