Seçenekleri ayarlarını denetleme
Etkinleştirmek veya birçok sayfalarında ayarını devre dışı bırakmak için kod yazabilirsiniz seçenekleri iletişim kutusu (bundan böyle olarak anılacak Options sayfalarýný). Yalnızca Properties özelliği, Value özelliği ve Item yöntemi, DTE nesnesi içinde Visual Studio otomasyon modeli.
Not
Ancak birçok birçok öğesi seçenekleri sayfalarını programlı olarak erişilebilir, bazı sayfaları erişilemez öğeler içerebilir.Ayrıca, mümkündür, bir seçenekleri sayfasının kendisi erişilebilir değil.Otomasyon modelini kullanarak bir ayar etkileyemez, bunu kullanarak yapmak mümkün olabilir Visual Studio SDK.Daha fazla bilgi için bu belgede daha sonra "Ayarlar için varolan seçenekleri sayfaları ekleme" konusuna bakın.Program aracılığıyla erişilebilir seçenekler ve adlarının tam listesi için bkz: "Özellik öğesi adları" Seçenekler sayfalarında özellik öğelerin adlarını belirleme.
Açmak için seçenekleri iletişim kutusunda tümleşik geliştirme ortamında (IDE) üzerinde araçları menüsünde tıklatın seçenekleri.
Seçenekleri ayarlarını görüntüleme
Kullanım Properties toplama ve Property nesnesine erişim ayarlarının bir seçenekleri sayfa. Aşağıdaki Visual Studio örnek adları, geçerli değerleri ve öğeleri türlerini görüntüler belgeleri sayfa.
Sub PropertiesExample()
' Create and initialize a variable to represent the Documents
' Options page.
Dim envGenTab As EnvDTE.Properties = _
DTE.Properties("Environment", "Documents")
Dim prop As EnvDTE.Property
Dim msg As String
' Loop through each item in the Documents Options box.
For Each prop In envGenTab
Try
msg += ("PROP NAME: " & prop.Name & _
" VALUE: " & prop.Value) & _
" TYPE: " & prop.Value.GetType.ToString()) & vbCr
Catch
End Try
Next
MsgBox(msg)
End Sub
Aşağıdaki örnek üzerinde kullanılabilir özellikleri görüntüler seçenekleri için sayfa Task List (altında ortam düğümü). Ayrıca açıklama için kullanılabilir değerleri listeler liste Token.
Sub DisplayProperties()
' Variables to represent the properties collection
' and each property in the Options dialog box.
Dim prop As EnvDTE.Property
Dim props As EnvDTE.Properties
Dim propVals As Object()
Dim propVal, msg As String
' Represents the Task List Node under the
' Enviroment node.
props = DTE.Properties("Environment", "TaskList")
' Represents the items in the comment Token list
' and their priorities (1-3/low-high).
prop = props.Item("CommentTokens")
propVals = prop.Value
Try
' List each property name for the Options page
' and all of its possible values.
For Each prop In props
msg += "PROP NAME: " & prop.Name & vbCr
For Each propVal In propVals
msg += " Value: " & propVal & vbCr
Next
Next
MsgBox(msg)
Catch ex As System.Exception
MsgBox("ERROR: " & ex.Message)
End Try
End Sub
Bu örnek için programlanabilir ayarları listeler seçenekleri için sayfa Biçimlendirme (altında Text Editor, C#).
Sub PropertiesExample()
' Create and initialize a variable to represent the C#
' Formatting text editor options page.
Dim txtEdCSFormat As EnvDTE.Properties = _
DTE.Properties("TextEditor", "CSharp - Formatting")
Dim prop As EnvDTE.Property
Dim msg As String
' Loop through each item in the C# Formatting Options page.
For Each prop In txtEdCSFormat
msg += ("PROP NAME: " & prop.Name & " VALUE: " & _
prop.Value) & vbCr
Next
MsgBox(msg)
End Sub
Seçenekleri ayarlarını değiştirme
Yalnızca bir ayar değerini görüntülemek bir seçenekleri sayfasında, değeri de değiştirir. Aşağıdaki Visual Studio örnekler bunun nasıl yapılacağını gösterir.
Not
Denetimleri üzerinde varolan bir değeri değiştirebilirsiniz, ancak seçenekleri sayfa, ekleyemezsiniz, kaldırmak veya herhangi bir denetim veya ayarlarını değiştirin.Kendi ayarlarını belirtmek için özel bir oluşturma seçenekleri sayfa.Daha fazla bilgi için bkz. Nasıl yapılır: özel seçenekleri sayfaları oluşturma.
Boolean değerini ilk örneği (ToolOpt1) arasında geçiş yapar ReuseSavedActiveDocWindow, adı olduğu kaydettiyseniz, geçerli belge penceresini yeniden üzerinde seçenek belgeleri altında sayfa ortam düğümü.
Sub ToolOpt1()
Dim props As EnvDTE.Properties = DTE.Properties("Environment", _
"Documents")
Dim prop As EnvDTE.Property
prop = props.Item("ReuseSavedActiveDocWindow")
' If value is TRUE, change it to FALSE, or vice-versa.
MsgBox("PROP NAME: " & prop.Name & " VALUE: " & prop.Value)
prop.Value = Not (prop.Value)
MsgBox("PROP NAME: " & prop.Name & " VALUE: " & prop.Value)
' Change it to the original value.
prop.Value = Not (prop.Value)
End Sub
Aşağıdaki örnek değişiklikleri ve sonra sıfırlar sekme boyutu , değer sekmeleri bölümünde temel altında sayfa Text Editor düğümü.
Sub ToolOpt2()
Dim props As EnvDTE.Properties = DTE.Properties("TextEditor", _
"Basic")
Dim prop As EnvDTE.Property
Dim tmp As String
prop = props.Item("TabSize")
' Set a new value for Tab Size.
MsgBox("PROP NAME: " & prop.Name & " VALUE: " & prop.Value)
tmp = prop.Value
prop.Value = 10
MsgBox("PROP NAME: " & prop.Name & " VALUE: " & prop.Value)
' Change it back to the original value.
prop.Value = tmp
MsgBox("PROP NAME: " & prop.Name & " VALUE: " & prop.Value)
End Sub
Bu örnek, bir ayarı değiştirir yazı tiplerini ve renklerini altında sayfa ortam düğümü.
Sub ToolOpt3()
' Changes the background color of text in the Fonts and Colors
' page of the Options dialog box on the Tools menu.
Dim props As EnvDTE.Properties
Dim prop As EnvDTE.Property
Dim fontColorItems As EnvDTE.FontsAndColorsItems
props = DTE.Properties("FontsAndColors", "TextEditor")
prop = props.Item("FontsAndColorsItems")
fontColorItems = prop.Object
Try
MsgBox("NAME: " & prop.Name & vbCr & "BACKGROUND VALUE: " & _
CStr(fontColorItems.Item("Plain Text").Background.ToString))
' Turn the text background from its current color to red.
fontColorItems.Item("Plain Text").Background = 255
MsgBox("NAME: " & prop.Name & vbCr & "BACKGROUND VALUE: " & _
Hex(fontColorItems.Item("Plain Text").Background.ToString))
Catch ex As System.Exception
MsgBox("ERROR: " & ex.Message)
End Try
End Sub
Bu örnek için çeşitli dillerde numaralandırma satırındaki kapatır Text Editor düğümü.
Sub TurnOnLineNumbers()
DTE.Properties("TextEditor", "Basic").Item("ShowLineNumbers") _
.Value = True
DTE.Properties("TextEditor", "PlainText").Item("ShowLineNumbers") _
.Value = True
DTE.Properties("TextEditor", "CSharp").Item("ShowLineNumbers") _
.Value = True
DTE.Properties("TextEditor", "HTML/XML").Item("ShowLineNumbers") _
.Value = True
DTE.Properties("TextEditor", "C/C++").Item("ShowLineNumbers") _
.Value = True
DTE.Properties("TextEditor", "Visual JSharp") _
.Item("ShowLineNumbers").Value = True
End Sub
Ayarları varolan seçenekleri sayfalara ekleme
Kullanamazsınız Visual Studio ayarları varolan bir eklemek için otomasyon modeli seçenekleri sayfa veya bu tür bir değişiklik yapmak için varolan ayarları değiştirmek için kullanmanız gerekir Visual Studio SDK. Daha fazla bilgi için bkz: Geliştirme araçları ekosistemine ortak portalı Web sitesi.
Ayrıca bkz.
Görevler
Nasıl yapılır: özel seçenekleri sayfaları oluşturma
Nasıl yapılır: pencere özelliklerini değiştirme
Nasıl yapılır: bir eklenti oluşturmak
İzlenecek yol: bir sihirbaz oluşturma
Kavramlar
Diğer Kaynaklar
Oluşturma ve ortam Windows denetleme