Uwaga
Dostęp do tej strony wymaga autoryzacji. Może spróbować zalogować się lub zmienić katalogi.
Dostęp do tej strony wymaga autoryzacji. Możesz spróbować zmienić katalogi.
Pobiera Globals obiekt, który zawiera wartości zmiennych, które mogą być zapisane w pliku rozwiązania (.sln), plik projektu lub danych profilu użytkownika.
Przestrzeń nazw: EnvDTE100
Zestaw: EnvDTE100 (w EnvDTE100.dll)
Składnia
'Deklaracja
ReadOnly Property Globals As Globals
Globals Globals { get; }
property Globals^ Globals {
Globals^ get ();
}
abstract Globals : Globals
function get Globals () : Globals
Wartość właściwości
Typ: EnvDTE.Globals
A Globals object.
Uwagi
Dodatki są dostępne po załadowaniu roztwór, plik projektu i tak dalej.
Globalsnie są koniecznie skojarzone z dodatki; może być również związany z makr lub innego klienta automatyzacji.
Przykłady
Aby uzyskać informacje na temat uruchamiania tego dodać kod, zobacz Jak: skompilować i uruchomić przykłady kodu modelu obiektu automatyzacji.
Public Sub OnConnection(ByVal application As Object, _
ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, _
ByRef custom As Array) Implements IDTExtensibility2.OnConnection
_applicationObject = CType(application, DTE2)
_addInInstance = CType(addInInst, AddIn)
GlobalsExample(_applicationObject)
End Sub
Sub GlobalsExample(ByVal dte As DTE2)
' This add-in adds a global variable to a solution and
' displays it.
' Open a solution in
' Visual Studio before running this example.
Try
Dim soln As Solution4 = _
CType(_applicationObject.Solution, Solution4)
Dim solnName As String = _
System.IO.Path.GetFileNameWithoutExtension(soln.FullName)
Dim globals As String = ""
MsgBox("Adding global variable TempGlobal = ""TempValue""")
soln.Globals.VariableValue("TempGlobal") = "TempValue"
Dim names() As Object = _
CType(soln.Globals.VariableNames, Object())
Dim name As String
For Each name In names
globals &= " " & name & " = """ & _
soln.Globals.VariableValue(name).ToString() & """" & vbCrLf
Next
MsgBox("Solution " & solnName & _
" has the following global variables:" & _
vbCrLf & vbCrLf & globals)
Catch ex As System.Exception
MsgBox(ex.ToString)
End Try
End Sub
using System.Windows.Forms;
public void OnConnection(object application,
Extensibility.ext_ConnectMode connectMode, object addInInst,
ref System.Array custom)
{
_applicationObject = (DTE2)application;
_addInInstance = (AddIn)addInInst;
// Pass the applicationObject member variable to the code example.
GlobalsExample((DTE2)_applicationObject);
}
public void GlobalsExample(DTE2 dte)
{
// This add-in adds a global variable to the solution and
// displays it.
// Open a solution in
// Visual Studio before running this example.
try
{
Solution4 soln = (Solution4)_applicationObject.Solution;
string solnName =
System.IO.Path.GetFileNameWithoutExtension(soln.FullName);
MessageBox.Show
("Adding global variable TempGlobal = \"TempValue\"");
soln.Globals["TempGlobal"] = "TempValue";
object[] names = (object[])soln.Globals.VariableNames;
string globals = "";
foreach (string name in names)
globals += " " + name + " = \""
+ soln.Globals[name].ToString() + "\"\n";
MessageBox.Show("Solution " + solnName
+ " has the following global variables:\n\n" + globals);
}
catch(SystemException ex)
{
MessageBox.Show("ERROR: " + ex);
}
}
Zabezpieczenia programu .NET Framework
- Pełne zaufanie do bezpośredniego wywołującego. Tego elementu członkowskiego nie można używać w kodzie częściowo zaufanym. Aby uzyskać więcej informacji, zobacz Przy użyciu bibliotek z częściowo zaufanego kodu..
Zobacz też
Informacje
Inne zasoby
Jak: skompilować i uruchomić przykłady kodu modelu obiektu automatyzacji