diff --git a/Icarus/SceneHost/MySceneHostVM.vb b/Icarus/SceneHost/MySceneHostVM.vb
index 7f52fec..c5ea2d4 100644
--- a/Icarus/SceneHost/MySceneHostVM.vb
+++ b/Icarus/SceneHost/MySceneHostVM.vb
@@ -225,7 +225,7 @@ Public Class MySceneHostVM
       Dim nTxrMaxLinPix As Integer = GetMainPrivateProfileInt(S_SCENE, K_TEXMAXLINPIX, 4096)
       EgtSetTextureMaxLinPixels(nTxrMaxLinPix)
       ' tipo snap point
-      MainScene.SetSnapPointType(SP.PT_SKETCH)
+      MainScene.SetSnapPointType(SP.PT_GRID)
       ' nascondo input box
       'Map.refFreeContourInputVM.ResetInputBox()
    End Sub