Daniele Bariletti
25 lines
884 B
VB.net
25 lines
884 B
VB.net
Public Class RotateV
|
|
Private RotateOperation As RotateVM
|
|
Sub New()
|
|
|
|
' La chiamata è richiesta dalla finestra di progettazione.
|
|
InitializeComponent()
|
|
RotateOperation = New RotateVM
|
|
' Aggiungere le eventuali istruzioni di inizializzazione dopo la chiamata a InitializeComponent().
|
|
Dim PartSolidSel As PartSolidM = SolidManagerM.GetPartSolid(Map.refSceneHostV.m_nIdPart)
|
|
If IsNothing(PartSolidSel) Then Annulla_click()
|
|
PartSolidSel.ShowAxis()
|
|
End Sub
|
|
Private Sub Conferma_click() Handles Conferma.Click
|
|
RotateOperation.Conferma(Me)
|
|
End Sub
|
|
|
|
Private Sub Annulla_click() Handles Annulla.Click
|
|
RotateOperation.Annulla(Me)
|
|
End Sub
|
|
|
|
Public Sub AngText_Changed() Handles RotInputData.TextChanged
|
|
If Not IsNothing(Map.refSceneButtonV.m_RotateUC) Then RotateOperation.AngText_Changed()
|
|
End Sub
|
|
End Class
|