Public Sub Form_Activate()
Me.Border = False
Me.Opacity = 0
EndPublic Sub Form_Activate()
Dim i as Integer
Me.Border = False
For i = 0 To 100
Me.Opacity = i
Wait 0.2
Next
Endvoglio fare un rettangolo con fondo trasparente (a richiesta), in cui il bordo (generalmente la barra del titolo) non sia visibile.
questo "rettangolo" mi serve come superficie per disegnarci varie cose.
Come primo test un semplice orologio analogico
ed uno digitale
poi l'idea e' di farne uno per le previsioni del tempo ed un altro per le news (rss).
Vorrei fare dei widget che si possano posizionare sullo schermo trascinandoli e ridimensionabili a piacimento in pratica.
in un tutorial si diceva (quello che avevo capito io in realta' almeno) che mettendo come sfondo della finestra QT una png trasparente, questa, poteva fare da maschera per la finestra stessa, e far risultare trasparente le zone senza con alfa al 100% ... (con mask on). Ma forse ho interpretato io la proprieta' ... :-(
Vorrei fare dei widget che si possano posizionare sullo schermo trascinandoli e ridimensionabili a piacimento in pratica.
...
Ora lo devo fare ridimensionabile ... ma siamo a buon punto.