Passa ai contenuti principali

VB for Dummies: Gli Eventi Custom

Nel precedente post di questa serie abbiamo visto cosa sono gli eventi. In questo post vedremo, invece, una specie particolare di eventi denominati “eventi custom”.

Cosa sono

Gli eventi custom sono a tutti gli effetti degli eventi ma danno la libertà allo sviluppatore di gestire tutte le fasi di vita degli stessi, cioè permettono di gestire:

  1. Aggancio degli handler;
  2. Rimozione degli handler;
  3. Esecuzione dell’evento.

Negli eventi standard (come abbiamo visto anche nel precedente post della serie) la gestione della lista dei delegate agganciati all’evento (aggiunta di un nuovo delegate, rimozione di un delegarte e invocazione dell’evento) sono a carico del compilatore e non dobbiamo preoccuparci di nulla.

Come si definiscono

Definire un evento custom è relativamente semplice, basta utilizzare la parola chiave Custom:

  1. Public Custom Event CustomEvent As MyDelegate
  2.     AddHandler(ByVal value As MyDelegate)
  3.  
  4.     End AddHandler
  5.  
  6.     RemoveHandler(ByVal value As MyDelegate)
  7.  
  8.     End RemoveHandler
  9.  
  10.     RaiseEvent()
  11.  
  12.     End RaiseEvent
  13. End Event

I custom event possono essere definiti solo urilizzando un delegate, quindi, dobbiamo definire la firma del nostro evento custom creando un delegate pubblico.

Come possiamo vedere dal precedente codice, il corpo del nostro custom event è formato da tre distinte sezioni:

  • AddHandler : è la sezione che si occupa di gestire l’accodamento di un nuovo gestore di evento. Questa sezione viene richiamata ogni qual volta che, nel codice, ci sia un’istruzione AddHandler riferita all’evento;
  • RemoveHandler: è la sezione che si occupa di gestire lo scodamento di un gestore di evento. Questa sezione viene richiamata ogni volta che, nel codice, ci sia un’istruzione RemoveHandler;
  • RaiseEvent: è la sezione che si occupa dell’invocazione dell’evento. Questa sezione viene richiamata ogni volta che, nel codice, viene eseguita un’istruzione RaiseEvent relativa all’evento.

Quando utilizzarli

Considerato il fatto che dobbiamo gestire noi la lista dei gestori di evento agganciati al nostro evento (lo possiamo fare utilizzando un MultiCastDelegate) e preoccuparci di invocare ognuno di questi nel momento in cui facciamo RaiseEvent, gli eventi custom sono da utilizzare solo quando veramente non possiamo farne a meno e, in particolare, quando vogliamo avere pieno controllo su tutte le fasi degli stessi.

Un esempio pratico

Per dare un esempio di come implementare un custom event supponiamo di voler relizzare una classe che disponga di un evento la cui modalità di invocazione sia costruita in modo da lanciare i gestori di evento associati in parallelo.

Normalmente, gli eventi standard eseguono i gestori di evento in maniera sequenziale a partire dal primo che è stato aggiunto tramite la parola chiave AddHandler.

Cominciamo definendo il delegate che rappresenta la firma del nostro evento:

  1. Public Delegate Sub MioEventoDelegate(ByVal str As String, ByVal datetime As DateTime)

Il delegate non ha, ovviamente, traccia del fatto che verrà utilizzato in un evento custom o in uno standard (e per far vedere questo la nostra classe conterrà anche un evento standard).

A questo punto definiamo l’evento custom con le strutture dati necessarie per gestire la lista dei gestori di evento:

  1. Private _EventoParalleloStore As MioEventoDelegate
  2.  
  3. Public Custom Event EventoParallelo As MioEventoDelegate
  4.     AddHandler(ByVal value As MioEventoDelegate)
  5.         If value Is Nothing Then Throw New ArgumentNullException()
  6.         Me._EventoParalleloStore = DirectCast([Delegate].Combine(Me._EventoParalleloStore, value), MioEventoDelegate)
  7.     End AddHandler
  8.  
  9.     RemoveHandler(ByVal value As MioEventoDelegate)
  10.         If value Is Nothing Then Throw New ArgumentNullException()
  11.         Me._EventoParalleloStore = DirectCast([Delegate].Remove(Me._EventoParalleloStore, value), MioEventoDelegate)
  12.     End RemoveHandler
  13.  
  14.     RaiseEvent(ByVal str As String, ByVal datetime As DateTime)
  15.         If _EventoParalleloStore IsNot Nothing Then
  16.             For Each e In _EventoParalleloStore.GetInvocationList()
  17.                 Dim thread = New Threading.Thread(AddressOf RaiseEventoParalleloThread)
  18.                 thread.Start(New ThreadParameter() With {.Delegate = e,
  19.                                                          .DateTime = datetime,
  20.                                                          .Str = str})
  21.             Next
  22.         End If
  23.     End RaiseEvent
  24. End Event


L’attributo privato _EventoParalleloStore si occupa di memorizzare la lista di gestori di evento associati all’evento. Di fatto si tratta di un MultiCastDelegate.

L’aggiunta di un gestore di evento (AddHandler) avviene utilizzando la funzione Combine tra _EventoParalleloStore e il delegate passato per argomento (value).

In maniera analoga utilizziamo il Remove della classe Delegate per rimuovere il gestore di evento.

La parte più interessante, è, infine, quella che si occupa di eseguire, in maniera parallela, i gestori di evento (RaiseEvent). In questo caso eseguiamo un ciclo su tutti i gestori presenti nella lista e, per ognuno di questi, lanciamo un thread che esegue la seguente funzione:

  1. Private Sub RaiseEventoParalleloThread(ByVal obj As Object)
  2.     Dim param = CType(obj, ThreadParameter)
  3.     param.Delegate.DynamicInvoke(param.Str, param.DateTime)
  4. End Sub

Per eseguire il gestore di evento (che lo ricordiamo è, alla fine dei conti, un delegate) è sufficiente richiamare il metodo DynamicInvoke.

Il risultato definitivo è che, quando nel codice della classe scriviamo:

  1. RaiseEvent EventoParallelo(str, DateTime.Now)

otteniamo che i gestori dell’avento eventualmente associati vengono richiamati su thread differenti in maniera parallela.

In allegato potete trovare la solution completa per Visual Studio 2010. In questa troverete una modifica relativa alla parte di invocazione dei gestori di evento in cui si utilizzano i Task.



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…