Define the Data Model and Set the Initial Data

• Aug 23, 2021
• 16 minutes to read

This topic describes how to define the business model and the business logic for WinForms and ASP.NET Web Forms applications. The applications’ business model contains two logical parts that are implemented via different ORM tools:

Logical part	ORM tool	Classes
Marketing	Entity Framework 6 (EF 6)	Customer and Testimonial
Planning	eXpress Persistent Objects (XPO)	Project and Task

It is necessary to define business classes and other XAF entities (Controllers, Actions, and others) as public to include them in the UI construction process and use them in the Application Model.

Add the Customer and Testimonial entities (EF)

1. In the Solution Explorer, right-click the SimpleProjectManager.Module\BusinessObjects folder and select Add | Class… from the context menu. Set the name to “Marketing” and click Add.

2. Replace the auto-generated file content with the following code:

   Customer (C#)

   using System.Collections.Generic;
   using System.ComponentModel;
   using System.ComponentModel.DataAnnotations.Schema;
   using System.Runtime.CompilerServices;
   using DevExpress.ExpressApp.DC;
   using DevExpress.Persistent.Base;
   
   namespace SimpleProjectManager.Module.BusinessObjects.Marketing {
       [NavigationItem("Marketing")]
       public class Customer : INotifyPropertyChanged {
           public Customer() {
               testimonials = new List<Testimonial>();
           }
           int id;
           [Browsable(false)]
           public int Id {
               get { return id; }
               protected set { SetProperty(ref id, value); }
           }
           string firstName;
           public string FirstName {
               get { return firstName; }
               set { SetProperty(ref firstName, value); }
           }
           string lastName;
           public string LastName {
               get { return lastName; }
               set { SetProperty(ref lastName, value); }
           }
           string email;
           public string Email {
               get { return email; }
               set { SetProperty(ref email, value); }
           }
           string company;
           public string Company {
               get { return company; }
               set { SetProperty(ref company, value); }
           }
           string occupation;
           public string Occupation {
               get { return occupation; }
               set { SetProperty(ref occupation, value); }
           }
           List<Testimonial> testimonials;
           [Aggregated]
           public virtual List<Testimonial> Testimonials {
               get { return testimonials; }
               set { SetProperty(ref testimonials, value); }
           }
           [NotMapped]
           public string FullName {
               get {
                   string namePart = string.Format("{0} {1}", FirstName, LastName);
                   return Company != null ? string.Format("{0} ({1})", namePart, Company) : namePart;
               }
           }
           byte[] photo;
           [ImageEditor(ListViewImageEditorCustomHeight = 75, DetailViewImageEditorFixedHeight = 150)]
           public byte[] Photo {
               get { return photo; }
               set { SetProperty(ref photo, value); }
           }
           protected void SetProperty<T>(ref T field, T value, [CallerMemberName] string propertyName = null) {
               if (!EqualityComparer<T>.Default.Equals(field, value)) {
                   field = value;
                   OnPropertyChanged(propertyName);
               }
           }
       #region the INotifyPropertyChanged members
           public event PropertyChangedEventHandler PropertyChanged;
           protected void OnPropertyChanged(string propertyName) {
               PropertyChanged?.Invoke(this, new PropertyChangedEventArgs(propertyName));
           }
       #endregion
       }
       // ...
   }
   

   Customer (VB.NET)

   Imports System.ComponentModel
   Imports System.ComponentModel.DataAnnotations.Schema
   Imports System.Runtime.CompilerServices
   Imports DevExpress.ExpressApp.DC
   Imports DevExpress.Persistent.Base
   
   <NavigationItem("Marketing")>
   Public Class Customer
       Implements INotifyPropertyChanged
       Public Sub New()
           _testimonials = New List(Of Testimonial)()
       End Sub
       Private _id As Integer
       <Browsable(False)>
       Public Property Id() As Integer
           Get
               Return _id
           End Get
           Protected Set(ByVal value As Integer)
               SetProperty(_id, value)
           End Set
       End Property
       Private _firstName As String
       Public Property FirstName() As String
           Get
               Return _firstName
           End Get
           Set(ByVal value As String)
               SetProperty(_firstName, value)
           End Set
       End Property
       Private _lastName As String
       Public Property LastName() As String
           Get
               Return _lastName
           End Get
           Set(ByVal value As String)
               SetProperty(_lastName, value)
           End Set
       End Property
       Private _email As String
       Public Property Email() As String
           Get
               Return _email
           End Get
           Set(ByVal value As String)
               SetProperty(_email, value)
           End Set
       End Property
       Private _company As String
       Public Property Company() As String
           Get
               Return _company
           End Get
           Set(ByVal value As String)
               SetProperty(_company, value)
           End Set
       End Property
       Private _occupation As String
       Public Property Occupation() As String
           Get
               Return _occupation
           End Get
           Set(ByVal value As String)
               SetProperty(_occupation, value)
           End Set
       End Property
       Private _testimonials As List(Of Testimonial)
       <Aggregated>
       Public Overridable Property Testimonials() As List(Of Testimonial)
           Get
               Return _testimonials
           End Get
           Set(ByVal value As List(Of Testimonial))
               SetProperty(_testimonials, value)
           End Set
       End Property
       <NotMapped>
       Public ReadOnly Property FullName() As String
           Get
               Dim namePart As String = String.Format("{0} {1}", FirstName, LastName)
               Return If(Company IsNot Nothing, String.Format("{0} ({1})", namePart, Company), namePart)
           End Get
       End Property
       Private _photo() As Byte
       <ImageEditor(ListViewImageEditorCustomHeight:=75, DetailViewImageEditorFixedHeight:=150)>
       Public Property Photo() As Byte()
           Get
               Return _photo
           End Get
           Set(ByVal value As Byte())
               SetProperty(_photo, value)
           End Set
       End Property
       Protected Sub SetProperty(Of T)(ByRef field As T, ByVal value As T, <CallerMemberName> Optional ByVal propertyName As String = Nothing)
           If (Not EqualityComparer(Of T).[Default].Equals(field, value)) Then
               field = value
               OnPropertyChanged(propertyName)
           End If
       End Sub
   #Region "INotifyPropertyChanged members"
       Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
       Protected Sub OnPropertyChanged(ByVal propertyName As String)
           PropertyChangedEvent?.Invoke(Me, New PropertyChangedEventArgs(propertyName))
       End Sub
   #End Region
   End Class
   ' ...
   

   Testimonial (C#)

   using System;
   // ...
   
   namespace SimpleProjectManager.Module.BusinessObjects.Marketing {
       // ...
       [NavigationItem("Marketing")]
       public class Testimonial : INotifyPropertyChanged {
           public Testimonial() {
               createdOn = DateTime.Now;
           }
           int id;
           [Browsable(false)]
           public int Id {
               get { return id; }
               protected set { SetProperty(ref id, value); }
           }
           string quote;
           public string Quote {
               get { return quote; }
               set { SetProperty(ref quote, value); }
           }
           string highlight;
           [FieldSize(512)]
           public string Highlight {
               get { return highlight; }
               set { SetProperty(ref highlight, value); }
           }
           DateTime createdOn;
           [VisibleInListView(false)]
           public DateTime CreatedOn {
               get { return createdOn; }
               internal set { SetProperty(ref createdOn, value); }
           }
           string tags;
           public string Tags {
               get { return tags; }
               set { SetProperty(ref tags, value); }
           }
           Customer customer;
           public virtual Customer Customer {
               get { return customer; }
               internal set { SetProperty(ref customer, value); }
           }
           protected void SetProperty<T>(ref T field, T value, [CallerMemberName] string propertyName = null) {
               if (!EqualityComparer<T>.Default.Equals(field, value)) {
                   field = value;
                   OnPropertyChanged(propertyName);
               }
           }
       #region INotifyPropertyChanged members
           public event PropertyChangedEventHandler PropertyChanged;
           protected void OnPropertyChanged(string propertyName) {
               PropertyChanged?.Invoke(this, new PropertyChangedEventArgs(propertyName));
           }
       #endregion
       }
   }
   

   Testimonial (VB.NET)

   ' ...
   <NavigationItem("Marketing")>
   Public Class Testimonial
       Implements INotifyPropertyChanged
       Public Sub New()
           _createdOn = Date.Now
       End Sub
       Private _id As Integer
       <Browsable(False)>
       Public Property Id() As Integer
           Get
               Return _id
           End Get
           Protected Set(ByVal value As Integer)
               SetProperty(_id, value)
           End Set
       End Property
       Private _quote As String
       Public Property Quote() As String
           Get
               Return _quote
           End Get
           Set(ByVal value As String)
               SetProperty(_quote, value)
           End Set
       End Property
       Private _highlight As String
       <FieldSize(512)>
       Public Property Highlight() As String
           Get
               Return _highlight
           End Get
           Set(ByVal value As String)
               SetProperty(_highlight, value)
           End Set
       End Property
       Private _createdOn As Date
       <VisibleInListView(False)>
       Public Property CreatedOn() As Date
           Get
               Return _createdOn
           End Get
           Friend Set(ByVal value As Date)
               SetProperty(_createdOn, value)
           End Set
       End Property
       Private _tags As String
       Public Property Tags() As String
           Get
               Return _tags
           End Get
           Set(ByVal value As String)
               SetProperty(_tags, value)
           End Set
       End Property
       Private _customer As Customer
       Public Overridable Property Customer() As Customer
           Get
               Return _customer
           End Get
           Friend Set(ByVal value As Customer)
               SetProperty(_customer, value)
           End Set
       End Property
       Protected Sub SetProperty(Of T)(ByRef field As T, ByVal value As T, <CallerMemberName> Optional ByVal propertyName As String = Nothing)
           If (Not EqualityComparer(Of T).[Default].Equals(field, value)) Then
               field = value
               OnPropertyChanged(propertyName)
           End If
       End Sub
   #Region "the INotifyPropertyChanged members"
       Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
       Protected Sub OnPropertyChanged(ByVal propertyName As String)
           PropertyChangedEvent?.Invoke(Me, New PropertyChangedEventArgs(propertyName))
       End Sub
   #End Region
   End Class
   

   Show the API description

   API	Description
   NavigationItemAttribute	Places a navigation item automatically created for the decorated class in the specified navigation group.
   AggregatedAttribute	Specifies that the decorated property is an aggregated part of an association.
   ImageEditorAttribute	Specifies the width and high of the editor that displays an image property.
   FieldSizeAttribute	Specifies the maximum number of characters that the decorated member’s editor can contain.
   VisibleInListViewAttribute	Shows or hides a column with the decorated property’s values in an initial List View.
   NotMappedAttribute	Specifies that the decorated property should not be mapped to a database.

3. Add the System.ComponentModel.DataAnnotations.dll assembly to the SimpleProjectManager.Module project.

4. Open the SimpleProjectManagerDbContext.cs (SimpleProjectManagerDbContext.vb) file within the SimpleProjectManager.Module\BusinessObjects folder. Add the Customer and Testimonial properties to the SimpleProjectManagerDbContext class to register Customer and Testimonial entities within the DbContext as shown below:

   C#

   using SimpleProjectManager.Module.BusinessObjects.Marketing;
   
   namespace  SimpleProjectManager.Module.BusinessObjects {
       public class SimpleProjectManagerDbContext : DbContext {
           //... 
           public DbSet<Customer> Customer { get; set; }
           public DbSet<Testimonial> Testimonial { get; set; }
       }
   }
   

   VB.NET

   Public Class SimpleProjectManagerDbContext
       Inherits DbContext
           '...
           Public Property Customer() As DbSet(Of Customer)
           Public Property Testimonial() As DbSet(Of Testimonial)
   End Class
   

5. In the Solution Explorer, navigate to the Module.cs (Module.vb) file and press the F7 key to open the file in the code editor. Uncomment the #if and #endif directives and code between them as shown below to specify the database initializer for EF. With this uncommented code, the database is recreated each time you change your entities.

   C#

   public sealed partial class SimpleProjectManagerModule : ModuleBase {
       static SimpleProjectManagerModule() {
           // ...
           // Uncomment this code to delete and recreate the database each time the data model has changed.
           // Do not use this code in a production environment to avoid data loss.
   #if DEBUG
           Database.SetInitializer(new DropCreateDatabaseIfModelChanges<SimpleProjectManagerDbContext>());
   #endif
       }
       // ...
   }
   

   VB.NET

   Partial Public NotInheritable Class SimpleProjectManagerModule
       Inherits ModuleBase
       Shared Sub New()
           ' ...
           ' Uncomment this code to delete and recreate the database each time the data model has changed.
           ' Do not use this code in a production environment to avoid data loss.
   #If DEBUG
           Database.SetInitializer(New DropCreateDatabaseIfModelChanges(Of SimpleProjectManagerDbContext)())
   #End If
       End Sub
       ' ...
   End Class
   

Add the Project and ProjectTask persistent classes (XPO)

1. In the Solution Explorer, right-click the SimpleProjectManager.Module\BusinessObjects folder and select Add | Class… from the context menu. Set the name to “Planning” and click Add.

2. Replace the auto-generated file content with the following code:

   ProjectTask (C#)

   using System;
   using DevExpress.Persistent.Base;
   using DevExpress.Persistent.BaseImpl;
   using DevExpress.Xpo;
   
   namespace SimpleProjectManager.Module.BusinessObjects.Planning {
       [NavigationItem("Planning")]
       public class ProjectTask : BaseObject {
           public ProjectTask(Session session) : base(session) { }
           string subject;
           [Size(255)]
           public string Subject {
               get { return subject; }
               set { SetPropertyValue(nameof(Subject), ref subject, value); }
           }
           ProjectTaskStatus status;
           public ProjectTaskStatus Status {
               get { return status; }
               set { SetPropertyValue(nameof(Status), ref status, value); }
           }
           Person assignedTo;
           public Person AssignedTo {
               get { return assignedTo; }
               set { SetPropertyValue(nameof(AssignedTo), ref assignedTo, value); }
           }
           DateTime startDate;
           public DateTime StartDate {
               get { return startDate; }
               set { SetPropertyValue(nameof(startDate), ref startDate, value); }
           }
           DateTime endDate;
           public DateTime EndDate {
               get { return endDate; }
               set { SetPropertyValue(nameof(endDate), ref endDate, value); }
           }
           string notes;
           [Size(SizeAttribute.Unlimited)]
           public string Notes {
               get { return notes; }
               set { SetPropertyValue(nameof(Notes), ref notes, value); }
           }
           Project project;
           [Association]
           public Project Project {
               get { return project; }
               set { SetPropertyValue(nameof(Project), ref project, value); }
           }
       }
       // ...
   }
   

   ProjectTask (VB.NET)

   Imports DevExpress.Xpo
   Imports DevExpress.Persistent.Base
   Imports DevExpress.Persistent.BaseImpl
   
   <NavigationItem("Planning")>
   Public Class ProjectTask
       Inherits BaseObject
       Public Sub New(ByVal session As Session)
           MyBase.New(session)
       End Sub
       Private _subject As String
       <Size(255)>
       Public Property Subject() As String
           Get
               Return _subject
           End Get
           Set(ByVal value As String)
               SetPropertyValue(NameOf(Subject), _subject, value)
           End Set
       End Property
       Private _status As ProjectTaskStatus
       Public Property Status() As ProjectTaskStatus
           Get
               Return _status
           End Get
           Set(ByVal value As ProjectTaskStatus)
               SetPropertyValue(NameOf(Status), _status, value)
           End Set
       End Property
       Private _assignedTo As Person
       Public Property AssignedTo() As Person
           Get
               Return _assignedTo
           End Get
           Set(ByVal value As Person)
               SetPropertyValue(NameOf(AssignedTo), _assignedTo, value)
           End Set
       End Property
       Private _startDate As Date
       Public Property StartDate() As Date
           Get
               Return _startDate
           End Get
           Set(ByVal value As Date)
               SetPropertyValue(NameOf(_startDate), _startDate, value)
           End Set
       End Property
       Private _endDate As Date
       Public Property EndDate() As Date
           Get
               Return _endDate
           End Get
           Set(ByVal value As Date)
               SetPropertyValue(NameOf(_endDate), _endDate, value)
           End Set
       End Property
       Private _notes As String
       <Size(SizeAttribute.Unlimited)>
       Public Property Notes() As String
           Get
               Return _notes
           End Get
           Set(ByVal value As String)
               SetPropertyValue(NameOf(Notes), _notes, value)
           End Set
       End Property
       Private _project As Project
       <Association>
       Public Property Project() As Project
           Get
               Return _project
           End Get
           Set(ByVal value As Project)
               SetPropertyValue(NameOf(Project), _project, value)
           End Set
       End Property
   End Class
   ' ...
   

   Project (C#)

   namespace SimpleProjectManager.Module.BusinessObjects.Planning {
       // ...
       [NavigationItem("Planning")]
       public class Project : BaseObject {
           public Project(Session session) : base(session) { }
           string name;
           public string Name {
               get { return name; }
               set { SetPropertyValue(nameof(Name), ref name, value); }
           }
           Person manager;
           public Person Manager {
               get { return manager; }
               set { SetPropertyValue(nameof(Manager), ref manager, value); }
           }
           string description;
           [Size(SizeAttribute.Unlimited)]
           public string Description {
               get { return description; }
               set { SetPropertyValue(nameof(Description), ref description, value); }
           }
           [Association, Aggregated]
           public XPCollection<ProjectTask> Tasks {
               get { return GetCollection<ProjectTask>(nameof(Tasks)); }
           }
       }
   
       public enum ProjectTaskStatus {
           NotStarted = 0,
           InProgress = 1,
           Completed = 2,
           Deferred = 3
       }
   }
   

   Project (VB.NET)

   ' ...
   <NavigationItem("Planning")>
   Public Class Project
       Inherits BaseObject
       Public Sub New(ByVal session As Session)
           MyBase.New(session)
       End Sub
       Private _name As String
       Public Property Name() As String
           Get
               Return _name
           End Get
           Set(ByVal value As String)
               SetPropertyValue(NameOf(Name), _name, value)
           End Set
       End Property
       Private _manager As Person
       Public Property Manager() As Person
           Get
               Return _manager
           End Get
           Set(ByVal value As Person)
               SetPropertyValue(NameOf(Manager), _manager, value)
           End Set
       End Property
       Private _description As String
       <Size(SizeAttribute.Unlimited)>
       Public Property Description() As String
           Get
               Return _description
           End Get
           Set(ByVal value As String)
               SetPropertyValue(NameOf(Description), _description, value)
           End Set
       End Property
       <Association, Aggregated>
       Public ReadOnly Property Tasks() As XPCollection(Of ProjectTask)
           Get
               Return GetCollection(Of ProjectTask)(NameOf(Tasks))
           End Get
       End Property
   End Class
   Public Enum ProjectTaskStatus
       NotStarted = 0
       InProgress = 1
       Completed = 2
       Deferred = 3
   End Enum
   

   Show the API description

   API	Description
   BaseObject	The base class that provides features for business classes.
   NavigationItemAttribute	Places a navigation item automatically created for the decorated class in the specified navigation group.
   AssociationAttribute	Specifies that the decorated property is a part of an association.
   AggregatedAttribute	Specifies that the decorated property is an aggregated part of an association.
   SizeAttribute	Specifies the maximum number of characters that the decorated member’s editor can contain.

Populate the Database with Initial Data

Open the Updater.cs (Updater.vb) file from the SimpleProjectManager.Module project’s Database Update folder and override the ModuleUpdater.UpdateDatabaseAfterUpdateSchema method as shown below:

C#

using DevExpress.Persistent.BaseImpl;
using SimpleProjectManager.Module.BusinessObjects.Marketing;
using SimpleProjectManager.Module.BusinessObjects.Planning;
// ...
public class Updater : ModuleUpdater {
    //...
    public override void UpdateDatabaseAfterUpdateSchema() {
        base.UpdateDatabaseAfterUpdateSchema();
        if (ObjectSpace.CanInstantiate(typeof(Person))) {
            Person person = ObjectSpace.FirstOrDefault<Person>(p => p.FirstName == "John" && p.LastName == "Nilsen");
            if (person == null) {
                person = ObjectSpace.CreateObject<Person>();
                person.FirstName = "John";
                person.LastName = "Nilsen";
            }
        }
        if (ObjectSpace.CanInstantiate(typeof(ProjectTask))) {
            ProjectTask task = ObjectSpace.FirstOrDefault<ProjectTask>(t => t.Subject == "TODO: Conditional UI Customization");
            if (task == null) {
                task = ObjectSpace.CreateObject<ProjectTask>();
                task.Subject = "TODO: Conditional UI Customization";
                task.Status = ProjectTaskStatus.InProgress;
                task.AssignedTo = ObjectSpace.FirstOrDefault<Person>(p => p.FirstName == "John" && p.LastName == "Nilsen");
                task.StartDate = new DateTime(2019, 1, 30);
                task.Notes = "OVERVIEW: http://www.devexpress.com/Products/NET/Application_Framework/features_appearance.xml";
            }
        }
        if (ObjectSpace.CanInstantiate(typeof(Project))) {
            Project project = ObjectSpace.FirstOrDefault<Project>(p => p.Name == "DevExpress XAF Features Overview");
            if (project == null) {
                project = ObjectSpace.CreateObject<Project>();
                project.Name = "DevExpress XAF Features Overview";
                project.Manager = ObjectSpace.FirstOrDefault<Person>(p => p.FirstName == "John" && p.LastName == "Nilsen");
                project.Tasks.Add(ObjectSpace.FirstOrDefault<ProjectTask>(t => t.Subject == "TODO: Conditional UI Customization"));
            }
        }
        if (ObjectSpace.CanInstantiate(typeof(Customer))) {
            Customer customer = ObjectSpace.FirstOrDefault<Customer>(c => c.FirstName == "Ann" && c.LastName == "Devon");
            if (customer == null) {
                customer = ObjectSpace.CreateObject<Customer>();
                customer.FirstName = "Ann";
                customer.LastName = "Devon";
                customer.Company = "Eastern Connection";
            }
        }
        ObjectSpace.CommitChanges();
    }
    //...
}

VB.NET

Public Class Updater
    Inherits ModuleUpdater
    '...
    Public Overrides Sub UpdateDatabaseAfterUpdateSchema()
        MyBase.UpdateDatabaseAfterUpdateSchema()
        If ObjectSpace.CanInstantiate(GetType(Person)) Then
            Dim person As Person = ObjectSpace.FirstOrDefault(Function(p as Person) p.FirstName = "John" And p.LastName = "Nilsen")
            If person Is Nothing Then
                person = ObjectSpace.CreateObject(Of Person)()
                person.FirstName = "John"
                person.LastName = "Nilsen"
            End If
        End If
        If ObjectSpace.CanInstantiate(GetType(ProjectTask)) Then
            Dim task As ProjectTask = ObjectSpace.FirstOrDefault(Function(t as ProjectTask) t.Subject = "TODO: Conditional UI Customization")
            If task Is Nothing Then
                task = ObjectSpace.CreateObject(Of ProjectTask)()
                task.Subject = "TODO: Conditional UI Customization"
                task.Status = ProjectTaskStatus.InProgress
                task.AssignedTo = ObjectSpace.FirstOrDefault(Function(p as Person) p.FirstName = "John" And p.LastName = "Nilsen")
                task.StartDate = New Date(2019, 1, 30)
                task.Notes = "OVERVIEW: http://www.devexpress.com/Products/NET/Application_Framework/features_appearance.xml"
            End If
        End If
        If ObjectSpace.CanInstantiate(GetType(Project)) Then
            Dim project As Project = ObjectSpace.FirstOrDefault(Function(p as Project) p.Name = "DevExpress XAF Features Overview")
            If project Is Nothing Then
                project = ObjectSpace.CreateObject(Of Project)()
                project.Name = "DevExpress XAF Features Overview"
                project.Manager = ObjectSpace.FirstOrDefault(Function(p as Person) p.FirstName = "John" And p.LastName = "Nilsen")
                project.Tasks.Add(ObjectSpace.FirstOrDefault(Function(t as ProjectTask) t.Subject = "TODO: Conditional UI Customization"))
            End If
        End If
        If ObjectSpace.CanInstantiate(GetType(Customer)) Then
            Dim customer As Customer = ObjectSpace.FirstOrDefault(Function(c as Customer) c.FirstName = "Ann" And c.LastName = "Devon")
            If customer Is Nothing Then
                customer = ObjectSpace.CreateObject(Of Customer)()
                customer.FirstName = "Ann"
                customer.LastName = "Devon"
                customer.Company = "Eastern Connection"
            End If
        End If
        ObjectSpace.CommitChanges()
    End Sub
    '...
End Class

In the code above, the Object Space is used to create initial data. This is one of the main framework abstractions that allows you to perform CRUD (create-read-update-delete) operations. You can find more information on the ObjectSpace in the next topic (the Define Custom Logic and UI Elements section).

Note

You can refer to Supply Initial Data (XPO/EF) for more information on how to initially populate the database.

Run the Applications

• The WinForms Application

  The WinForms project is set as the default startup project. Press Start Debugging or the F5 key to run the application.

  The following image shows the auto-created UI of this application:

  

• The ASP.NET Web Forms Application

  Right-click the SimpleProjectManager.Web project in the Solution Explorer and select the Set as StartUp Project item from the context menu. Press Start Debugging or the F5 key.

  The following image shows the auto-created UI of this application:

  

XAF generates this UI for List and Detail Views with available CRUD operations and other capabilities (search, filter, print, etc.). The Detail View contains editors (text box, memo, drop-down box, image and date picker, etc.) that display different business class properties.

Lookup and collection editors display properties that are parts of an association. For example, the Project and ProjectTask classes participate in a One-To-Many relationship. The editor for the “Many” part (the Project‘s Tasks property) allows users to add, edit, remove, and export tasks.

To display reference properties (the ProjectTask‘s AssignedTo property), XAF generates a drop-down list of persons in the UI and creates a foreign key that references the Person table in the database. This drop-down list displays person’s full names because the FullName property is the default property of the Person class (see Default Property of a Business Class).

Note

You can find more information on UI generation in the List View Column Generation and View Items Layout Generation topics.

Auto-Created Database

The database is automatically created based on your data model. The table columns are generated based on the persistence settings specified in the data model (such as field size set via an attribute). The images below show the Object Explorer window from the SQL Server Management Studio.

The applications’ navigation control contains items for each database table. These navigation items allow a user to navigate to a List View with records and open their Detail Views.

Next topic: Customize the Application UI and Behavior