Differenze tra le versioni di "Creare un Form trasparente"

Da Gambas-it.org - Wikipedia.
 
(6 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
Per creare un ''Form'' (o anche una finestra della Classe ''Window'') completamente trasparente, è possibile agire sulle Proprietà ".Transparent" e ".Border" dell'Oggetto ''Form'':
+
Per creare o rendere un ''Form'' (o anche una finestra della Classe ''Window'') completamente trasparente, si possono adottare almeno un paio di modalità.
 +
 
 +
==Agendo sulle Proprietà ".Transparent" e ".Border" dell'Oggetto ''Form''==
 
  Public Sub Form_Open()
 
  Public Sub Form_Open()
 
   
 
   
Riga 7: Riga 9:
 
   
 
   
 
  End
 
  End
oppure sulla Proprietà ".Opacity":
+
 
 +
==Agendo sulle Proprietà ".Opacity" e ".Border" dell'Oggetto ''Form''==
 
  Public Sub Form_Open()
 
  Public Sub Form_Open()
 
   
 
   
Riga 15: Riga 18:
 
   
 
   
 
  End
 
  End
 +
 +
==Individuare il ''Form'' trasparente sulla Scrivania==
 +
Un ''Form'' completamente trasparente e privo di bordi non è facilmente individuabile, soprattutto se di piccole dimensioni. Pertanto, ai precedenti codici si può aggiungere la seguente riga:
 +
Me.Mouse = 25  <FONT Color=gray>' ''oppure un altro valore''</font>
 +
Passando con il puntatore del mouse sul ''Form'' trasparente, il puntatore cambierà aspetto.

Versione attuale delle 04:46, 23 giu 2023

Per creare o rendere un Form (o anche una finestra della Classe Window) completamente trasparente, si possono adottare almeno un paio di modalità.

Agendo sulle Proprietà ".Transparent" e ".Border" dell'Oggetto Form

Public Sub Form_Open()

 Me.Transparent = True

 Me.Border = False

End

Agendo sulle Proprietà ".Opacity" e ".Border" dell'Oggetto Form

Public Sub Form_Open()

 Me.Opacity = 0

 Me.Border = False

End

Individuare il Form trasparente sulla Scrivania

Un Form completamente trasparente e privo di bordi non è facilmente individuabile, soprattutto se di piccole dimensioni. Pertanto, ai precedenti codici si può aggiungere la seguente riga:

Me.Mouse = 25  ' oppure un altro valore

Passando con il puntatore del mouse sul Form trasparente, il puntatore cambierà aspetto.