Windows.CreateLinkedWindowFrame メソッド

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

Window オブジェクトを作成して 2 つのウィンドウを配置します。

名前空間 : EnvDTE
アセンブリ : EnvDTE (EnvDTE.dll 内)

構文

'宣言
Function CreateLinkedWindowFrame ( _
    Window1 As Window, _
    Window2 As Window, _
    Link As vsLinkedWindowType _
) As Window
'使用
Dim instance As Windows
Dim Window1 As Window
Dim Window2 As Window
Dim Link As vsLinkedWindowType
Dim returnValue As Window

returnValue = instance.CreateLinkedWindowFrame(Window1, _
    Window2, Link)

Window CreateLinkedWindowFrame(
    Window Window1,
    Window Window2,
    vsLinkedWindowType Link
)

Window^ CreateLinkedWindowFrame(
    [InAttribute] Window^ Window1, 
    [InAttribute] Window^ Window2, 
    [InAttribute] vsLinkedWindowType Link
)

function CreateLinkedWindowFrame(
    Window1 : Window, 
    Window2 : Window, 
    Link : vsLinkedWindowType
) : Window

パラメータ

Window1
型 : EnvDTE.Window

必ず指定します。もう一方にリンクする 1 つ目の Window オブジェクトを指定します。

Window2
型 : EnvDTE.Window

必ず指定します。もう一方にリンクする 2 つ目の Window オブジェクトを指定します。

Link
型 : EnvDTE.vsLinkedWindowType

必ず指定します。ウィンドウの結合方法を示す vsLinkedWindowType 定数を指定します。

戻り値

型 : EnvDTE.Window

Window オブジェクト。

解説

引数 Window の順序によって、リンクウィンドウの順序が決まります。リンクする 2 つのウィンドウは、表示されている必要があります。一方のウィンドウが非表示になっていると、例外が発生します。ウィンドウを表示するには、Visible プロパティを使用します。

例

Sub CreateLinkedWindowFrameExample()
   Dim Frame As Window
   Dim w1 As Window = _
   DTE.Windows.Item(Constants.vsWindowKindSolutionExplorer)
   Dim w2 As Window = DTE.Windows.Item(Constants.vsWindowKindOutput)
   Dim w3 As Window = _
   DTE.Windows.Item(Constants.vsWindowKindCommandWindow)

   ' Create a linked window frame and dock Solution Explorer 
   ' and the Ouput window together inside it.
   Frame = DTE.Windows.CreateLinkedWindowFrame(w1, w2, _
   vsLinkedWindowType.vsLinkedWindowTypeDocked)
   MsgBox("Total number of windows in the linked window frame: " & _
   Frame.LinkedWindows.Count)

   ' Add another tool window, the Command window, to the frame with 
   ' the other two.
   Frame.LinkedWindows.Add(w3)
   MsgBox("Total number of windows in the linked window frame: " & _
   Frame.LinkedWindows.Count)

   ' Resize the entire linked window frame.
   Frame.Width = 500
   Frame.Height = 600
   MsgBox("Frame height and width changed. Now changing Command window _
   height.")

   ' Resize the height of the Command window.
   Frame.LinkedWindows.Item(3).Height = 800
   MsgBox("Now undocking the Command window from the frame.")

   ' Undock the Command window from the frame.
   Frame.LinkedWindows.Remove(w3)
End Sub