Private Sub dkwHotLink_Move(sender As Object, e As System.EventArgs) Handles Me.Move Dim pdockWindowManager As IDockableWindowManager pdockWindowManager = DirectCast(My.ArcMap.Application, IDockableWindowManager) If Not pdockWindowManager Is Nothing Then Dim pUID As UID = New UIDClass pUID.Value = "GeoData_Institute_University_HER_AddIn_dkwHotLink" Dim pDockableWindow As IDockableWindow pDockableWindow = pdockWindowManager.GetDockableWindow(pUID) If pDockableWindow.IsVisible Then Dim pWindowPosition As IWindowPosition pWindowPosition = pDockableWindow If pWindowPosition.State = esriWindowState.esriWSFloating Then pWindowPosition.Height = 560 pWindowPosition.Width = 349 Me.Refresh() End If End If End If End Sub
Angemeldete Mitglieder können Beiträge verfassen, Updates folgen und mehr. Neu hier? Registriere ein kostenloses Konto.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.