Private Sub Monitor_Paint(sender As Object, e As PaintEventArgs) Handles Me.Paint

        'pulizia sist grafico con pittura nera
        e.Graphics.Clear(Color.Black)
        '--------------------------------------------

        DrwPieOrg(e) '                      Routine che disegna il cerchietto dell'origine
        DrwPercorsi(e) '                    Routine che disegna i percorsi del disegno da visualizzare

    End Sub