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
Les membres connectés peuvent publier, suivre les mises à jour, et plus encore. Nouveau ici ? Inscrivez-vous gratuitement.
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.