randomsystem.dfm

一个不错的信息管理系统

object Form9: TForm9
  Left = -16
  Top = 143
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = #38543#26426#26465#20214#32500#25252
  ClientHeight = 432
  ClientWidth = 763
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 763
    Height = 432
    Align = alClient
    BevelInner = bvSpace
    BorderStyle = bsSingle
    TabOrder = 0
    object Bevel1: TBevel
      Left = 5
      Top = 134
      Width = 755
      Height = 2
    end
    object Bevel2: TBevel
      Left = 0
      Top = 394
      Width = 760
      Height = 2
    end
    object DBGrid1: TDBGrid
      Left = 5
      Top = 138
      Width = 752
      Height = 255
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object Button1: TButton
      Left = 9
      Top = 400
      Width = 75
      Height = 25
      Caption = #31532#19968#26465
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 92
      Top = 400
      Width = 75
      Height = 25
      Caption = #19978#19968#26465
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = Button2Click
    end
    object Button3: TButton
      Left = 175
      Top = 401
      Width = 75
      Height = 25
      Caption = #19979#19968#26465
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 257
      Top = 400
      Width = 75
      Height = 25
      Caption = #26411#19968#26465
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = Button4Click
    end
    object Button6: TButton
      Left = 421
      Top = 400
      Width = 75
      Height = 25
      Caption = #20462#25913
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = Button6Click
    end
    object Button7: TButton
      Left = 505
      Top = 400
      Width = 75
      Height = 25
      Caption = #21024#38500
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = Button7Click
    end
    object Button8: TButton
      Left = 339
      Top = 399
      Width = 75
      Height = 26
      Caption = #28155#21152
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = Button8Click
    end
    object Button10: TButton
      Left = 588
      Top = 399
      Width = 75
      Height = 25
      Caption = #25552#20132
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 8
      OnClick = Button10Click
    end
    object GroupBox1: TGroupBox
      Left = 3
      Top = 2
      Width = 754
      Height = 131
      Caption = #38543#26426#26465#20214#32500#25252
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 9
      object Label6: TLabel
        Left = 19
        Top = 21
        Width = 60
        Height = 15
        Caption = #24180#40836#20174#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 165
        Top = 21
        Width = 15
        Height = 15
        Caption = #21040
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label8: TLabel
        Left = 19
        Top = 60
        Width = 60
        Height = 15
        Caption = #23398#21382#20174#65306
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label9: TLabel
        Left = 162
        Top = 62
        Width = 15
        Height = 15
        Caption = #21040
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label10: TLabel
        Left = 351
        Top = 29
        Width = 46
        Height = 15
        Caption = #24615' '#21035':'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object TLabel
        Left = 16
        Top = 112
        Width = 8
        Height = 15
      end
      object Label2: TLabel
        Left = 330
        Top = 66
        Width = 68
        Height = 15
        Caption = #19987#23478#21517#31216':'
      end
      object Label3: TLabel
        Left = 352
        Top = 102
        Width = 46
        Height = 15
        Caption = #22995' '#21517':'
      end
      object Label1: TLabel
        Left = 4
        Top = 103
        Width = 75
        Height = 15
        Caption = #24037#20316#37096#38376#65306
      end
      object ComboBox4: TComboBox
        Left = 72
        Top = 21
        Width = 87
        Height = 23
        ItemHeight = 15
        TabOrder = 0
        Items.Strings = (
          '20'
          '30'
          '40'
          '50'
          '60')
      end
      object ComboBox5: TComboBox
        Left = 184
        Top = 21
        Width = 97
        Height = 23
        ItemHeight = 15
        TabOrder = 1
        Items.Strings = (
          '20'
          '30'
          '40'
          '50'
          '60')
      end
      object ComboBox6: TComboBox
        Left = 70
        Top = 60
        Width = 87
        Height = 23
        ItemHeight = 15
        TabOrder = 2
        Items.Strings = (
          #23567#23398
          #21021#20013
          #25216#24037
          #39640#20013
          #20013#19987
          #22823#19987
          #22823#26412
          #30740#31350#29983
          #30805#22763
          #21338#22763)
      end
      object ComboBox7: TComboBox
        Left = 183
        Top = 60
        Width = 97
        Height = 23
        ItemHeight = 15
        TabOrder = 3
        Items.Strings = (
          #23567#23398
          #21021#20013
          #25216#24037
          #39640#20013
          #20013#19987
          #22823#19987
          #22823#26412
          #30740#31350#29983
          #30805#22763
          #21338#22763)
      end
      object ComboBox3: TComboBox
        Left = 399
        Top = 24
        Width = 124
        Height = 23
        ItemHeight = 15
        TabOrder = 4
        Items.Strings = (
          #22899
          #30007)
      end
      object Button5: TButton
        Left = 643
        Top = 98
        Width = 76
        Height = 25
        Cancel = True
        Caption = #36864#20986
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 8
        OnClick = Button5Click
      end
      object Button9: TButton
        Left = 643
        Top = 19
        Width = 75
        Height = 25
        Caption = #36827#20837#32500#25252
        Default = True
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 9
        OnClick = Button9Click
      end
      object ComboBox1: TComboBox
        Left = 72
        Top = 100
        Width = 207
        Height = 23
        ItemHeight = 15
        TabOrder = 5
        Items.Strings = (
          #27982#23425#32844#19994#25216#26415#23398#38498
          #27982#23425#20154#27665#25919#24220
          #27982#23425#27700#21033#23616
          #27982#23425#32452#32455#37096
          #27982#23425#23459#20256#37096
          #27982#23425#27668#35937#21488
          #27982#23425#30005#35270#21488
          #27982#23425#20154#20107#23616
          #27982#23425#20154#27665#27861#38498)
      end
      object ComboBox2: TComboBox
        Left = 400
        Top = 60
        Width = 121
        Height = 23
        ItemHeight = 15
        TabOrder = 6
        Items.Strings = (
          #29983#21270#19987#23478
          #21407#23376#33021#19987#23478)
      end
      object Edit1: TEdit
        Left = 400
        Top = 100
        Width = 121
        Height = 23
        TabOrder = 7
      end
      object Button11: TButton
        Left = 643
        Top = 59
        Width = 75
        Height = 25
        Caption = #28165#31354
        TabOrder = 10
        OnClick = Button11Click
      end
    end
    object Button12: TButton
      Left = 672
      Top = 398
      Width = 75
      Height = 25
      Caption = #21462#28040
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 10
      OnClick = Button12Click
    end
  end
  object DataSource1: TDataSource
    AutoEdit = False
    DataSet = ADOQuery1
    Left = 144
    Top = 184
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 464
    Top = 232
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ganbusystem.mdb;Per' +
      'sist Security Info=False'
    LoginPrompt = False
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 448
    Top = 176
  end
end