epr_namebookunit.dfm

公交行业的管理系统

object Epr_NameBook: TEpr_NameBook
  Left = -8
  Top = 98
  Align = alTop
  BorderIcons = [biMaximize]
  BorderStyle = bsSingle
  Caption = #20225#19994#21517#24405#31649#29702
  ClientHeight = 553
  ClientWidth = 800
  Color = clBtnFace
  Constraints.MaxHeight = 580
  Constraints.MaxWidth = 808
  Constraints.MinHeight = 580
  Constraints.MinWidth = 808
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 800
    Height = 553
    Align = alClient
    TabOrder = 0
    object Panel3: TPanel
      Left = 1
      Top = 82
      Width = 798
      Height = 423
      Align = alClient
      BorderWidth = 1
      BorderStyle = bsSingle
      TabOrder = 0
      object DBGrid1: TDBGrid
        Left = 2
        Top = 2
        Width = 790
        Height = 415
        Align = alClient
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = #21333#20301#21517#31216
            Visible = True
          end
          item
            Expanded = False
            FieldName = #21333#20301#20195#30721
            Visible = True
          end
          item
            Expanded = False
            FieldName = #34892#19994#31867#21035
            Visible = True
          end
          item
            Expanded = False
            FieldName = #20027#35201#19994#21153#27963#21160
            Visible = True
          end>
      end
    end
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 798
      Height = 81
      Align = alTop
      BorderStyle = bsSingle
      Color = 14678015
      TabOrder = 1
      object Label1: TLabel
        Left = 16
        Top = 40
        Width = 85
        Height = 16
        Caption = #36873#25321#24180#20221#65306
        Color = clTeal
        Font.Charset = GB2312_CHARSET
        Font.Color = clTeal
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = True
      end
      object Label2: TLabel
        Left = 302
        Top = 42
        Width = 119
        Height = 16
        Caption = #26412#24180#21517#24405#20010#25968#65306
        Color = clTeal
        Font.Charset = GB2312_CHARSET
        Font.Color = clTeal
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = True
      end
      object ComboBox1: TComboBox
        Left = 93
        Top = 39
        Width = 145
        Height = 21
        ItemHeight = 13
        TabOrder = 0
        OnChange = ComboBox1Change
        Items.Strings = (
          '')
      end
      object Edit1: TEdit
        Left = 416
        Top = 38
        Width = 57
        Height = 21
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Text = '0'
      end
    end
    object Panel4: TPanel
      Left = 1
      Top = 505
      Width = 798
      Height = 47
      Align = alBottom
      BorderWidth = 1
      BorderStyle = bsSingle
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      object BitBtn1: TBitBtn
        Left = 80
        Top = 8
        Width = 75
        Height = 25
        Caption = #26032'  '#24314
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = BitBtn1Click
      end
      object BitBtn2: TBitBtn
        Left = 223
        Top = 8
        Width = 75
        Height = 25
        Caption = #20462#25913'/'#27983#35272
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = BitBtn2Click
      end
      object BitBtn3: TBitBtn
        Left = 496
        Top = 8
        Width = 75
        Height = 25
        Caption = #21024#38500
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = BitBtn3Click
      end
      object BitBtn5: TBitBtn
        Left = 640
        Top = 8
        Width = 75
        Height = 25
        Caption = #36864#20986
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = BitBtn5Click
      end
      object BitBtn4: TBitBtn
        Left = 360
        Top = 8
        Width = 75
        Height = 25
        Caption = #22797#21046#21517#24405
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = BitBtn4Click
      end
    end
  end
  object ADOQuery1: TADOQuery
    Connection = BusTradeDataModule.ADOConnection1
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    MarshalOptions = moMarshalModifiedOnly
    MaxRecords = 500
    Parameters = <>
    SQL.Strings = (
      'select * from '#20844#29992#20107#19994#21333#20301#22522#26412#24773#20917#34920' where '#32479#35745#24180#20221'=2001')
    Left = 436
    Top = 8
    object ADOQuery1DSDesigner: TSmallintField
      FieldName = #32479#35745#24180#20221
    end
    object ADOQuery1DSDesigner2: TWideStringField
      FieldName = #21333#20301#21517#31216
      Size = 50
    end
    object ADOQuery1DSDesigner3: TWideStringField
      FieldName = #21333#20301#36127#36131#20154
      Size = 10
    end
    object ADOQuery1DSDesigner4: TWideStringField
      FieldName = #21333#20301#20195#30721
      Size = 12
    end
    object ADOQuery1DSDesigner5: TWideStringField
      FieldName = #30005#35805#21495#30721
      Size = 10
    end
    object ADOQuery1DSDesigner6: TWideStringField
      FieldName = #21333#20301#25152#22312#22320#35814#32454#22320#22336
      Size = 50
    end
    object ADOQuery1DSDesigner7: TWideStringField
      FieldName = #21333#20301#22352#33853#21306#22495
      Size = 10
    end
    object ADOQuery1DSDesigner8: TWideStringField
      FieldName = #37038#25919#32534#30721
      Size = 6
    end
    object ADOQuery1DSDesigner9: TWideStringField
      FieldName = #20256#30495#21495#30721
      Size = 10
    end
    object ADOQuery1DSDesigner10: TWideStringField
      FieldName = #34892#19994#31867#21035
      Size = 30
    end
    object ADOQuery1DSDesigner11: TWideStringField
      FieldName = #34892#19994#20195#30721
      Size = 4
    end
    object ADOQuery1DSDesigner12: TWideStringField
      FieldName = #20027#35201#19994#21153#27963#21160
      Size = 50
    end
    object ADOQuery1DSDesigner13: TWideStringField
      FieldName = #20225#19994'('#21333#20301')'#30331#35760#27880#20876#31867#22411
    end
    object ADOQuery1DSDesigner14: TFloatField
      FieldName = #20225#19994#27880#20876#36164#26412#37329
      DisplayFormat = '########.###'
    end
    object ADOQuery1DSDesigner15: TWideStringField
      FieldName = #20027#31649#21333#20301#21517#31216
      Size = 30
    end
    object ADOQuery1DSDesigner16: TWideStringField
      FieldName = #33829#19994#29366#20917
      Size = 10
    end
    object ADOQuery1DSDesigner17: TWideStringField
      FieldName = #20225#19994#35268#27169
      Size = 10
    end
    object ADOQuery1DSDesigner18: TDateTimeField
      FieldName = #24320#19994#26102#38388
    end
    object ADOQuery1DSDesigner19: TWideStringField
      FieldName = #20225#19994#36164#36136#31561#32423
      Size = 10
    end
    object ADOQuery1DSDesigner20: TWideStringField
      FieldName = #36164#36136#23457#26597#65288#22791#26696#65289#24773#20917
      Size = 50
    end
    object ADOQuery1DSDesigner21: TDateTimeField
      FieldName = #23457#26597#65288#22791#26696#65289#26085#26399
    end
    object ADOQuery1DSDesigner22: TWideStringField
      FieldName = #26381#21153#65288#30417#30563#65289#30005#35805
      Size = 10
    end
    object ADOQuery1DSDesigner23: TWideStringField
      FieldName = #22635#34920#20154
      Size = 10
    end
    object ADOQuery1DSDesigner24: TDateTimeField
      FieldName = #20225#19994#22635#34920#26102#38388
    end
    object ADOQuery1DSDesigner25: TDateTimeField
      FieldName = #34892#19994#22635#34920#26102#38388
    end
    object ADOQuery1DSDesigner26: TDateTimeField
      FieldName = #23458#31649#21150#22635#34920#26102#38388
    end
    object ADOQuery1DSDesigner27: TDateTimeField
      FieldName = #24314#22996#22635#34920#26102#38388
    end
    object ADOQuery1DSDesigner28: TWideStringField
      FieldName = #22478#24066#20195#30721
      Size = 5
    end
    object ADOQuery1DSDesigner29: TWideStringField
      FieldName = #20844#20849#27773#36710#12289#30005#36710
      Size = 6
    end
    object ADOQuery1DSDesigner30: TWideStringField
      FieldName = #22320#38081
      Size = 6
    end
    object ADOQuery1DSDesigner31: TWideStringField
      FieldName = #36731#36712
      Size = 6
    end
    object ADOQuery1DSDesigner32: TWideStringField
      FieldName = #36718#28193
      Size = 6
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 492
    Top = 8
  end
  object ADOQuery2: TADOQuery
    Connection = BusTradeDataModule.ADOConnection1
    Parameters = <>
    Left = 80
    Top = 488
  end
  object ADOCommand1: TADOCommand
    Connection = BusTradeDataModule.ADOConnection1
    Parameters = <>
    Left = 632
    Top = 520
  end
end