delphimvcframework/unittests/common/MVCFramework.Tests.Serializer.EntitiesModule.dfm

object EntitiesModule: TEntitiesModule
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Height = 241
  Width = 717
  object Entity: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 136
    Top = 24
    object EntityId: TLargeintField
      FieldName = 'Id'
    end
    object EntityCode: TIntegerField
      FieldName = 'Code'
    end
    object EntityName: TStringField
      FieldName = 'Name'
      Size = 60
    end
    object EntitySalary: TCurrencyField
      FieldName = 'Salary'
    end
    object EntityBirthday: TDateField
      FieldName = 'Birthday'
    end
    object EntityAccessDateTime: TDateTimeField
      FieldName = 'AccessDateTime'
    end
    object EntityAccessTime: TTimeField
      FieldName = 'AccessTime'
    end
    object EntityActive: TBooleanField
      FieldName = 'Active'
    end
    object EntityAmount: TFloatField
      FieldName = 'Amount'
    end
    object EntityIgnored: TStringField
      FieldName = 'Ignored'
      Size = 30
    end
    object EntityIgnoredAtt: TStringField
      FieldName = 'IgnoredAtt'
      Size = 30
    end
    object EntityBlobFld: TBlobField
      FieldName = 'BlobFld'
    end
    object EntityItems: TDataSetField
      FieldName = 'Items'
    end
    object EntityDepartament: TDataSetField
      FieldName = 'Departament'
    end
  end
  object EntityLowerCase: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 280
    Top = 56
    object EntityLowerCaseId: TLargeintField
      FieldName = 'Id'
    end
    object EntityLowerCaseName: TStringField
      FieldName = 'Name'
      Size = 60
    end
  end
  object EntityUpperCase: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 392
    Top = 56
    object EntityUpperCaseId: TLargeintField
      FieldName = 'Id'
    end
    object EntityUpperCaseName: TStringField
      FieldName = 'Name'
      Size = 60
    end
  end
  object EntityUpperCase2: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 504
    Top = 56
    object EntityUpperCase2Id: TLargeintField
      FieldName = 'Id'
    end
    object EntityUpperCase2Name: TStringField
      FieldName = 'Name'
      Size = 60
    end
  end
  object Item: TClientDataSet
    Aggregates = <>
    DataSetField = EntityItems
    Params = <>
    Left = 176
    Top = 80
    object ItemId: TLargeintField
      FieldName = 'Id'
    end
    object ItemName: TStringField
      FieldName = 'Name'
      Size = 60
    end
  end
  object Departament: TClientDataSet
    Aggregates = <>
    DataSetField = EntityDepartament
    Params = <>
    Left = 96
    Top = 80
    object DepartamentName: TStringField
      FieldName = 'Name'
      Size = 60
    end
  end
  object EntityAsIs: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 608
    Top = 56
    object EntityAsIsId: TLargeintField
      FieldName = 'Id'
    end
    object EntityAsIsName: TStringField
      FieldName = 'Name'
      Size = 60
    end
  end
end