Solution2.Globals Özellik
Alır Globals çözüm (.sln) dosyası, proje dosyasını veya kullanıcının profil verileri kaydedilen herhangi bir değişken değeri içeren nesne.
Ad alanı: EnvDTE80
Derleme: EnvDTE80 (EnvDTE80.dll içinde)
Sözdizimi
'Bildirim
ReadOnly Property Globals As Globals
Globals Globals { get; }
property Globals^ Globals {
Globals^ get ();
}
abstract Globals : Globals
function get Globals () : Globals
Özellik Değeri
Tür: EnvDTE.Globals
Globals nesnesi
Notlar
Eklentiler, çözüm yüklendiğinde kullanılabilir.
Globalseklentiler ile ilgili olmak zorunda değildir; Bunlar ayrıca makroları veya herhangi bir otomasyon istemci ile ilişkili olabilir.
Örnekler
Bu eklenti kodu çalıştırma hakkında daha fazla bilgi için bkz: Nasıl yapılır: derlemek ve Otomasyon nesne modeli kod örneklerini çalıştırmak.
Aşağıdaki örnek, bir Genel deðiþken açýk bir çözüm ekler ve çözümünde genel değişkenleri görüntüler.
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 Solution2 = _
CType(_applicationObject.Solution, Solution2)
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
//you will need to add this reference to your project as well
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
{
Solution2 soln = (Solution2)_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);
}
}
.NET Framework Güvenliği
- Anında arayanlar için tam güven. Bu üye kısmen güvenilen kodla kullanılamaz. Daha fazla bilgi için bkz. Kısmen güvenilen kod kitaplıklarını kullanma.
Ayrıca bkz.
Başvuru
Diğer Kaynaklar
Nasıl yapılır: derlemek ve Otomasyon nesne modeli kod örneklerini çalıştırmak