Passa ai contenuti principali

VB.NET: SplashScreen con effetto fade-in

In questo post vorrei proporvi un modo per realizzare una splash screen per le nostre applicazioni Windows Form che appare progressivamente con un effetto fade.

Supponiamo di avere il nostro progetto VB.NET in una soluzione Visual Studio 2008 in cui abbiamo il sorgente della nostra applicazione Windows Form.

Inseriamo una splash screen utilizzando il menù Progetto->Aggiungi Nuovo Elemento

captured_Image.png

e selezionando il tipo di elemento “Schermata Iniziale”

captured_Image.png[5]

A questo punto Visual Studio creerà, automaticamente, la schermata iniziale che possiamo personalizzare graficamente come vogliamo.

captured_Image.png[7]

Per poter fare in modo che questa finestra appaia nel momento in cui avviamo l’applicazione, è necessario aprire le proprietà del progetto e impostare la maschera di avvio:

captured_Image.png[9]

In questo modo, all’avvio dell’applicazione, la schermata appare immediatamente e scompare un attimo prima della visualizzazione della finestra dell’applicazione.

Possiamo far apparire la schermata iniziale con un effetto di tipo fade-in, inserendo un componente timer all’interno della form iniziale (che chiameremo tmrShow):

captured_Image.png[11]

e gestendo la progressiva visualizzazione (agendo sulla proprietà Opacity della form) all’interno dell’evento Tick del timer:

Private Sub tmrShow_Tick(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles tmrShow.Tick
    SetWindowOpacity(Me.Opacity + 0.05)
End Sub

Il metodo SetWindowOPacity ci permette di impostare l’opacità della form:

Protected Delegate Sub SetWindowOpacityDelegate(ByVal opacity As Double)
Protected Sub SetWindowOpacity(ByVal opacity As Double)
    If Me.InvokeRequired Then
        Me.Invoke(New SetWindowOpacityDelegate(AddressOf SetWindowOpacity), _
            opacity)
    Else
        If opacity >= 0 And opacity <= 1 Then
            Me.Opacity = opacity
        ElseIf opacity < 0 Then
            Me.Opacity = 0
        Else
            Me.Opacity = 1
        End If
    End If
End Sub

Osserviamo che siamo costretti ad utilizzare il metodo Invoke della classe Control per non ottenere errore nel momento in cui si effettua la valorizzazione della proprietà Opacity da un thread (quello del Timer) che non è il thread “proprietario” del controllo.

Questa è una tecnica da utilizzare sempre nel momento in cui si ha la necessità di aggiornare controlli Windows Form in maniera asincrona.

Il metodo Invoke, infatti, ci permette di eseguire del codice nel thread principale del controllo in modo da non ottenere una chiamata cross-thread. Il metodo di aggiornamento dovrebbe essere il più ottimizzato possibile e non richiedere troppo tempo per essere eseguito per non bloccare il thread principale dell’applicazione (e, quindi, l’applicazione stessa). Per sapere se è necessario l’utilizzo del metodo Invoke (cioè se non ci troviamo già nel thread principale), dobbiamo utilizzare la proprietà InvokeRequired.

Per completare l’opera ed ottenere una schermata iniziale che appare lentamente, è sufficiente impostare a 0 la proprietà Opacity della form iniziale:

captured_Image.png[13]

La velocità del fade si può manipolare giocando sulla proprietà Interval del Timer e sul valore numerico 0,05 presente nel gestore di evento del Tick del timer stesso.

 

Commenti

Post popolari in questo blog

VB.NET: Convertire un file DOC in RTF e PDF con office interop

In questo post vorrei proporvi del codice per poter convertire un file .doc in un file .rtf oppure .pdf utilizzando le API di interoperabilità di Office.Creeremo una classe, DocConverter, che esporrà le due funzionalità sopra citate.Cominciamo con il prevedere un attributo privato della classe che rappresenterà l’applicazione Word che utilizzeremo per la conversione. Creeremo l’istanza dell’attributo privato all’interno del costruttore della classe:PublicSubNew()
IfNot CreateWordApp() Then
ThrowNew ApplicationException("Assembly di interoperabilità con Office non trovato!")
EndIf
EndSub
Private _wordApp As Word.ApplicationClass
ProtectedFunction CreateWordApp() AsBoolean
Dim retval = True
Try
_wordApp = New Word.ApplicationClass()
_wordApp.Visible = False
Catch ex As System.Exception
_wordApp = Nothing
retval = False
EndTry
Return retval
EndFunction

La conversione del file doc sarà effettuata aprendo il file stesso ed eseguendo un’operazione di SaveAs:

Pr…

Cambiare la lingua di Visual Studio 2008

Oggi ho avuto qualche problema installando Windows Mobile 6 Professional SDK Refresh e Windows Mobile 6 Standard SDK Refresh.Scaricati i file di installazione e installati, ho provato a creare un progetto di tipo Windows Mobile 6.0 e mi sono beccato questo errore:Dopo qualche smanettamento abbiamo scoperto (e ringrazio il mitico Matteo per l’aiuto) che il mio Visual Studio 2008, pur essendo in Inglese (prova ne era il fatto che gli hotfix e la SP installata erano nella lingua di Albione) aveva come lingua impostata quella del sistema operativo (italiano).Ovviamente, non avrebbe mai potuto trovare la cartella 1040 (italiano) visto che l’installazione dell’SDK aveva supposto che la lingua del Visual Studio fosse Inglese (1033).La soluzione del problema è duplice:1) Duplicate la cartella 1033 presente nel percorso evidenziato dall’errore e la rinominate 10402) cambiate la lingua di Visual Studio.Per questa ultima eventualità basta andare nel menù Strumenti/Opzioni:e cambiare il linguaggi…

Tascam DR-05 registratore digitale per tutti

Diverso tempo fa ho acquistato il registratore digitale Tascam DR-05 e, ora, dopo diversi mesi di utilizzo, posso dire la mia a proposito.

Si tratta di un ottimo registratore digitale con microfono stereo che permette di ottenere registrazioni di ottima qualitaà anche in ambienti non perfetti dal punto di vista acustico.

Interessante la possibilità di utilizzare un cavalletto di piccole dimensioni come HAMA Mini treppiede o Mini Cavalletto Universale per tenere il microfono sollevato dal tavolo in fase di registrazione grazie allàattacco universale per macchina fotografica che il microfono ha nella parte inferiore.

Da segnalare anche il menu’ ben fatto e la possibilita’ di utilizzare una scheda SD esterna per memorizzare i file audio. Anche a livello di consumo batterie non e’ niente male. Consiglio l’uso delle alcaline non ricaricabili.

Il mio utilizzo e’ stato prettamente di registrazione di podcast vocali (no musica) ma le recensioni confermano che se la cava egregiamente con la mu…