Spostare un Ballon: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
Nessun oggetto della modifica |
Nessun oggetto della modifica |
||
| Riga 23: | Riga 23: | ||
'''Public''' Sub Button2_Click() | '''Public''' Sub Button2_Click() | ||
<FONT color=#006400>' ''...volendo, si potrà anche chiudere anticipatamente il "Balloon":'' | <FONT color=#006400>' ''...volendo, si potrà anche chiudere anticipatamente il "Balloon":''</font> | ||
dw.Close | dw.Close | ||
'''End''' | '''End''' | ||
Versione delle 18:30, 13 ott 2012
Come è noto, l'impostazione del Balloon prevede, fra l'altro, la possibilità di posizionare tale oggetto anche alle coordinate da noi scelte. Poiché il Balloon è una finestra, potremo, come ogni altra finestra, effettuare un suo spostamente anche dopo la sua apparizione sul desktop.
Private dw As DesktopWindow
Public Sub Button1_Click()
Dim i As Integer
With Desktop
' Si porrà il numero di "indice" della finestra del "Balloon",
' per poter individuare il suo PID:
i = .Windows[num_index].Id
End With
dw = New DesktopWindow(i)
' Si imposteranno le coordinate per determinare lo spostamento:
dw.Move(x, y)
End
Public Sub Button2_Click()
' ...volendo, si potrà anche chiudere anticipatamente il "Balloon":
dw.Close
End