object FormAreaList: TFormAreaList
  Left = 192
  Top = 103
  Width = 275
  Height = 480
  Caption = #32534#36753#21306#22495
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 0
    Top = 81
    Width = 267
    Height = 372
    Align = alClient
    DataSource = DataSource2
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'areaname'
        Width = 100
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 267
    Height = 81
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object Label1: TLabel
      Left = 0
      Top = 12
      Width = 153
      Height = 21
      AutoSize = False
      Caption = #32534#36753#21306#22495#21015#34920
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object DBNavigator1: TDBNavigator
      Left = 8
      Top = 40
      Width = 230
      Height = 25
      DataSource = DataSource2
      Ctl3D = True
      Hints.Strings = (
        #31532#19968#26465
        #21069#19968#26465
        #19979#19968#26465
        #26368#21518#19968#26465
        #28155#21152#26032#35760#24405
        #21024#38500#35813#35760#24405
        #32534#36753#35813#35760#24405
        #20445#23384
        #21462#28040#25913#21464
        #21047#26032)
      ParentCtl3D = False
      TabOrder = 0
    end
    object Button1: TButton
      Left = 160
      Top = 8
      Width = 75
      Height = 25
      Caption = #20851#38381
      TabOrder = 1
      OnClick = Button1Click
    end
  end
  object ADOTable2: TADOTable
    Connection = DM.Conn
    CursorLocation = clUseServer
    CursorType = ctStatic
    TableName = 'user_area'
    Left = 208
    Top = 152
    object ADOTable2areaname: TStringField
      DisplayLabel = #21306#22495#21517#31216
      FieldName = 'areaname'
      Size = 50
    end
  end
  object DataSource2: TDataSource
    DataSet = ADOTable2
    Left = 176
    Top = 152
  end
end