Window2.Activate メソッド
現在の項目にフォーカスを移動します。
名前空間: EnvDTE80
アセンブリ: EnvDTE80 (EnvDTE80.dll 内)
構文
'宣言
Sub Activate
void Activate()
void Activate()
abstract Activate : unit -> unit
function Activate()
解説
Activate が呼び出されたときの動作は、ユーザーがアイテムをクリックしたときの動作と同じですが、クリック イベントは発生しません。
例
この例では、テキスト ファイルをアクティブ ウィンドウにします。次に、そのテキスト ファイルを使用してウィンドウのコレクションを反復処理し、このウィンドウを含むプロジェクトとプロジェクト項目の名前を表示します。
この例を実行する前に、Visual Studio でプロジェクトを開き、"TextFile1.txt" という名前のテキスト ファイルを追加して、アクティブ ウィンドウにします。
このアドインの例を実行する方法の詳細については、「方法 : オートメーション オブジェクト モデルのコード例をコンパイルおよび実行する」を参照してください。
Imports EnvDTE
Imports EnvDTE80
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)
WinActivateExample(_applicationObject)
End Sub
Sub WinActivateExample(ByVal dte As DTE2)
Try
' Before running, create a text file named
' "TextFile1.txt", include it in your solution,
' and make it the active window.
Dim win As Window2
Dim doc As Document
If _applicationObject.Documents.Count > 0 Then
doc = _applicationObject.Documents.Item("TextFile1.txt")
win = CType(doc.ActiveWindow, Window2)
' Show the name of the Project that contains this
' window and document.
MsgBox("The project that contains this window is named:" _
& win.Project.Name)
' Activate the window.
win.Activate()
' Other available windows.
Dim w As String = "Other available windows in _
the collection:" & vbCr
For Each wi As Window2 In win.Collection
w = w & wi.Caption & vbCr
Next
MsgBox(w)
' Close the window.
win.Close(vsSaveChanges.vsSaveChangesNo)
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
using EnvDTE;
using EnvDTE80;
using System.Windows.Forms;
public void OnConnection(object application,
ext_ConnectMode connectMode, object addInInst, ref Array custom)
{
_applicationObject = (DTE2)application;
_addInInstance = (AddIn)addInInst;
WinActivateExample(_applicationObject);
}
public void WinActivateExample(DTE2 dte)
{
try
{
// Before running, create a text file named
// "TextFile1.txt" and include it in your solution.
// You do not need to make it the active window.
Window win;
Document doc;
if (dte.Documents.Count > 0)
{
doc = dte.Documents.Item("TextFile1.txt");
win = doc.ActiveWindow;
// Show the name of the project that contains this
// window and document.
MessageBox.Show(win.Project.Name);
win.Activate(); // Activate the window
// Show the name of the current ProjectItem in the window.
MessageBox.Show(win.ProjectItem.Name);
// How many other windows are available?
string w = "Other available windows in the collection:\n";
foreach (Window wi in win.Collection)
{
w = w + wi.Caption + "\n";
}
// Close the window.
win.Close(vsSaveChanges.vsSaveChangesNo);
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
.NET Framework セキュリティ
- 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。