Uso della classe Watcher - Cronologia

Vuott il 17:23, 26 nov 2024

2024-11-26T17:23:53Z

← Versione meno recente		Versione delle 11:23, 26 nov 2024
Riga 1:		Riga 1:
	La classe '''Watcher''' implementa un Oggetto che può ''osservare'' un qualsiasi "Controllo" e sollevare alcuni eventi quando succede qualcosa su di esso.		La classe '''Watcher''' implementa un Oggetto che può ''osservare'' un qualsiasi "Controllo" 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''.		<BR>Questa classe è particolarmente utile per sapere quando un Controllo (Oggetto o Contenitore) viene ''spostato'', ''ridimensionato'', reso ''visibile'' o ''nascosto''.

	Esempio:		Esempio:

Vuott il 13:35, 27 set 2023

2023-09-27T13:35:13Z

← Versione meno recente		Versione delle 07:35, 27 set 2023
Riga 1:		Riga 1:
	La classe '''Watcher''' implementa un ~~oggetto~~ che può osservare un qualsiasi "Controllo" e sollevare alcuni eventi quando succede qualcosa su di esso.		La classe '''Watcher''' implementa un Oggetto che può ''osservare'' un qualsiasi "Controllo" 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''.		Questa classe è particolarmente utile per sapere quando un Controllo (Oggetto o Contenitore) viene ''spostato'', ''ridimensionato'', reso ''visibile'' o ''nascosto''.

Vuott il 02:42, 6 ago 2023

2023-08-06T02:42:01Z

← Versione meno recente		Versione delle 20:42, 5 ago 2023
Riga 7:		Riga 7:


	~~'''~~Public~~'''~~ Sub Form_Open()		Public Sub Form_Open()

	<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".''
Riga 13:		Riga 13:
	w = New Watcher(Button2) As "<FONT color=#B22222>Osservazione</font>"		w = New Watcher(Button2) As "<FONT color=#B22222>Osservazione</font>"

	~~'''~~End~~'''~~		End

	~~'''~~Public~~'''~~ Sub Button1_Click()
			Public Sub Button1_Click()

	<FONT color=#006400>' ''Nasconde l'Oggetto grafico (il "Button2") osservato:''</font>		<FONT color=#006400>' ''Nasconde l'Oggetto grafico (il "Button2") osservato:''</font>
	Button2.Hide		Button2.Hide

	~~'''End'''~~

	~~'''Public''' Sub <FONT color=#B22222>Osservazione</font>_Hide()~~ <FONT color=#006400>' ''Se viene nascosto il Controllo “osservato” (in tal caso "Button2"), viene allora sollevato questo evento''</font>		End


			<FONT color=#006400>' ''Se viene nascosto il Controllo “osservato” (in tal caso "Button2"), viene allora sollevato questo evento:''</font>
			Public Sub <FONT color=#B22222>Osservazione</font>_Hide()

	Print “E' stato nascosto l'oggetto osservato !”		Print “E' stato nascosto l'oggetto osservato !”

	~~'''~~End~~'''~~		End
	In quest'altro esempio, invece, porremo sotto ''osservazione'' il ''Form'' principale, e con l'Evento "_Move()" della Classe "Watcher" leggeremo i valori delle Proprietà ".X" e ".Y" del ''Form'' durante il suo spostamento effettuato con il mouse:		In quest'altro esempio, invece, porremo sotto ''osservazione'' il ''Form'' principale, e con l'Evento "_Move()" della Classe "Watcher" leggeremo i valori delle Proprietà ".X" e ".Y" del ''Form'' durante il suo spostamento effettuato con il mouse:
	Private w As Watcher		Private w As Watcher


	~~'''~~Public~~'''~~ Sub Form_Open()		Public Sub Form_Open()

	w = New Watcher(Me) As "<FONT color=#B22222>Osservazione</font>"		w = New Watcher(Me) As "<FONT color=#B22222>Osservazione</font>"

	~~'''~~End~~'''~~		End


	~~'''~~Public~~'''~~ Sub <FONT color=#B22222>Osservazione</font>_Move()		Public Sub <FONT color=#B22222>Osservazione</font>_Move()

	Me.Title = CStr(Me.X) & " " & CStr(Me.Y)		Me.Title = CStr(Me.X) & " " & CStr(Me.Y)

	~~'''~~End~~'''~~		End

Vuott il 12:01, 26 mag 2023

2023-05-26T12:01:57Z

← Versione meno recente		Versione delle 06:01, 26 mag 2023
Riga 4:		Riga 4:
	Esempio:		Esempio:
	poniamo il caso di <SPAN style="text-decoration:underline">porre sotto osservazione</span> un ''Button''. Successivamente lo renderemo nascosto.		poniamo il caso di <SPAN style="text-decoration:underline">porre sotto osservazione</span> un ''Button''. Successivamente lo renderemo nascosto.
	Private w As Watcher <FONT color=#006400>' ''~~Dichiariamo~~ l'oggetto di tipo della Classe “Watcher” che osserverà il Controllo''</font>		Private w As Watcher <FONT color=#006400>' ''Dichiara l'oggetto di tipo della Classe “Watcher” che osserverà il Controllo''</font>


	'''Public''' Sub Form_Open()		'''Public''' Sub Form_Open()

	<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".''
	' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "Osservazione":''</font>		' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "Osservazione":''</font>
	w = New Watcher(Button2) As "<FONT color=#B22222>Osservazione</font>"		w = New Watcher(Button2) As "<FONT color=#B22222>Osservazione</font>"
Riga 17:		Riga 17:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	<FONT color=#006400>' ''~~Nascondiamo~~ l'~~oggetto~~ (il "Button2") osservato:''</font>		<FONT color=#006400>' ''Nasconde l'Oggetto grafico (il "Button2") osservato:''</font>
	Button2.Hide		Button2.Hide

	'''End'''		'''End'''

	'''Public''' Sub <FONT color=#B22222>Osservazione</font>_Hide() <FONT color=#006400>' ''Se viene nascosto il Controllo “osservato”, viene allora sollevato questo evento''</font>		'''Public''' Sub <FONT color=#B22222>Osservazione</font>_Hide() <FONT color=#006400>' ''Se viene nascosto il Controllo “osservato” (in tal caso "Button2"), viene allora sollevato questo evento''</font>

	Print “E' stato nascosto l'oggetto osservato !”		Print “E' stato nascosto l'oggetto osservato !”

Vuott il 11:58, 26 mag 2023

2023-05-26T11:58:57Z

← Versione meno recente		Versione delle 05:58, 26 mag 2023
Riga 3:		Riga 3:

	Esempio:		Esempio:
	poniamo il caso di <SPAN style="text-decoration:underline">porre sotto osservazione</span> un ''~~Button2~~''. Successivamente lo renderemo nascosto.		poniamo il caso di <SPAN style="text-decoration:underline">porre sotto osservazione</span> un ''Button''. Successivamente lo renderemo nascosto.
	Private w As Watcher <FONT color=#006400>' ''Dichiariamo l'oggetto di tipo della Classe “Watcher” che osserverà il Controllo''</font>		Private w As Watcher <FONT color=#006400>' ''Dichiariamo l'oggetto di tipo della Classe “Watcher” che osserverà il Controllo''</font>

Vuott il 06:37, 30 apr 2023

2023-04-30T06:37:15Z

← Versione meno recente		Versione delle 00:37, 30 apr 2023
Riga 27:		Riga 27:

	'''End'''		'''End'''
	In quest'altro esempio, invece, porremo sotto ''osservazione'' il ''Form'' principale, e con l'Evento "_Move()" della Classe "Watcher" leggeremo i valori delle Proprietà ".X" e ".Y" del ''Form'' durante il suo spostamento ~~effetuato~~ con il mouse:		In quest'altro esempio, invece, porremo sotto ''osservazione'' il ''Form'' principale, e con l'Evento "_Move()" della Classe "Watcher" leggeremo i valori delle Proprietà ".X" e ".Y" del ''Form'' durante il suo spostamento effettuato con il mouse:
	Private w As Watcher		Private w As Watcher

Riga 33:		Riga 33:
	'''Public''' Sub Form_Open()		'''Public''' Sub Form_Open()

	w = New Watcher(Me) As "Osservazione"		w = New Watcher(Me) As "<FONT color=#B22222>Osservazione</font>"

	'''End'''		'''End'''

Vuott il 06:35, 30 apr 2023

2023-04-30T06:35:53Z

← Versione meno recente		Versione delle 00:35, 30 apr 2023
Riga 11:		Riga 11:
	<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.''
	' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "Osservazione":''</font>		' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "Osservazione":''</font>
	w = New Watcher(Button2) As "<FONT color=#B22222>ev</font>"		w = New Watcher(Button2) As "<FONT color=#B22222>Osservazione</font>"

	'''End'''		'''End'''

Vuott il 14:35, 23 ago 2022

2022-08-23T14:35:46Z

← Versione meno recente		Versione delle 08:35, 23 ago 2022
Riga 27:		Riga 27:

	'''End'''		'''End'''
	In quest'altro esempio, invece, porremo sotto ''osservazione'' il ''Form'' principale, e con l'Evento "_Move()" della Classe "Watcher" leggeremo i valori delle Proprietà ".~~Width~~" e ".~~Height~~" del ''Form'' durante il suo spostamento effetuato con il mouse:		In quest'altro esempio, invece, porremo sotto ''osservazione'' il ''Form'' principale, e con l'Evento "_Move()" della Classe "Watcher" leggeremo i valori delle Proprietà ".X" e ".Y" del ''Form'' durante il suo spostamento effetuato con il mouse:
	Private w As Watcher		Private w As Watcher

Riga 39:		Riga 39:
	'''Public''' Sub <FONT color=#B22222>Osservazione</font>_Move()		'''Public''' Sub <FONT color=#B22222>Osservazione</font>_Move()

	Me.Title = CStr(Me.x) & " " & CStr(Me.Y)		Me.Title = CStr(Me.X) & " " & CStr(Me.Y)

	'''End'''		'''End'''

Vuott il 14:34, 23 ago 2022

2022-08-23T14:34:07Z

← Versione meno recente		Versione delle 08:34, 23 ago 2022
Riga 10:		Riga 10:

	<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.''
	' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "ev":''</font>		' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "Osservazione":''</font>
	w = New Watcher(Button2) As "<FONT color=#B22222>ev</font>"		w = New Watcher(Button2) As "<FONT color=#B22222>ev</font>"

Riga 22:		Riga 22:
	'''End'''		'''End'''

	'''Public''' Sub <FONT color=#B22222>ev</font>_Hide( ) <FONT color=#006400>' ''Se viene nascosto il Controllo “osservato”, viene allora sollevato questo evento''</font>		'''Public''' Sub <FONT color=#B22222>Osservazione</font>_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'''
			In quest'altro esempio, invece, porremo sotto ''osservazione'' il ''Form'' principale, e con l'Evento "_Move()" della Classe "Watcher" leggeremo i valori delle Proprietà ".Width" e ".Height" del ''Form'' durante il suo spostamento effetuato con il mouse:
			Private w As Watcher


			'''Public''' Sub Form_Open()

			w = New Watcher(Me) As "Osservazione"

			'''End'''

			'''Public''' Sub <FONT color=#B22222>Osservazione</font>_Move()

			Me.Title = CStr(Me.x) & " " & CStr(Me.Y)

	'''End'''		'''End'''

Vuott il 00:05, 30 dic 2021

2021-12-30T00:05:37Z

← Versione meno recente		Versione delle 18:05, 29 dic 2021
Riga 1:		Riga 1:
	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.		La classe '''Watcher''' implementa un oggetto che può osservare un qualsiasi "Controllo" 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''.		Questa classe è particolarmente utile per sapere quando un Controllo (Oggetto o Contenitore) viene ''spostato'', ''ridimensionato'', reso ''visibile'' o ''nascosto''.



	Esempio:		Esempio:
	poniamo il caso di <SPAN style="text-decoration:underline">porre sotto osservazione</span> un ''Button2''. Successivamente lo renderemo nascosto.		poniamo il caso di <SPAN style="text-decoration:underline">porre sotto osservazione</span> un ''Button2''. Successivamente lo renderemo nascosto.
	~~'''~~Private~~'''~~ w As Watcher <FONT color=#006400>' ''Dichiariamo l'oggetto di tipo della Classe “Watcher” che osserverà il Controllo''</font>		Private w As Watcher <FONT color=#006400>' ''Dichiariamo l'oggetto di tipo della Classe “Watcher” che osserverà il Controllo''</font>


Riga 13:		Riga 11:
	<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.''
	' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "ev":''</font>		' ''L'oggetto di tipo "Watcher" viene associato al Gruppo di nome: "ev":''</font>
	w = New Watcher(Button2) As "<FONT color=#B22222>ev</font>"		w = New Watcher(Button2) As "<FONT color=#B22222>ev</font>"

	'''End'''		'''End'''


	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	<FONT color=#006400>' ''Nascondiamo l'oggetto (il "Button2") osservato:''</font>		<FONT color=#006400>' ''Nascondiamo l'oggetto (il "Button2") osservato:''</font>
	Button2.Hide		Button2.Hide

	'''End'''		'''End'''


	'''Public''' Sub <FONT color=#B22222>ev</font>_Hide( ) <FONT color=#006400>' ''Se viene nascosto il Controllo “osservato”, viene allora sollevato questo evento''</font>		'''Public''' Sub <FONT color=#B22222>ev</font>_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'''