object MainForm: TMainForm
  Left = 78
  Top = 201
  ActiveControl = Tree
  Caption = 'FastCube 2 demo'
  ClientHeight = 528
  ClientWidth = 1107
  Color = clBtnFace
  Font.Charset = RUSSIAN_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter2: TSplitter
    Left = 241
    Top = 0
    Height = 528
  end
  object Pages: TPageControl
    Left = 244
    Top = 0
    Width = 863
    Height = 528
    ActivePage = SliceGridSheet
    Align = alClient
    TabOrder = 0
    object SliceGridSheet: TTabSheet
      Caption = 'Slice Grid'
      object fcSliceGridToolbar1: TfcxSliceGridToolbar
        Left = 0
        Top = 0
        Width = 855
        Height = 22
        AutoSize = True
        Caption = 'fcSliceGridToolbar1'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Version = '2.7.0'
        SliceGrid = MDGrid
        object PrintBtn: TButton
          Left = 405
          Top = 0
          Width = 52
          Height = 22
          Caption = 'Print'
          TabOrder = 0
          OnClick = PrintBtnClick
        end
      end
      object MDGrid: TfcxSliceGrid
        Left = 0
        Top = 97
        Width = 855
        Height = 403
        Version = '2.7.0'
        Align = alClient
        Slice = MDSlice
        Styles.CaptionArea.TextColor = clBlack
        Styles.CaptionArea.FillColor = 15466495
        Styles.CaptionArea.GradientColor = clWhite
        Styles.CaptionArea.Font.Charset = RUSSIAN_CHARSET
        Styles.CaptionArea.Font.Color = clWindowText
        Styles.CaptionArea.Font.Height = -11
        Styles.CaptionArea.Font.Name = 'Tahoma'
        Styles.CaptionArea.Font.Style = []
        Styles.CaptionArea.GradientDirection = tgdHorizontal
        Styles.HeaderArea.TextColor = clBlack
        Styles.HeaderArea.FillColor = clBtnFace
        Styles.HeaderArea.Font.Charset = RUSSIAN_CHARSET
        Styles.HeaderArea.Font.Color = clWindowText
        Styles.HeaderArea.Font.Height = -11
        Styles.HeaderArea.Font.Name = 'Tahoma'
        Styles.HeaderArea.Font.Style = []
        Styles.HeaderCells.TextColor = clBlack
        Styles.HeaderCells.FillColor = clBtnFace
        Styles.HeaderCells.Font.Charset = RUSSIAN_CHARSET
        Styles.HeaderCells.Font.Color = clWindowText
        Styles.HeaderCells.Font.Height = -11
        Styles.HeaderCells.Font.Name = 'Tahoma'
        Styles.HeaderCells.Font.Style = []
        Styles.HeaderCellsSelected.TextColor = clBtnText
        Styles.HeaderCellsSelected.FillColor = clBtnShadow
        Styles.HeaderCellsSelected.Font.Charset = RUSSIAN_CHARSET
        Styles.HeaderCellsSelected.Font.Color = clWindowText
        Styles.HeaderCellsSelected.Font.Height = -11
        Styles.HeaderCellsSelected.Font.Name = 'Tahoma'
        Styles.HeaderCellsSelected.Font.Style = []
        Styles.DataArea.TextColor = clGray
        Styles.DataArea.FillColor = clWhite
        Styles.DataArea.Font.Charset = RUSSIAN_CHARSET
        Styles.DataArea.Font.Color = clWindowText
        Styles.DataArea.Font.Height = -11
        Styles.DataArea.Font.Name = 'Tahoma'
        Styles.DataArea.Font.Style = []
        Styles.DataCells.TextColor = clBlack
        Styles.DataCells.FillColor = clWhite
        Styles.DataCells.Font.Charset = RUSSIAN_CHARSET
        Styles.DataCells.Font.Color = clWindowText
        Styles.DataCells.Font.Height = -11
        Styles.DataCells.Font.Name = 'Tahoma'
        Styles.DataCells.Font.Style = []
        Styles.DataCellsSelected.TextColor = clHighlightText
        Styles.DataCellsSelected.FillColor = clHighlight
        Styles.DataCellsSelected.Font.Charset = RUSSIAN_CHARSET
        Styles.DataCellsSelected.Font.Color = clWindowText
        Styles.DataCellsSelected.Font.Height = -11
        Styles.DataCellsSelected.Font.Name = 'Tahoma'
        Styles.DataCellsSelected.Font.Style = []
        Styles.StatusArea.TextColor = clBlack
        Styles.StatusArea.FillColor = clBtnFace
        Styles.StatusArea.Font.Charset = RUSSIAN_CHARSET
        Styles.StatusArea.Font.Color = clWindowText
        Styles.StatusArea.Font.Height = -11
        Styles.StatusArea.Font.Name = 'Tahoma'
        Styles.StatusArea.Font.Style = []
        Styles.ActiveDimension.TextColor = clCaptionText
        Styles.ActiveDimension.FillColor = clActiveCaption
        Styles.ActiveDimension.GradientColor = clGradientActiveCaption
        Styles.ActiveDimension.Font.Charset = RUSSIAN_CHARSET
        Styles.ActiveDimension.Font.Color = clWindowText
        Styles.ActiveDimension.Font.Height = -11
        Styles.ActiveDimension.Font.Name = 'Tahoma'
        Styles.ActiveDimension.Font.Style = []
        Styles.ActiveDimension.GradientDirection = tgdHorizontal
        Styles.InactiveDimension.TextColor = clInactiveCaptionText
        Styles.InactiveDimension.FillColor = clInactiveCaption
        Styles.InactiveDimension.GradientColor = clGradientInactiveCaption
        Styles.InactiveDimension.Font.Charset = RUSSIAN_CHARSET
        Styles.InactiveDimension.Font.Color = clWindowText
        Styles.InactiveDimension.Font.Height = -11
        Styles.InactiveDimension.Font.Name = 'Tahoma'
        Styles.InactiveDimension.Font.Style = []
        Styles.InactiveDimension.GradientDirection = tgdHorizontal
        Styles.Measure.TextColor = clCaptionText
        Styles.Measure.FillColor = clGreen
        Styles.Measure.GradientColor = clMoneyGreen
        Styles.Measure.Font.Charset = RUSSIAN_CHARSET
        Styles.Measure.Font.Color = clWindowText
        Styles.Measure.Font.Height = -11
        Styles.Measure.Font.Name = 'Tahoma'
        Styles.Measure.Font.Style = []
        Styles.Measure.GradientDirection = tgdHorizontal
        Styles.DataCellsTotals.TextColor = clBlack
        Styles.DataCellsTotals.FillColor = 15466495
        Styles.DataCellsTotals.GradientColor = clWhite
        Styles.DataCellsTotals.Font.Charset = RUSSIAN_CHARSET
        Styles.DataCellsTotals.Font.Color = clWindowText
        Styles.DataCellsTotals.Font.Height = -11
        Styles.DataCellsTotals.Font.Name = 'Tahoma'
        Styles.DataCellsTotals.Font.Style = []
        Styles.FieldsItem.TextColor = clCaptionText
        Styles.FieldsItem.FillColor = clMoneyGreen
        Styles.FieldsItem.Font.Charset = RUSSIAN_CHARSET
        Styles.FieldsItem.Font.Color = clWindowText
        Styles.FieldsItem.Font.Height = -11
        Styles.FieldsItem.Font.Name = 'Tahoma'
        Styles.FieldsItem.Font.Style = []
        TabOrder = 1
        XAxisZone.Images = AxisImages
        YAxisZone.Images = AxisImages
        XDimsZone.Visible = True
        YDimsZone.Visible = True
        PageDimsZone.Visible = True
        FieldsZone.Visible = True
        OnGetDataCellImageIndex = DoGetCellImageIndex
        OnGetDataCellText = MDGridGetDataCellText
        OnGetDataCellStyle = DoGetCellStyle
        OnGetAxisCellImageIndex = MDGridGetAxisCellImageIndex
        OnGetAxisCellStyle = DoGetAxisCellStyle
      end
      object Panel1: TPanel
        Left = 0
        Top = 72
        Width = 855
        Height = 25
        Align = alTop
        TabOrder = 2
        object Button1: TButton
          Left = 8
          Top = 0
          Width = 75
          Height = 25
          Caption = 'Load new'
          TabOrder = 0
          OnClick = Button1Click
        end
        object Button2: TButton
          Left = 96
          Top = 0
          Width = 137
          Height = 25
          Caption = 'Append to current cube'
          TabOrder = 1
          OnClick = Button2Click
        end
      end
      object Panel3: TPanel
        Left = 0
        Top = 47
        Width = 855
        Height = 25
        Align = alTop
        TabOrder = 3
        object Button3: TButton
          Left = 8
          Top = 0
          Width = 185
          Height = 25
          Caption = 'Load Orders with orderno < 1100'
          TabOrder = 0
          OnClick = Button3Click
        end
        object Button4: TButton
          Left = 208
          Top = 0
          Width = 273
          Height = 25
          Caption = 'Append Orders with orderno between 1100 and 1199'
          TabOrder = 1
          OnClick = Button4Click
        end
        object Button5: TButton
          Left = 496
          Top = 0
          Width = 201
          Height = 25
          Caption = 'Append Orders with orderno >= 1200'
          TabOrder = 2
          OnClick = Button5Click
        end
      end
      object Panel4: TPanel
        Left = 0
        Top = 22
        Width = 855
        Height = 25
        Align = alTop
        TabOrder = 4
        object Button6: TButton
          Left = 8
          Top = 0
          Width = 97
          Height = 25
          Caption = 'Load 2004 year'
          TabOrder = 0
          OnClick = Button3Click
        end
        object Button7: TButton
          Left = 120
          Top = 0
          Width = 113
          Height = 25
          Caption = 'Append 2005 year'
          TabOrder = 1
          OnClick = Button4Click
        end
        object Button8: TButton
          Left = 248
          Top = 0
          Width = 113
          Height = 25
          Caption = 'Append 2006 year'
          TabOrder = 2
          OnClick = Button5Click
        end
      end
    end
    object ChartSheet: TTabSheet
      Caption = 'Chart'
      ImageIndex = 4
      object fcxChart1: TfcxChart
        Left = 0
        Top = 22
        Width = 855
        Height = 478
        Version = '2.7.0'
        Title.Text.Strings = (
          'Chart properties are not correct')
        Align = alClient
        BorderStyle = bsNone
        TabOrder = 0
        Slice = MDSlice
        Active = True
      end
      object fcxChartToolBar1: TfcxChartToolBar
        Left = 0
        Top = 0
        Width = 855
        Height = 22
        AutoSize = True
        Caption = 'fcxChartToolBar1'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        Version = '2.7.0'
        Chart = fcxChart1
      end
    end
    object CubeGridSheet: TTabSheet
      Caption = 'Cube grid'
      ImageIndex = 3
      object CubeGrid: TfcxCubeGrid
        Left = 0
        Top = 22
        Width = 855
        Height = 478
        Version = '2.7.0'
        Align = alClient
        Cube = MDCube
        Styles.CaptionArea.TextColor = clBlack
        Styles.CaptionArea.FillColor = 15466495
        Styles.CaptionArea.GradientColor = clWhite
        Styles.CaptionArea.Font.Charset = RUSSIAN_CHARSET
        Styles.CaptionArea.Font.Color = clWindowText
        Styles.CaptionArea.Font.Height = -11
        Styles.CaptionArea.Font.Name = 'Tahoma'
        Styles.CaptionArea.Font.Style = []
        Styles.CaptionArea.GradientDirection = tgdHorizontal
        Styles.HeaderArea.TextColor = clBlack
        Styles.HeaderArea.FillColor = clBtnFace
        Styles.HeaderArea.Font.Charset = RUSSIAN_CHARSET
        Styles.HeaderArea.Font.Color = clWindowText
        Styles.HeaderArea.Font.Height = -11
        Styles.HeaderArea.Font.Name = 'Tahoma'
        Styles.HeaderArea.Font.Style = []
        Styles.HeaderCells.TextColor = clBlack
        Styles.HeaderCells.FillColor = clBtnFace
        Styles.HeaderCells.Font.Charset = RUSSIAN_CHARSET
        Styles.HeaderCells.Font.Color = clWindowText
        Styles.HeaderCells.Font.Height = -11
        Styles.HeaderCells.Font.Name = 'Tahoma'
        Styles.HeaderCells.Font.Style = []
        Styles.HeaderCellsSelected.TextColor = clBtnText
        Styles.HeaderCellsSelected.FillColor = clBtnShadow
        Styles.HeaderCellsSelected.Font.Charset = RUSSIAN_CHARSET
        Styles.HeaderCellsSelected.Font.Color = clWindowText
        Styles.HeaderCellsSelected.Font.Height = -11
        Styles.HeaderCellsSelected.Font.Name = 'Tahoma'
        Styles.HeaderCellsSelected.Font.Style = []
        Styles.DataArea.TextColor = clGray
        Styles.DataArea.FillColor = clWhite
        Styles.DataArea.Font.Charset = RUSSIAN_CHARSET
        Styles.DataArea.Font.Color = clWindowText
        Styles.DataArea.Font.Height = -11
        Styles.DataArea.Font.Name = 'Tahoma'
        Styles.DataArea.Font.Style = []
        Styles.DataCells.TextColor = clBlack
        Styles.DataCells.FillColor = clWhite
        Styles.DataCells.Font.Charset = RUSSIAN_CHARSET
        Styles.DataCells.Font.Color = clWindowText
        Styles.DataCells.Font.Height = -11
        Styles.DataCells.Font.Name = 'Tahoma'
        Styles.DataCells.Font.Style = []
        Styles.DataCellsSelected.TextColor = clHighlightText
        Styles.DataCellsSelected.FillColor = clHighlight
        Styles.DataCellsSelected.Font.Charset = RUSSIAN_CHARSET
        Styles.DataCellsSelected.Font.Color = clWindowText
        Styles.DataCellsSelected.Font.Height = -11
        Styles.DataCellsSelected.Font.Name = 'Tahoma'
        Styles.DataCellsSelected.Font.Style = []
        Styles.StatusArea.TextColor = clBlack
        Styles.StatusArea.FillColor = clBtnFace
        Styles.StatusArea.Font.Charset = RUSSIAN_CHARSET
        Styles.StatusArea.Font.Color = clWindowText
        Styles.StatusArea.Font.Height = -11
        Styles.StatusArea.Font.Name = 'Tahoma'
        Styles.StatusArea.Font.Style = []
      end
      object fcxCubeGridToolbar1: TfcxCubeGridToolbar
        Left = 0
        Top = 0
        Width = 855
        Height = 22
        AutoSize = True
        Caption = 'fcxCubeGridToolbar1'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        Version = '2.7.0'
        CubeGrid = CubeGrid
      end
    end
    object NotesSheet: TTabSheet
      Caption = 'Notes'
      ImageIndex = 4
      object NewInDemo: TMemo
        Left = 0
        Top = 0
        Width = 855
        Height = 500
        Align = alClient
        Color = clBtnFace
        ReadOnly = True
        TabOrder = 0
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 241
    Height = 528
    Align = alLeft
    Caption = 'Panel2'
    TabOrder = 1
    object Splitter1: TSplitter
      Left = 1
      Top = 453
      Width = 239
      Height = 3
      Cursor = crVSplit
      Align = alBottom
    end
    object Tree: TTreeView
      Left = 1
      Top = 1
      Width = 239
      Height = 452
      Align = alClient
      HideSelection = False
      Images = ImageList1
      Indent = 19
      ReadOnly = True
      ShowRoot = False
      TabOrder = 0
      OnChange = TreeChange
      OnClick = TreeClick
      OnCustomDrawItem = TreeCustomDrawItem
      OnDeletion = TreeDeletion
      OnKeyDown = TreeKeyDown
    end
    object CubeDescr: TMemo
      Left = 1
      Top = 456
      Width = 239
      Height = 71
      Align = alBottom
      ReadOnly = True
      TabOrder = 1
    end
  end
  object ColorDialog: TColorDialog
    Left = 577
    Top = 337
  end
  object AxisImages: TImageList
    Left = 28
    Top = 108
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  object CellImages: TImageList
    Left = 80
    Top = 108
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  object FieldsImages: TImageList
    Left = 28
    Top = 76
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  object ImageList1: TImageList
    Left = 80
    Top = 76
    Bitmap = {
      [encoded data, 8768 characters]
      000000000000}
  end
  object FontDialog: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Left = 576
    Top = 307
  end
  object MDSlice: TfcxSlice
    Version = '2.7.0'
    Cube = MDCube
    FieldsOrder = fcfloByDataSet
    Left = 48
    Top = 264
  end
  object MDCube: TfcxCube
    Version = '2.7.0'
    CubeFileCompressionLevel = clNone
    Formats.BooleanFormat.DecSeparator = ','
    Formats.BooleanFormat.FormatStr = 'False,True'
    Formats.BooleanFormat.Kind = fkBoolean
    Formats.DateFormat.DecSeparator = ','
    Formats.DateFormat.FormatStr = 'dd.MM.yyyy'
    Formats.DateFormat.Kind = fkDateTime
    Formats.TimeFormat.DecSeparator = ','
    Formats.TimeFormat.FormatStr = 'h:mm'
    Formats.TimeFormat.Kind = fkDateTime
    Formats.DateTimeFormat.DecSeparator = ','
    Formats.DateTimeFormat.FormatStr = 'dd.MM.yyyy'
    Formats.DateTimeFormat.Kind = fkDateTime
    Formats.FloatFormat.DecSeparator = ','
    Formats.FloatFormat.FormatStr = '%2.2n'
    Formats.FloatFormat.Kind = fkNumeric
    Formats.CurrencyFormat.DecSeparator = ','
    Formats.CurrencyFormat.FormatStr = '%2.2m'
    Formats.CurrencyFormat.Kind = fkNumeric
    Formats.IntegerFormat.DecSeparator = ','
    Formats.IntegerFormat.FormatStr = '%g'
    Formats.IntegerFormat.Kind = fkNumeric
    Formats.TextFormat.DecSeparator = ','
    Formats.PercentFormat.DecSeparator = ','
    Formats.PercentFormat.FormatStr = '%2.2n'
    Formats.PercentFormat.Kind = fkNumeric
    Formats.DatePathFormat.MonthDisplayFormat = mdf_Long
    Formats.DatePathFormat.WeekDayDisplayFormat = wddf_Long
    Formats.DatePathFormat.QuarterDisplayFormat = qdf_System
    Formats.DatePathFormat.WeekNumberDisplayFormat = wndf_System
    Left = 48
    Top = 232
  end
  object fcDataSource1: TfcxDataSource
    Version = '2.7.0'
    DataSet = fcDBDataSet1
    Fields = <>
    Left = 92
    Top = 232
  end
  object fcDBDataSet1: TfcxDBDataSet
    Version = '2.7.0'
    Left = 92
    Top = 264
  end
  object fcxDirDataset: TfcxUserDataSet
    Version = '2.7.0'
    Fields.Strings = (
      'Time'
      'Size'
      'Attr'
      'Name')
    OnOpen = fcxDirDatasetOpen
    OnClose = fcxDirDatasetClose
    OnFirst = fcxDirDatasetFirst
    OnNext = fcxDirDatasetNext
    OnEof = fcxDirDatasetEof
    OnActive = fcxDirDatasetActive
    OnDataFieldAt = fcxDirDatasetDataFieldAt
    OnGetVarData = fcxDirDatasetGetVarData
    Left = 132
    Top = 234
  end
  object fcxDBDSItems: TfcxDBDataSet
    Version = '2.7.0'
    Left = 68
    Top = 410
  end
  object fcxDBDScustomer: TfcxDBDataSet
    Version = '2.7.0'
    Left = 124
    Top = 410
  end
  object fcxDBDSemployee: TfcxDBDataSet
    Version = '2.7.0'
    Left = 180
    Top = 410
  end
  object fcxDBDSparts: TfcxDBDataSet
    Version = '2.7.0'
    Left = 228
    Top = 410
  end
  object Demo: TfcxDataSource
    Version = '2.7.0'
    DataSet = fcxDBDSItems
    Fields = <
      item
        SourceFieldType = fcxsft_Reference
        SourceFieldProperties.SplitProperty.Attributes = <
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.DateSplitPaths = [odt_Year, odt_Month, odt_Day]
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'SaleDate'
            SourceFieldProperties.DataField.CubeFieldName = 'SaleDate'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'SaleDate'
            SourceFieldProperties.IdField.DataFieldName = 'OrderNo'
            SourceFieldProperties.DataSet = fcxDBDSorders
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'ShipDate'
            SourceFieldProperties.DataField.CubeFieldName = 'ShipDate'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'ShipDate'
            SourceFieldProperties.IdField.DataFieldName = 'OrderNo'
            SourceFieldProperties.DataSet = fcxDBDSorders
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'ShipVIA'
            SourceFieldProperties.DataField.CubeFieldName = 'ShipVIA'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'ShipVIA'
            SourceFieldProperties.IdField.DataFieldName = 'OrderNo'
            SourceFieldProperties.DataSet = fcxDBDSorders
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Terms'
            SourceFieldProperties.DataField.CubeFieldName = 'Terms'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Terms'
            SourceFieldProperties.IdField.DataFieldName = 'OrderNo'
            SourceFieldProperties.DataSet = fcxDBDSorders
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'PaymentMethod'
            SourceFieldProperties.DataField.CubeFieldName = 'PaymentMethod'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'PaymentMethod'
            SourceFieldProperties.IdField.DataFieldName = 'OrderNo'
            SourceFieldProperties.DataSet = fcxDBDSorders
          end>
        SourceFieldProperties.DataField.Convert = False
        SourceFieldProperties.DataField.DataFieldName = 'orderno'
        SourceFieldProperties.DataField.CubeFieldName = 'orderno'
        SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
        SourceFieldProperties.DataField.CubeFieldSize = 0
        SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'orderno'
      end
      item
        SourceFieldType = fcxsft_Reference
        SourceFieldProperties.SplitProperty.Attributes = <
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Description'
            SourceFieldProperties.DataField.CubeFieldName = 'Description'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Description'
            SourceFieldProperties.IdField.DataFieldName = 'PartNo'
            SourceFieldProperties.DataSet = fcxDBDSparts
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'PartNo'
            SourceFieldProperties.DataField.CubeFieldName = 'PartNo'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'PartNo'
            SourceFieldProperties.IdField.DataFieldName = 'PartNo'
            SourceFieldProperties.DataSet = fcxDBDSparts
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <
              item
                SourceFieldType = fcxsft_Reference
                SourceFieldProperties.SplitProperty.Attributes = <>
                SourceFieldProperties.DataField.Convert = False
                SourceFieldProperties.DataField.DataFieldName = 'VendorName'
                SourceFieldProperties.DataField.CubeFieldName = 'VendorName'
                SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
                SourceFieldProperties.DataField.CubeFieldSize = 0
                SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'VendorName'
                SourceFieldProperties.IdField.DataFieldName = 'VendorNo'
                SourceFieldProperties.DataSet = fcxDBvendors
              end>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'VendorNo'
            SourceFieldProperties.DataField.CubeFieldName = 'VendorNo'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'VendorNo'
            SourceFieldProperties.IdField.DataFieldName = 'PartNo'
            SourceFieldProperties.DataSet = fcxDBDSparts
          end>
        SourceFieldProperties.CaptionSourceAttribute = 'Description'
        SourceFieldProperties.DataField.Convert = False
        SourceFieldProperties.DataField.DataFieldName = 'partno'
        SourceFieldProperties.DataField.CubeFieldName = 'partno'
        SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
        SourceFieldProperties.DataField.CubeFieldSize = 0
        SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'partno'
      end
      item
        SourceFieldType = fcxsft_Reference
        SourceFieldProperties.SplitProperty.Attributes = <>
        SourceFieldProperties.DataField.Convert = False
        SourceFieldProperties.DataField.DataFieldName = 'qty'
        SourceFieldProperties.DataField.CubeFieldName = 'qty'
        SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
        SourceFieldProperties.DataField.CubeFieldSize = 0
        SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'qty'
      end
      item
        SourceFieldType = fcxsft_Reference
        SourceFieldProperties.SplitProperty.Attributes = <
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Company'
            SourceFieldProperties.DataField.CubeFieldName = 'Company'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Company'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Addr1'
            SourceFieldProperties.DataField.CubeFieldName = 'Addr1'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Addr1'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Addr2'
            SourceFieldProperties.DataField.CubeFieldName = 'Addr2'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Addr2'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'City'
            SourceFieldProperties.DataField.CubeFieldName = 'City'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'City'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'State'
            SourceFieldProperties.DataField.CubeFieldName = 'State'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'State'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Zip'
            SourceFieldProperties.DataField.CubeFieldName = 'Zip'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Zip'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Country'
            SourceFieldProperties.DataField.CubeFieldName = 'Country'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Country'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Phone'
            SourceFieldProperties.DataField.CubeFieldName = 'Phone'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Phone'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'FAX'
            SourceFieldProperties.DataField.CubeFieldName = 'FAX'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'FAX'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'TaxRate'
            SourceFieldProperties.DataField.CubeFieldName = 'TaxRate'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'TaxRate'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Contact'
            SourceFieldProperties.DataField.CubeFieldName = 'Contact'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Contact'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'LastInvoiceDate'
            SourceFieldProperties.DataField.CubeFieldName = 'LastInvoiceDate'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'LastInvoiceDate'
            SourceFieldProperties.IdField.DataFieldName = 'CustNo'
            SourceFieldProperties.DataSet = fcxDBDScustomer
          end>
        SourceFieldProperties.CaptionSourceAttribute = 'Company'
        SourceFieldProperties.DataField.Convert = False
        SourceFieldProperties.DataField.DataFieldName = 'custno'
        SourceFieldProperties.DataField.CubeFieldName = 'custno'
        SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
        SourceFieldProperties.DataField.CubeFieldSize = 0
        SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'custno'
      end
      item
        SourceFieldType = fcxsft_Reference
        SourceFieldProperties.SplitProperty.Attributes = <
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'LastName'
            SourceFieldProperties.DataField.CubeFieldName = 'LastName'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'LastName'
            SourceFieldProperties.IdField.DataFieldName = 'EmpNo'
            SourceFieldProperties.DataSet = fcxDBDSemployee
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'FirstName'
            SourceFieldProperties.DataField.CubeFieldName = 'FirstName'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'FirstName'
            SourceFieldProperties.IdField.DataFieldName = 'EmpNo'
            SourceFieldProperties.DataSet = fcxDBDSemployee
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'PhoneExt'
            SourceFieldProperties.DataField.CubeFieldName = 'PhoneExt'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'PhoneExt'
            SourceFieldProperties.IdField.DataFieldName = 'EmpNo'
            SourceFieldProperties.DataSet = fcxDBDSemployee
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'HireDate'
            SourceFieldProperties.DataField.CubeFieldName = 'HireDate'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'HireDate'
            SourceFieldProperties.IdField.DataFieldName = 'EmpNo'
            SourceFieldProperties.DataSet = fcxDBDSemployee
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Salary'
            SourceFieldProperties.DataField.CubeFieldName = 'Salary'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Salary'
            SourceFieldProperties.IdField.DataFieldName = 'EmpNo'
            SourceFieldProperties.DataSet = fcxDBDSemployee
          end
          item
            SourceFieldType = fcxsft_Reference
            SourceFieldProperties.SplitProperty.Attributes = <>
            SourceFieldProperties.DataField.Convert = False
            SourceFieldProperties.DataField.DataFieldName = 'Name'
            SourceFieldProperties.DataField.CubeFieldName = 'Name'
            SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
            SourceFieldProperties.DataField.CubeFieldSize = 0
            SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Name'
            SourceFieldProperties.IdField.DataFieldName = 'EmpNo'
            SourceFieldProperties.DataSet = fcxDBDSemployee
          end>
        SourceFieldProperties.CaptionSourceAttribute = 'Name'
        SourceFieldProperties.OrderSourceAttribute = 'Name'
        SourceFieldProperties.DataField.Convert = False
        SourceFieldProperties.DataField.DataFieldName = 'empno'
        SourceFieldProperties.DataField.CubeFieldName = 'empno'
        SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
        SourceFieldProperties.DataField.CubeFieldSize = 0
        SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'empno'
      end>
    Left = 148
    Top = 314
  end
  object fcxDBDSorders: TfcxDBDataSet
    Version = '2.7.0'
    Left = 292
    Top = 410
  end
  object fcxDBvendors: TfcxDBDataSet
    Version = '2.7.0'
    Left = 356
    Top = 410
  end
  object fcxCalendarDataset: TfcxUserDataSet
    Version = '2.7.0'
    Fields.Strings = (
      'Date')
    OnOpen = fcxCalendarDatasetOpen
    OnClose = fcxCalendarDatasetClose
    OnFirst = fcxCalendarDatasetFirst
    OnNext = fcxCalendarDatasetNext
    OnEof = fcxCalendarDatasetEof
    OnActive = fcxCalendarDatasetActive
    OnDataFieldAt = fcxCalendarDatasetDataFieldAt
    OnGetVarData = fcxCalendarDatasetGetVarData
    Left = 220
    Top = 234
  end
  object fcxCalendarDataSource: TfcxDataSource
    Version = '2.7.0'
    DataSet = fcxCalendarDataset
    Fields = <
      item
        SourceFieldType = fcxsft_Reference
        SourceFieldProperties.SplitProperty.DateSplitPaths = [odt_Year, odt_Month, odt_Day, odt_DayOfWeek, odt_WeekNumber]
        SourceFieldProperties.SplitProperty.Attributes = <>
        SourceFieldProperties.DataField.Convert = False
        SourceFieldProperties.DataField.DataFieldName = 'Date'
        SourceFieldProperties.DataField.CubeFieldName = 'Date'
        SourceFieldProperties.DataField.CubeFieldType = fcdt_NotImplemented
        SourceFieldProperties.DataField.CubeFieldSize = 0
        SourceFieldProperties.DataField.CubeFieldDisplayLabel = 'Date'
      end>
    Left = 220
    Top = 280
  end
  object MainMenu1: TMainMenu
    Left = 424
    Top = 248
    object SliceGrid1: TMenuItem
      Caption = 'Slice Grid'
      object Editstyles1: TMenuItem
        Caption = 'Edit styles...'
        OnClick = Editstyles1Click
      end
      object PaintStyleMenu: TMenuItem
        Caption = 'Paint style'
      end
    end
    object Help1: TMenuItem
      Caption = 'Help'
      object About1: TMenuItem
        Caption = 'About ...'
        OnClick = About1Click
      end
    end
  end
  object fcxBIFFExport1: TfcxBIFFExport
    Version = '2.7.0'
    Left = 952
    Top = 8
  end
  object fcxODSExport1: TfcxODSExport
    Version = '2.7.0'
    CreationTime = 0.000000000000000000
    Creator = 'FastReport'
    Language = 'en'
    Left = 920
    Top = 8
  end
  object fcxXMLExport1: TfcxXMLExport
    Version = '2.7.0'
    Left = 888
    Top = 8
  end
  object fcxHTMLExport1: TfcxHTMLExport
    Version = '2.7.0'
    HTMLFormat = hfHTML
    RepeatValues = False
    Left = 984
    Top = 8
  end
  object fcxDBFExport1: TfcxDBFExport
    Version = '2.7.0'
    Left = 1016
    Top = 8
  end
  object fcxCSVExport1: TfcxCSVExport
    Version = '2.7.0'
    OEMCodepage = False
    UTF8 = False
    Separator = ';'
    NoSysSymbols = True
    ForcedQuotes = False
    Left = 1040
    Top = 8
  end
  object fcxXLSXExport1: TfcxXLSXExport
    Version = '2.7.0'
    Creator = 'FastReport'
    Left = 1064
    Top = 10
  end
end
