« il: 16 Luglio 2014, 00:06:07 »
Senza andare a spulciare fra i sorgenti, potete vedere da cosa è essenzialmente composto l'oggetto
LCDLabel con questo semplice codice (ponete su un
Form un oggetto
LCDLabel):
![Ghigno ;D](http://www.gambas-it.org/smf/Smileys/gambasit-emoticons/grin.gif)
Private segreto As String
Public Sub Form_Open()
Dim ob As Object
For Each ob In LCDLabel1.Children
segreto = Object.Type(ob)
Next
Object.Attach(ob, FMain, "OggettoSegreto")
End
Public Sub OggettoSegreto_Draw()
With Paint
.DrawRichText(segreto, 0, 0, 100, 20)
.End
End With
End
« Ultima modifica: 03 Settembre 2021, 16:26:05 da vuott »
![](https://www.gambas-it.org/smf/Themes/default/images/ip.gif)
Registrato
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »