Egalware/EgtCAM5
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

EgtCAM5 :

Browse Source 
-Miglioramenti vari.
This commit is contained in:
Emmanuele Sassi
2016-09-06 13:50:26 +00:00
parent ac93327ea9
commit 2aeaccf30a
15 changed files with 133 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files
ProjectPage/ProjectViewModel.vb
+5 -5
View File
@@ -459,11 +459,11 @@ Namespace EgtCAM5
End If
End Sub)
Application.Msn.Register(Application.POLYGON, Sub()
If (Keyboard.Modifiers And ModifierKeys.Shift) <> ModifierKeys.Shift Then
m_Controller.ExecuteCommand(Controller.CMD.POLYGON)
Else
m_Controller.ExecuteCommand(Controller.CMD.POLYGONSIDE)
End If
'If (Keyboard.Modifiers And ModifierKeys.Shift) <> ModifierKeys.Shift Then
m_Controller.ExecuteCommand(Controller.CMD.POLYGON)
'Else
' m_Controller.ExecuteCommand(Controller.CMD.POLYGONSIDE)
'End If
End Sub)
Application.Msn.Register(Application.TEXT, Sub()
If (Keyboard.Modifiers And ModifierKeys.Shift) <> ModifierKeys.Shift Then