domenica 3 luglio 2011

Caliburn.Micro, NuGet, Visual Basic.Net e Windows Phone 7

No, non mi sono sbagliato e ho ripubblicato un precedente post, semplicemente si tratta della versione del precedente post per WP7.

Anche in questo caso, se tentiamo di utilizzare Caliburn.Micro tramite NuGet in un progetto VB.NET per WP7, otteniamo che le classi che il package NuGet genera sono per C#.

Ma procediamo con ordine, per cominciare accertiamoci di aver installato ed abilitato NuGet tra le estensioni di VS (basta vedere se con il tasto destro su un progetto appare il menù contestuale “Add Library Package Reference…”). Se non abbiamo NuGet, possiamo installarlo utilizzando l’Extension Manager del menù Tools.

Come secondo passo creiamo un nuovo progetto WP7 e, una volta che Visual Studio ha terminato la procedura di creazione, selezioniamo il nostro progetto e scegliamo il comando “Manage NuGet Packages…” che compare con la pressione del tasto destro del mouse.

image

Digitiamo “Caliburn” nella casella di ricerca della finestra di NuGet che appare subito dopo:

SNAGHTMLcccd77d

Premendo il tasto install, il package NuGet provvede a creare le opportune classi (che abbiamo detto essere in C#) che servono per il funzionamento di Caliburn.Micro su WP7. In particolare, come possiamo vedere nella figura in seguito, vengono create due classi: AppBoostraper.cs e MainPageViewModel.cs

image

Ovviamente, noi VB-isti non possiamo farci nulla delle classi generate quindi le cancelliamo e le sostituiamo con le seguenti:

AppBoostrapper.vb

  1. Imports Caliburn.Micro
  2.  
  3. Public Class AppBootstrapper
  4.     Inherits PhoneBootstrapper
  5.  
  6.     Dim container As PhoneContainer
  7.  
  8.     Protected Overrides Sub Configure()
  9.         container = New PhoneContainer(RootFrame)
  10.  
  11.         container.RegisterPhoneServices()
  12.         container.PerRequest(Of MainPageViewModel)()
  13.  
  14.         AddCustomConventions()
  15.     End Sub
  16.  
  17.     Protected Overrides Function GetInstance(service As System.Type, key As String) As Object
  18.         Return container.GetInstance(service, key)
  19.     End Function
  20.  
  21.     Protected Overrides Function GetAllInstances(service As System.Type) As System.Collections.Generic.IEnumerable(Of Object)
  22.         Return container.GetAllInstances(service)
  23.     End Function
  24.  
  25.     Protected Overrides Sub BuildUp(instance As Object)
  26.         container.BuildUp(instance)
  27.     End Sub
  28.  
  29.  
  30.     Public Shared Sub AddCustomConventions()
  31.         ConventionManager.AddElementConvention(Of Pivot)(Pivot.ItemsSourceProperty, "SelectedItem", "SelectionChanged").ApplyBinding = _
  32.             New Func(Of System.Type, String, System.Reflection.PropertyInfo, System.Windows.FrameworkElement, Caliburn.Micro.ElementConvention, Boolean) _
  33.             (Function(viewModelType, path, [property], element, convention)
  34.                  If (ConventionManager.GetElementConvention(GetType(ItemsControl)).ApplyBinding(viewModelType, path, [property], element, convention)) Then
  35.                      ConventionManager.ConfigureSelectedItem(element, Pivot.SelectedItemProperty, viewModelType, path)
  36.                      ConventionManager.ApplyHeaderTemplate(element, Pivot.HeaderTemplateProperty, viewModelType)
  37.                      Return True
  38.                  End If
  39.                  Return False
  40.              End Function)
  41.  
  42.         ConventionManager.AddElementConvention(Of Panorama)(Panorama.ItemsSourceProperty, "SelectedItem", "SelectionChanged").ApplyBinding = _
  43.                  New Func(Of System.Type, String, System.Reflection.PropertyInfo, System.Windows.FrameworkElement, Caliburn.Micro.ElementConvention, Boolean) _
  44.                  (Function(viewModelType, path, [property], element, convention)
  45.                       If (ConventionManager.GetElementConvention(GetType(ItemsControl)).ApplyBinding(viewModelType, path, [property], element, convention)) Then
  46.                           ConventionManager.ConfigureSelectedItem(element, Panorama.SelectedItemProperty, viewModelType, path)
  47.                           ConventionManager.ApplyHeaderTemplate(element, Panorama.HeaderTemplateProperty, viewModelType)
  48.                           Return True
  49.                       End If
  50.  
  51.                       Return False
  52.                   End Function)
  53.     End Sub
  54. End Class

MainPageViewModel.vb

  1. Public Class MainPageViewModel
  2.  
  3.    
  4. End Class

A questo punto possiamo seguire i passi descritti nel tutorial per poter configurare la nostra app all’utilizzo di Caliburn.Micro.

Il suggerimento che vi posso dare è quello di ristrutturare le cartelle dell’applicazione creando le cartelle Views e ViewModels in cui inserire le views e i viewmodels (inizialmente MainPage e MainPageViewModel) nel seguente modo:

image

Infine, visto che ci siamo, modifichiamo i namespace delle classi MainPage (namespace CaliburnMicroWP7.Views) e MainPageViewModel (namespace CaliburnMicroWP7.ViewModels).

In allegato al post trovate la soluzione completa con le classi e le modifiche.


Nessun commento: