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
Aangemelde leden kunnen berichten plaatsen, updates volgen en meer. Nieuw hier? Registreer een gratis account.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.