Kontrolowanie ustawień opcji
Można napisać kod, aby uaktywnić lub dezaktywować wiele ustawień na stronach w Opcje okno dialogowe (zwaną dalej Opcje strony).Skorzystaj z Properties właściwość, Value właściwość, i Item metoda DTE obiekt w Visual Studio automatyzacji modelu.
[!UWAGA]
Chociaż wiele elementów na wielu Opcje stron można uzyskać dostęp programowy, niektóre strony mogą zawierać elementy, które są niedostępne.Ponadto, istnieje możliwość, że Opcje samej strony nie jest dostępny.Jeśli nie mogą wpływać na ustawienie przy użyciu automatyzacji modelu, można to zrobić za pomocą Visual Studio SDK.Aby uzyskać więcej informacji zobacz "Dodawanie ustawienia do istniejących opcji stron" w dalszej części tego dokumentu.Aby uzyskać listę programowo dostępne opcje i ich dokładnej nazwy, zobacz "Nazw właściwości elementu" w Określanie nazw właściwości elementów na stronach opcje.
Aby otworzyć Opcje okno dialogowe w zintegrowane środowisko programistyczne (IDE), na Narzędzia menu, kliknij przycisk Opcje.
Wyświetlanie ustawień opcji
Użycie Properties kolekcji i Property obiektowi ustawień dostępu dla Opcje strony.W poniższym przykładzie Visual Studio Wyświetla nazwy, bieżące wartości i typy elementów na dokumenty strony.
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
Poniższy przykład wyświetla właściwości dostępne na Opcje stronę Listy zadań (w obszarze środowiska węzła).To także Wyświetla listę dostępnych wartości komentarza Token listy.
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
W tym przykładzie przedstawiono programowalne ustawienia dla Opcje stronę Formatowanie (w obszarze Edytor tekstu, 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
Zmienianie ustawień opcji
Nie tylko możesz wyświetlać wartość ustawienia na Opcje strony, można również zmienić wartość.W poniższych przykładach Visual Studio pokazano, jak to zrobić.
[!UWAGA]
Chociaż można zmienić wartości formantów w istniejącej Opcje strona, nie można dodać, usunąć lub zmodyfikować formantów lub ustawienia.Aby określić własne ustawienia, należy utworzyć niestandardowy Opcje strony.Aby uzyskać więcej informacji, zobacz Jak: Tworzenie niestandardowych stron apletu Opcje.
Pierwszy przykład (ToolOpt1) Włącza/wyłącza wartość logiczna ReuseSavedActiveDocWindow, który nazywa się ponownie użyć bieżącego okna dokumentu, jeśli zapisywany opcję dokumenty stronie pod środowiska węzła.
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
Następujący przykład zmiany, a następnie resetuje Rozmiar tabulatora wartość w kart sekcji podstawowych stronie pod Edytor tekstu węzła.
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
W tym przykładzie zmieni ustawienie na czcionki i kolory stronie pod środowiska węzła.
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
W tym przykładzie włącza numerowanie kilka języków w Edytor tekstu węzła.
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
Dodawanie ustawień do istniejących stron opcje
Nie można użyć Visual Studio model automatyzacji, aby dodać ustawienia w istniejącym Opcje stronie, albo aby zmienić istniejące ustawienia, aby wprowadzić te zmiany, należy użyć Visual Studio SDK.Aby uzyskać więcej informacji, zobacz Portal partnerów ekosystem narzędzi rozwoju witryny sieci Web.
Zobacz też
Zadania
Jak: Tworzenie niestandardowych stron apletu Opcje
Jak: Zmienianie właściwości okna
Instruktaż: Tworzenie kreatora
Koncepcje
Wykres modelu obiektu automatyzacji
Inne zasoby
Tworzenia i kontrolowania środowisku systemu Windows.