Differenze tra le versioni di "Modificare il colore e la dimensione del font del testo del ToolTip"

Da Gambas-it.org - Wikipedia.
 
(Una versione intermedia di uno stesso utente non è mostrata)
Riga 1: Riga 1:
Poiché la Proprietà ''ToolTip'' supporta i TAG del protocollo HTML <SUP>&#091;[[#Note|nota 1]]&#093;</sup>, noi possiamo usare quei TAG per apportare varie modifiche e impostazioni al ''ToolTip''.
+
Poiché la Proprietà ".ToolTip" supporta i TAG del protocollo HTML <SUP>&#091;[[#Note|nota 1]]&#093;</sup>, noi possiamo usare quei TAG per apportare varie modifiche e impostazioni al ''ToolTip''.
 
<BR>Si dovrà usare la risorsa grafica '''QT'''.
 
<BR>Si dovrà usare la risorsa grafica '''QT'''.
  
Riga 15: Riga 15:
 
     .Tooltip = "&#060;'''FONT Color'''=red '''size'''=" & CStr(FONTSIZE) & ">" &
 
     .Tooltip = "&#060;'''FONT Color'''=red '''size'''=" & CStr(FONTSIZE) & ">" &
 
               "&#060;'''SPAN style=background-color''':lightgreen>" & Label1.Text
 
               "&#060;'''SPAN style=background-color''':lightgreen>" & Label1.Text
 +
    .X = 10
 +
    .Y = 20
 
     .W = .Font.TextWidth(.Text)
 
     .W = .Font.TextWidth(.Text)
 
     .H = .Font.TextHeight(.Text)
 
     .H = .Font.TextHeight(.Text)

Versione attuale delle 18:54, 20 lug 2024

Poiché la Proprietà ".ToolTip" supporta i TAG del protocollo HTML [nota 1], noi possiamo usare quei TAG per apportare varie modifiche e impostazioni al ToolTip.
Si dovrà usare la risorsa grafica QT.

Mostriamo di seguito un esempio pratico, nel quale modificheremo il colore del testo e la dimensione del suo Font:

Private Const FONTSIZE As Byte = 18


Public Sub Form_Open()

 With Label1
   .Border = Border.Plain
   .Font.Size = FONTSIZE
   .Text = "Vita non suavis esse potest,\nnec mors amara."
' Imposta un colore per i caratteri del testo, contenuto dal "Tooltip" della "Label", una loro dimensione e infine un colore per il loro sfondo:
   .Tooltip = "<FONT Color=red size=" & CStr(FONTSIZE) & ">" &
              "<SPAN style=background-color:lightgreen>" & Label1.Text
   .X = 10
   .Y = 20
   .W = .Font.TextWidth(.Text)
   .H = .Font.TextHeight(.Text)
 End With

End


Note

[1] Vedere al riguardo la seguente pagina della Wiki: Oggetti grafici e di testo che supportano il codice HTML