Creare un Form trasparente: differenze tra le versioni

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
Nessun oggetto della modifica
Nessun oggetto della modifica
 
(3 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
Per creare o rendere un ''Form'' (o anche una finestra della Classe ''Window'') completamente trasparente, si possono adottare alcune modalità.
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''==
==Agendo sulle Proprietà ".Transparent" e ".Border" dell'Oggetto ''Form''==
Riga 10: Riga 10:
  End
  End


==Agendo sulla Proprietà ".Opacity":==
==Agendo sulle Proprietà ".Opacity" e ".Border" dell'Oggetto ''Form''==
  Public Sub Form_Open()
  Public Sub Form_Open()
   
   
Riga 18: 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.