unit6.dfm

某个城市的工业区的污水处理

object Day_data: TDay_data
  Left = 179
  Top = 35
  Width = 506
  Height = 474
  Caption = 'Day_data'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 498
    Height = 105
    Align = alTop
    Caption = #25805#20316#38754#26495
    TabOrder = 2
    object Label1: TLabel
      Left = 8
      Top = 29
      Width = 84
      Height = 13
      Caption = #35831#36755#20837#27969#37327#35745#21495
    end
    object Label2: TLabel
      Left = 189
      Top = 29
      Width = 108
      Height = 13
      Caption = #35831#36755#20837#26597#35810#26597#35810#26102#38388
    end
    object Label3: TLabel
      Left = 376
      Top = 29
      Width = 15
      Height = 13
      Caption = '--->'
    end
    object ComboBox1: TComboBox
      Left = 96
      Top = 24
      Width = 65
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ItemHeight = 13
      TabOrder = 0
      Text = '1'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10'
        '11'
        '12'
        '13'
        '14'
        '15'
        '16'
        '17'
        '18'
        '19'
        '20'
        '21'
        '22'
        '23'
        '24'
        '25'
        '26')
    end
    object MaskEdit1: TMaskEdit
      Left = 304
      Top = 24
      Width = 65
      Height = 21
      EditMask = '!99/99/00;1;_'
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      MaxLength = 8
      TabOrder = 1
      Text = '  -  -  '
    end
    object MaskEdit2: TMaskEdit
      Left = 416
      Top = 24
      Width = 65
      Height = 21
      EditMask = '!99/99/00;1;_'
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      MaxLength = 8
      TabOrder = 2
      Text = '  -  -  '
    end
    object BitBtn1: TBitBtn
      Left = 24
      Top = 64
      Width = 89
      Height = 25
      Caption = #30830#23450
      TabOrder = 3
      OnClick = BitBtn1Click
      Kind = bkOK
    end
    object BitBtn2: TBitBtn
      Left = 136
      Top = 64
      Width = 89
      Height = 25
      Caption = #21462#28040
      TabOrder = 4
      Kind = bkCancel
    end
    object BitBtn3: TBitBtn
      Left = 256
      Top = 64
      Width = 89
      Height = 25
      Caption = #26354#32447#26174#31034
      TabOrder = 5
      OnClick = BitBtn3Click
    end
    object BitBtn4: TBitBtn
      Left = 384
      Top = 64
      Width = 89
      Height = 25
      Caption = #25253#34920
      TabOrder = 6
      OnClick = BitBtn4Click
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 112
    Width = 497
    Height = 273
    DataSource = DataSource1
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #27969#37327#35745#32534#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #36816#34892#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = #36816#34892#26102#38388
        Visible = True
      end
      item
        Expanded = False
        FieldName = #27700#20301
        Title.Caption = #27700#20301'(m)'
        Visible = True
      end
      item
        Expanded = False
        FieldName = #27969#36895
        Title.Caption = #27969#36895'(m/s)'
        Visible = True
      end
      item
        Expanded = False
        FieldName = #30636#26102#27969#37327
        Title.Caption = #30636#26102#27969#37327'(t/h)'
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32047#35745#27969#37327
        Title.Caption = #32047#31215#27969#37327'(t)'
        Visible = True
      end>
  end
  object DBNavigator1: TDBNavigator
    Left = 8
    Top = 392
    Width = 480
    Height = 18
    DataSource = DataMD.DataSourceDay
    TabOrder = 1
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 414
    Width = 498
    Height = 33
    Panels = <
      item
        Text = #24037#25511#20844#21496'           '
        Width = 50
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 88
    Top = 104
  end
  object Query1: TQuery
    DatabaseName = 'tling'
    SQL.Strings = (
      'select * from Day_1')
    Left = 56
    Top = 136
  end
end