object Form1: TForm1
  Left = 307
  Top = 117
  Width = 519
  Height = 397
  Caption = #20132#21449#24335#22270#34920#24212#29992#28436#31034
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 511
    Height = 201
    Align = alTop
    Caption = 'Panel1'
    TabOrder = 0
    object DBChart1: TDBChart
      Left = 1
      Top = 1
      Width = 509
      Height = 199
      BackWall.Color = clWhite
      BackWall.Gradient.EndColor = 14285190
      BackWall.Gradient.MidColor = clSilver
      BackWall.Gradient.StartColor = 1415426
      BackWall.Transparent = False
      BottomWall.Gradient.EndColor = 14285190
      BottomWall.Gradient.MidColor = clSilver
      BottomWall.Gradient.StartColor = 1415426
      Gradient.EndColor = 14285190
      Gradient.MidColor = clSilver
      Gradient.StartColor = 1415426
      LeftWall.Gradient.EndColor = 14285190
      LeftWall.Gradient.MidColor = clSilver
      LeftWall.Gradient.StartColor = 1415426
      RightWall.Gradient.EndColor = 14285190
      RightWall.Gradient.MidColor = clSilver
      RightWall.Gradient.StartColor = 1415426
      Title.Text.Strings = (
        'CrossTab'#24212#29992#20030#20363'(TDBChart)')
      Align = alClient
      TabOrder = 0
      PrintMargins = (
        15
        30
        15
        30)
      object Series1: TBarSeries
        Marks.Callout.Brush.Color = clBlack
        Marks.Visible = False
        DataSource = DBCrossTabSource1
        Gradient.Direction = gdTopBottom
        XValues.Name = 'X'
        XValues.Order = loAscending
        YValues.Name = 'Bar'
        YValues.Order = loNone
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 201
    Width = 313
    Height = 162
    Align = alLeft
    BevelInner = bvRaised
    Caption = 'Panel2'
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 2
      Top = 2
      Width = 309
      Height = 126
      Align = alClient
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'OrderNo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ShipVIA'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Terms'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'AmountPaid'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'EmpNo'
          Visible = True
        end>
    end
    object DBNavigator1: TDBNavigator
      Left = 2
      Top = 128
      Width = 309
      Height = 32
      DataSource = DataSource1
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      Align = alBottom
      TabOrder = 1
    end
  end
  object Panel3: TPanel
    Left = 313
    Top = 201
    Width = 198
    Height = 162
    Align = alClient
    Caption = 'Panel3'
    TabOrder = 2
    object Panel4: TPanel
      Left = 1
      Top = 1
      Width = 196
      Height = 104
      Align = alTop
      TabOrder = 0
      object RadioGroup1: TRadioGroup
        Left = 16
        Top = 8
        Width = 73
        Height = 81
        Caption = #35745#31639#65306
        Color = clBtnFace
        Enabled = False
        ItemIndex = 1
        Items.Strings = (
          #35745#25968
          #27714#21644)
        ParentColor = False
        TabOrder = 0
        OnClick = RadioGroup1Click
      end
      object CheckBox1: TCheckBox
        Left = 112
        Top = 24
        Width = 81
        Height = 17
        Caption = #25171#24320#34920
        TabOrder = 1
        OnClick = CheckBox1Click
      end
      object Button2: TButton
        Left = 112
        Top = 56
        Width = 57
        Height = 25
        Caption = '&A.'#20132#25442
        Enabled = False
        TabOrder = 2
        OnClick = Button2Click
      end
    end
    object Button1: TButton
      Left = 16
      Top = 120
      Width = 161
      Height = 33
      Caption = '&E.'#36864#20986
      TabOrder = 1
      OnClick = Button1Click
    end
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'DBDEMOS'
    TableName = 'orders.db'
    Left = 9
    Top = 9
  end
  object DBCrossTabSource1: TDBCrossTabSource
    DataSet = Table1
    GroupField = 'Terms'
    LabelField = 'ShipVIA'
    Series = Series1
    ValueField = 'AmountPaid'
    Left = 8
    Top = 48
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 41
    Top = 9
  end
end
