diff --git a/Constants/ConstIni.vb b/Constants/ConstIni.vb
index 1af2ae0..c3a86f3 100644
--- a/Constants/ConstIni.vb
+++ b/Constants/ConstIni.vb
@@ -32,6 +32,7 @@ Module ConstIni
    Public Const K_DISABLEDELETECOMMANDHM As String = "DisableDeleteCommandH"
    Public Const K_DISABLEPROPERTIES As String = "DisableProperties"
    Public Const K_DISABLEADDGEOMETRY As String = "DisableAddGeometry"
+   Public Const K_DISABLEARCH As String = "DisableArch"
 
    Public Const S_LANGUAGES As String = "Languages"
    Public Const K_LANGUAGE As String = "Language"
diff --git a/DoorParameters/PartPageV.xaml b/DoorParameters/PartPageV.xaml
index f1f969e..b5439ed 100644
--- a/DoorParameters/PartPageV.xaml
+++ b/DoorParameters/PartPageV.xaml
@@ -238,7 +238,8 @@
                      Margin="10,2,40,4" IsReadOnly="{Binding IsRaedOnly}"/>
 
                <!--TopArc-->
-               <GroupBox Grid.Row="6" Grid.ColumnSpan="4" Margin="2,0,2,0">
+               <GroupBox Grid.Row="6" Grid.ColumnSpan="4" Margin="2,0,2,0"
+                         Visibility="{Binding VisibilityArch}">
                   <GroupBox.Header>
                      <StackPanel Orientation="Horizontal">
                         <CheckBox  Grid.Row="0" Grid.Column="5"
diff --git a/DoorParameters/PartPageVM.vb b/DoorParameters/PartPageVM.vb
index b883e41..18c68e2 100644
--- a/DoorParameters/PartPageVM.vb
+++ b/DoorParameters/PartPageVM.vb
@@ -37,6 +37,12 @@ Public Class PartPageVM
       End If
    End Sub
 
+   Public ReadOnly Property VisibilityArch As Visibility
+      Get
+         Return OptionModule.m_DisableArch
+      End Get
+   End Property
+
    Public ReadOnly Property DispositionVisibility As Visibility
       Get
          Return OptionModule.DispositionVisibility()
diff --git a/OptionsWindow/OptionModule.vb b/OptionsWindow/OptionModule.vb
index 7c8f3b2..432c2f4 100644
--- a/OptionsWindow/OptionModule.vb
+++ b/OptionsWindow/OptionModule.vb
@@ -24,6 +24,7 @@ Friend Module OptionModule
    Friend m_bBevelDown As Visibility
 
    Friend m_DisableAddGeometry As Visibility = Visibility.Collapsed
+   Friend m_DisableArch As Visibility = Visibility.Collapsed
 
    Friend m_DisableProperties As Visibility
    Friend m_PropertList As New ObservableCollection(Of PropertyItem)
@@ -220,6 +221,8 @@ Friend Module OptionModule
 
       m_DisableAddGeometry = If(GetMainPrivateProfileInt(S_GENERAL, K_DISABLEADDGEOMETRY, 1) = 0, Visibility.Visible, Visibility.Collapsed)
 
+      m_DisableArch = If(GetMainPrivateProfileInt(S_GENERAL, K_DISABLEARCH, 1) = 0, Visibility.Visible, Visibility.Collapsed)
+
       ' leggo il tipo di Bevel selezionato
       DefaultGetPrivateProfilesBevel(S_EDGE, K_BEVELU_INI, m_bBevelUp)
       DefaultGetPrivateProfilesBevel(S_EDGE, K_BEVELD_INI, m_bBevelDown)