Usare la ScrollView - Cronologia

Vuott il 11:10, 26 lug 2024

2024-07-26T11:10:30Z

← Versione meno recente		Versione delle 05:10, 26 lug 2024
Riga 22:		Riga 22:
	.Y = (Me.H * 0.5) - (.H / 2)		.Y = (Me.H * 0.5) - (.H / 2)
	<FONT Color=gray>' ''Viene attribuito un valore utile per far mostrare sia la "Scrollbar" verticale sia quella orizzontale:''</font>		<FONT Color=gray>' ''Viene attribuito un valore utile per far mostrare sia la "Scrollbar" verticale sia quella orizzontale:''</font>
	.ScrollBar = <FONT Color=~~#B22222~~>Scroll.Both</font>		.ScrollBar = <FONT Color=red>Scroll.Both</font>
	End With		End With
	With PictureBox1 = New PictureBox(ScrollView1)		With PictureBox1 = New PictureBox(ScrollView1)
Riga 30:		Riga 30:
	.H = ScrollView1.H * 1.5		.H = ScrollView1.H * 1.5
	.Border = Border.Plain		.Border = Border.Plain
	.Image = Image.Load("<FONT Color=~~gray~~>/percorso/del/file/immagine</font>")		.Image = Image.Load("<FONT Color=darkgreen>/percorso/del/file/immagine</font>")
	End With		End With

Riga 57:		Riga 57:
	.X = (Me.W * 0.5) - (.W / 2)		.X = (Me.W * 0.5) - (.W / 2)
	.Y = (Me.H * 0.5) - (.H / 2)		.Y = (Me.H * 0.5) - (.H / 2)
	.ScrollBar = Scroll.Both		.ScrollBar = Scroll<FONT Color=red>.Both</font>
	End With		End With
	With PictureBox1 = New PictureBox(ScrollView1)		With PictureBox1 = New PictureBox(ScrollView1)
Riga 65:		Riga 65:
	.H = ScrollView1.H * <FONT Color=#B22222>0.5</font>		.H = ScrollView1.H * <FONT Color=#B22222>0.5</font>
	.Border = Border.Plain		.Border = Border.Plain
	.Image = Image.Load("<FONT Color=~~gray~~>/percorso/del/file/immagine</font>")		.Image = Image.Load("<FONT Color=darkgreen>/percorso/del/file/immagine</font>")
	End With		End With

Riga 95:		Riga 95:
	.X = (Me.W * 0.5) - (.W / 2)		.X = (Me.W * 0.5) - (.W / 2)
	.Y = (Me.H * 0.5) - (.H / 2)		.Y = (Me.H * 0.5) - (.H / 2)
	.ScrollBar = Scroll.Both		.ScrollBar = Scroll<FONT Color=red>.Both</font>
	End With		End With
	With PictureBox1 = New PictureBox(ScrollView1)		With PictureBox1 = New PictureBox(ScrollView1)
Riga 111:		Riga 111:
	.H = ScrollView1.H * <FONT Color=#B22222>0.3</font>		.H = ScrollView1.H * <FONT Color=#B22222>0.3</font>
	.Border = Border.Plain		.Border = Border.Plain
	.Image = Image.Load("<FONT Color=~~gray~~>/percorso/del/file/immagine</font>")		.Image = Image.Load("<FONT Color=darkgreen>/percorso/del/file/immagine</font>")
	End With		End With

Vuott il 12:01, 20 giu 2024

2024-06-20T12:01:01Z

← Versione meno recente		Versione delle 06:01, 20 giu 2024
Riga 9:		Riga 9:
	Private PictureBox1 As PictureBox		Private PictureBox1 As PictureBox

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

	With Me		With Me
Riga 33:		Riga 33:
	End With		End With

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

	~~'''~~Public~~'''~~ Sub ScrollView1_Scroll() <FONT Color=gray>' ''Questo Evento viene sollevato, quando si agisce sulle bande laterali scorrevoli''</font>
			Public Sub ScrollView1_Scroll() <FONT Color=gray>' ''Questo Evento viene sollevato, quando si agisce sulle bande laterali scorrevoli''</font>

	Me.Text = Cstr(ScrollView1.ScrollX) & " " & Cstr(ScrollView1.Scrolly)		Me.Text = Cstr(ScrollView1.ScrollX) & " " & Cstr(ScrollView1.Scrolly)

	~~'''~~End~~'''~~		End
	Qualora, però, l'Oggetto, contenuto nella "ScrollView" - pur essendo di dimensioni inferiori alla "ScrollView" - sia posto a delle coordinate ".X" e ".Y" tali che esso debordi dalla superficie della "ScrollView", una o entrambe le bande laterali della "ScrollView" saranno mostrate.		Qualora, però, l'Oggetto, contenuto nella "ScrollView" - pur essendo di dimensioni inferiori alla "ScrollView" - sia posto a delle coordinate ".X" e ".Y" tali che esso debordi dalla superficie della "ScrollView", una o entrambe le bande laterali della "ScrollView" saranno mostrate.
	Private ScrollView1 As ScrollView		Private ScrollView1 As ScrollView
	Private PictureBox1 As PictureBox		Private PictureBox1 As PictureBox

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

	With Me		With Me
Riga 67:		Riga 68:
	End With		End With

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

	~~'''~~Public~~'''~~ Sub ScrollView1_Scroll()
			Public Sub ScrollView1_Scroll()

	Me.Text = Cstr(ScrollView1.ScrollX) & " " & Cstr(ScrollView1.Scrolly)		Me.Text = Cstr(ScrollView1.ScrollX) & " " & Cstr(ScrollView1.Scrolly)

	~~'''~~End~~'''~~		End
	===Comportamento delle bande laterali scorrevoli quando la "ScrollView" contiene più Oggetti grafici===		===Comportamento delle bande laterali scorrevoli quando la "ScrollView" contiene più Oggetti grafici===
	Nel caso in cui vi siano due o più oggetti grafici, contenuti nella "ScrollView", se gli Oggetti sono di dimensioni minori della "ScrollView", allora le bande laterali scorrevoli non appariranno.		Nel caso in cui vi siano due o più oggetti grafici, contenuti nella "ScrollView", se gli Oggetti sono di dimensioni minori della "ScrollView", allora le bande laterali scorrevoli non appariranno.
Riga 81:		Riga 83:
	Private PictureBox2 As PictureBox		Private PictureBox2 As PictureBox

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

	With Me		With Me
Riga 112:		Riga 114:
	End With		End With

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


	~~'''~~Public~~'''~~ Sub ScrollView1_Scroll()		Public Sub ScrollView1_Scroll()

	Me.Text = Cstr(ScrollView1.ScrollX) & " " & Cstr(ScrollView1.Scrolly)		Me.Text = Cstr(ScrollView1.ScrollX) & " " & Cstr(ScrollView1.Scrolly)

	~~'''~~End~~'''~~		End
	Ovviamente le bande laterali scorrevoli appariranno anche se un Oggetto grafico, contenuto nella "GridView", sia di dimensioni superiori alla "GridView" medesima.		Ovviamente le bande laterali scorrevoli appariranno anche se un Oggetto grafico, contenuto nella "GridView", sia di dimensioni superiori alla "GridView" medesima.

Vuott il 18:08, 11 ott 2021

2021-10-11T18:08:24Z

← Versione meno recente		Versione delle 12:08, 11 ott 2021
Riga 21:		Riga 21:
	.X = (Me.W * 0.5) - (.W / 2)		.X = (Me.W * 0.5) - (.W / 2)
	.Y = (Me.H * 0.5) - (.H / 2)		.Y = (Me.H * 0.5) - (.H / 2)
	.ScrollBar = Scroll.Both		<FONT Color=gray>' ''Viene attribuito un valore utile per far mostrare sia la "Scrollbar" verticale sia quella orizzontale:''</font>
			.ScrollBar = <FONT Color=#B22222>Scroll.Both</font>
	End With		End With
	With PictureBox1 = New PictureBox(ScrollView1)		With PictureBox1 = New PictureBox(ScrollView1)

Vuott il 18:05, 11 ott 2021

2021-10-11T18:05:36Z

@@ Riga 1: / Riga 1: @@
 La '''''ScrollView''''' è un "Contenitore", come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile anche usare una sola banda scorrevole o nessuna.
-<BR>Per far mostrare le bande laterali, è necessario assegnare un valore opportuno alla Proprietà ".ScrollBar" della Classe "ScrollView".
+<BR>Per far mostrare le bande laterali ("''Scrollbar'' "), è necessario assegnare un valore opportuno alla Proprietà ".ScrollBar" della Classe "ScrollView".
-<BR>Se l'Oggetto grafico, contenuto nella "ScrollView" ha una dimensione eguale o inferiore (ossia entrambe le Proprietà ".W" e ".Y" inferiore a quelle della "ScrollView"), le bande laterali scorrevoli della "ScrollView" non saranno mostrate.
 <BR>Le bande laterali scorrevoli saranno mostrate, se il valore delle due predette Proprietà ".W" e ".Y" sono superiore a quelle della "ScrollView".
 <BR>Mostriamo un esempio mediante una "PictureBox" avente dimensioni superiori alla "ScrollView" che le fa da ''Contenitore'' (ossia da Oggetto "''Padre'' "):
@@ Riga 38: / Riga 40: @@
   '''End'''
 Qualora, però, l'Oggetto, contenuto nella "ScrollView" - pur essendo di dimensioni inferiori alla "ScrollView" - sia posto a delle coordinate ".X" e ".Y" tali che esso debordi dalla superficie della "ScrollView", una o entrambe le bande laterali della "ScrollView" saranno mostrate.
-   Private ScrollView1 As ScrollView
+ Private ScrollView1 As ScrollView
   Private PictureBox1 As PictureBox
   '''Public''' Sub Form_Open()
@@ Riga 60: / Riga 99: @@
      .W = ScrollView1.W * <FONT Color=#B22222>0.5</font>
      .H = ScrollView1.H * <FONT Color=#B22222>0.5</font>
      .Border = Border.Plain
      .Image = Image.Load("<FONT Color=gray>/percorso/del/file/immagine</font>")
@@ Riga 71: / Riga 118: @@
   '''End'''
+Ovviamente le bande laterali scorrevoli appariranno anche se un Oggetto grafico, contenuto nella "GridView", sia di dimensioni superiori alla "GridView" medesima.

Vuott il 17:53, 11 ott 2021

2021-10-11T17:53:47Z

← Versione meno recente		Versione delle 11:53, 11 ott 2021
Riga 56:		Riga 56:
	End With		End With
	With PictureBox1 = New PictureBox(ScrollView1)		With PictureBox1 = New PictureBox(ScrollView1)
	.X = 300		.X = <FONT Color=#B22222>300</font>
	.Y = 200		.Y = <FONT Color=#B22222>200</font>
	.W = ScrollView1.W * 0.5		.W = ScrollView1.W * <FONT Color=#B22222>0.5</font>
	.H = ScrollView1.H * 0.5		.H = ScrollView1.H * <FONT Color=#B22222>0.5</font>
	.Border = Border.Plain		.Border = Border.Plain
	.Image = Image.Load("<FONT Color=gray>/percorso/del/file/immagine</font>")		.Image = Image.Load("<FONT Color=gray>/percorso/del/file/immagine</font>")

Vuott il 17:52, 11 ott 2021

2021-10-11T17:52:12Z

@@ Riga 26: / Riga 26: @@
      .W = ScrollView1.W * 1.5
      .H = ScrollView1.H * 1.5
      .Image = Image.Load("<FONT Color=gray>/percorso/del/file/immagine</font>")
    End With
@@ Riga 32: / Riga 33: @@
   '''Public''' Sub ScrollView1_Scroll()   <FONT Color=gray>' ''Questo Evento viene sollevato, quando si agisce sulle bande laterali scorrevoli''</font>
    Me.Text = Cstr(ScrollView1.ScrollX) & "   " & Cstr(ScrollView1.Scrolly)

Vuott il 17:45, 11 ott 2021

2021-10-11T17:45:27Z

← Versione meno recente		Versione delle 11:45, 11 ott 2021
Riga 3:		Riga 3:
	<BR>Se l'Oggetto grafico, contenuto nella "ScrollView" ha una dimensione eguale o inferiore (ossia entrambe le Proprietà ".W" e ".Y" inferiore a quelle della "ScrollView"), le bande laterali scorrevoli della "ScrollView" non saranno mostrate.		<BR>Se l'Oggetto grafico, contenuto nella "ScrollView" ha una dimensione eguale o inferiore (ossia entrambe le Proprietà ".W" e ".Y" inferiore a quelle della "ScrollView"), le bande laterali scorrevoli della "ScrollView" non saranno mostrate.
	<BR>Le bande laterali scorrevoli saranno mostrate, se il valore delle due predette Proprietà ".W" e ".Y" sono superiore a quelle della "ScrollView".		<BR>Le bande laterali scorrevoli saranno mostrate, se il valore delle due predette Proprietà ".W" e ".Y" sono superiore a quelle della "ScrollView".
			<BR>Mostriamo un esempio mediante una "PictureBox" avente dimensioni superiori alla "ScrollView" che le fa da ''Contenitore'' (ossia da Oggetto "''Padre'' "):
			Private ScrollView1 As ScrollView
			Private PictureBox1 As PictureBox

			'''Public''' Sub Form_Open()

			With Me
			.W = Screen.AvailableWidth * 0.7
			.H = Screen.AvailableHeight * 0.8
			.Center
			End With
			With ScrollView1 = New ScrollView(Me) As "ScrollView1"
			.W = Me.W * 0.5
			.H = Me.H * 0.5
			.X = (Me.W * 0.5) - (.W / 2)
			.Y = (Me.H * 0.5) - (.H / 2)
			.ScrollBar = Scroll.Both
			End With
			With PictureBox1 = New PictureBox(ScrollView1)
			.X = 0
			.Y = 0
			.W = ScrollView1.W * 1.5
			.H = ScrollView1.H * 1.5
			.Image = Image.Load("<FONT Color=gray>/percorso/del/file/immagine</font>")
			End With

			'''End'''

			'''Public''' Sub ScrollView1_Scroll() <FONT Color=gray>' ''Questo Evento viene sollevato, quando si agisce sulle bande laterali scorrevoli''</font>

			Me.Text = Cstr(ScrollView1.ScrollX) & " " & Cstr(ScrollView1.Scrolly)

			'''End'''

Vuott il 17:38, 11 ott 2021

2021-10-11T17:38:44Z

← Versione meno recente		Versione delle 11:38, 11 ott 2021
Riga 1:		Riga 1:
	La '''''ScrollView''''' è un "Contenitore", come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile anche usare una sola banda scorrevole o nessuna.		La '''''ScrollView''''' è un "Contenitore", come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile anche usare una sola banda scorrevole o nessuna.
			<BR>Per far mostrare le bande laterali, è necessario assegnare un valore opportuno alla Proprietà ".ScrollBar" della Classe "ScrollView".
			<BR>Se l'Oggetto grafico, contenuto nella "ScrollView" ha una dimensione eguale o inferiore (ossia entrambe le Proprietà ".W" e ".Y" inferiore a quelle della "ScrollView"), le bande laterali scorrevoli della "ScrollView" non saranno mostrate.
			<BR>Le bande laterali scorrevoli saranno mostrate, se il valore delle due predette Proprietà ".W" e ".Y" sono superiore a quelle della "ScrollView".

Vuott il 17:19, 11 ott 2021

2021-10-11T17:19:55Z

← Versione meno recente		Versione delle 11:19, 11 ott 2021
Riga 1:		Riga 1:
	La '''''ScrollView''''' è un "Contenitore" come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile anche usare una sola banda scorrevole o nessuna.		La '''''ScrollView''''' è un "Contenitore", come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile anche usare una sola banda scorrevole o nessuna.

Vuott: Creata pagina con "La '''''ScrollView''''' è un "Contenitore" come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile..."

2021-10-11T17:18:17Z

Creata pagina con "La '''''ScrollView''''' è un "Contenitore" come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile..."

Nuova pagina

La '''''ScrollView''''' è un "Contenitore" come una sorta di "Panel", la cui superficie può scorrere grazie alla presenza di due bande: verticale e orizzontale. E' possibile anche usare una sola banda scorrevole o nessuna.

<FONT Color=red size=4><B>Pagina in costruzione !</b></font>