Uso della classe Watcher: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
(Nuova pagina: La classe '''Watcher''' implementa un oggetto che può osservare un qualsiasi controllo (oggetto o contenitore) e sollevare alcuni eventi quando succede qualcosa su di esso. Questa cla...) |
Nessun oggetto della modifica |
||
| Riga 13: | Riga 13: | ||
<FONT color=#006400>' ''L'oggetto di tipo della Classe “Watcher” osserverà in particolare il Controllo: Button2.'' | <FONT color=#006400>' ''L'oggetto di tipo della Classe “Watcher” osserverà in particolare il Controllo: Button2.'' | ||
''Il nome dell'evento sarà: "ev":''</font> | ' ''Il nome dell'evento sarà: "ev":''</font> | ||
w = New Watcher(Button2) As "ev" | w = New Watcher(Button2) As "ev" | ||
| Riga 27: | Riga 27: | ||
<FONT color=#006400>' ''Se viene nascosto il Controllo “osservato”, viene allora sollevato questo evento | '''Public''' Sub ev_Hide( ) <FONT color=#006400>' ''Se viene nascosto il Controllo “osservato”, viene allora sollevato questo evento''</font> | ||
Print “E' stato nascosto l'oggetto osservato !” | Print “E' stato nascosto l'oggetto osservato !” | ||
'''End''' | '''End''' | ||
Versione delle 17:45, 27 ott 2013
La classe Watcher implementa un oggetto che può osservare un qualsiasi controllo (oggetto o contenitore) e sollevare alcuni eventi quando succede qualcosa su di esso. Questa classe è particolarmente utile per sapere quando un Controllo (Oggetto o Contenitore) viene spostato, ridimensionato, reso visibile o nascosto.
Esempio: poniamo il caso di porre sotto osservazione un Button2. Successivamente lo renderemo nascosto.
Public Sub Form_Open()
' Dichiariamo l'oggetto di tipo della Classe “Watcher” che osserverà il Controllo (Oggetto o Container):
Dim w As Watcher
' L'oggetto di tipo della Classe “Watcher” osserverà in particolare il Controllo: Button2.
' Il nome dell'evento sarà: "ev":
w = New Watcher(Button2) As "ev"
End
Public Sub Button1_Click()
' Nascondiamo l'oggetto (il "Button2") osservato:
Button2.Hide
End
Public Sub ev_Hide( ) ' Se viene nascosto il Controllo “osservato”, viene allora sollevato questo evento
Print “E' stato nascosto l'oggetto osservato !”
End