---

Hallo
Ich habe aus der Api Hilfe wie man ein dockables Window erstellt.

Code:

---

Sub DockableWindow()

Dim oUserInterfaceMgr As UserInterfaceManager
Set oUserInterfaceMgr = ThisApplication.UserInterfaceManager
' Create a new dockable window
Dim oWindow As DockableWindow
Set oWindow = oUserInterfaceMgr.DockableWindows.Add("SampleClientId", "TestWindowInternalName", "Test Window")
' Get the hwnd of the dialog to be dded as a child
' CHANGE THIS VALUE!
Dim hwnd As Long
hwnd = 4851096
' Add the dialog as a child to the dockable window
Call oWindow.AddChild(hwnd)
' Don't allow docking to top and bottom
oWindow.DisabledDockingStates = kDockTop + kDockBottom

' Make the window visible
oWindow.Visible = True
End Sub

---

Ich habe auch herausgefunden wie man es wieder löscht.

Code:

---

Sub Delete_DockableWindow()
Dim oUserInterfaceMgr As UserInterfaceManager
Set oUserInterfaceMgr = ThisApplication.UserInterfaceManager
oUserInterfaceMgr.DockableWindows.Item("TestWindowInternalName").Delete
End Sub

---

Aber ich finde nirgends wie man Befehle einfügen kann?

Ich würde dort nämlich gerne die Aktuelle Darstellungsansicht der IAM oder IPT anzeigen wollen und ändern.

Ich wäre ja schonmal froh wenn ich überhaupt irgendein Befehl da reinbekommen würde, egal was.

Gruß
Berno

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Vielleciht hilft dir ja das hier weiter

------------------
MFG

Chris

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Chris

Danke vielmals, das hatte ich auch schon gefunden,
das hilft mir leider nicht weiter.

Gruß Berno

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP