busjlzbunit.dfm

公交行业的管理系统

object BusJLZBForm: TBusJLZBForm
  Left = -5
  Top = -6
  Align = alTop
  BorderIcons = [biMaximize]
  BorderStyle = bsSingle
  Caption = #20844#20132#34892#19994#20132#27969#25351#26631#32534#36753
  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 = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel6: TPanel
    Left = 0
    Top = 0
    Width = 800
    Height = 78
    Align = alTop
    BevelOuter = bvLowered
    Color = clActiveBorder
    TabOrder = 0
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 798
      Height = 41
      Align = alTop
      TabOrder = 0
      object Label13: TLabel
        Left = 246
        Top = 7
        Width = 240
        Height = 29
        Caption = #20844#20132#34892#19994#20132#27969#25351#26631
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -29
        Font.Name = #38582#20070
        Font.Style = []
        ParentFont = False
      end
    end
    object Panel1: TPanel
      Left = 2
      Top = 42
      Width = 799
      Height = 35
      TabOrder = 1
      object Label1: TLabel
        Left = 171
        Top = 12
        Width = 78
        Height = 13
        Caption = #35831#36873#25321#24180#20221#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 317
        Top = 11
        Width = 13
        Height = 13
        Caption = #24180
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object SpeedButton2: TSpeedButton
        Left = 341
        Top = 7
        Width = 23
        Height = 22
        Flat = True
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
        OnClick = SpeedButton2Click
      end
      object Label12: TLabel
        Left = 6
        Top = 11
        Width = 65
        Height = 13
        Caption = #22478#24066#20195#30721#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clTeal
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object SpeedButton1: TSpeedButton
        Left = 121
        Top = 6
        Width = 23
        Height = 22
        Caption = '...'
        OnClick = SpeedButton1Click
      end
      object ComboBox1: TComboBox
        Left = 251
        Top = 7
        Width = 55
        Height = 21
        ItemHeight = 13
        TabOrder = 0
        OnChange = ComboBox1Change
        Items.Strings = (
          '2000'
          '2001'
          '2002'
          '2003'
          '2004'
          '2005'
          '2006'
          '2007'
          '2008'
          '2009'
          '2010'
          '2011'
          '2012'
          '2013'
          '2014'
          '2015'
          '2016'
          '2017'
          '2018'
          '2019'
          '2020')
      end
      object Edit9: TEdit
        Left = 69
        Top = 8
        Width = 41
        Height = 19
        Color = clBtnFace
        Ctl3D = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clTeal
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 78
    Width = 800
    Height = 475
    Align = alClient
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 11
      Top = 15
      Width = 358
      Height = 447
      Color = clWhite
      Ctl3D = True
      DataSource = QueryPageLeft1Src
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Options = [dgEditing, dgTitles, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnKeyPress = DBGrid1KeyPress
      Columns = <
        item
          Color = 16381940
          Expanded = False
          FieldName = #25351#26631#21517#31216
          ReadOnly = True
          Width = 150
          Visible = True
        end
        item
          Color = 16381940
          Expanded = False
          FieldName = #25351#26631#20195#30721
          ReadOnly = True
          Width = 63
          Visible = True
        end
        item
          Color = 16381940
          Expanded = False
          FieldName = #21333#20301
          ReadOnly = True
          Width = 59
          Visible = True
        end
        item
          Expanded = False
          FieldName = #26412#24180#23454#38469
          Width = 60
          Visible = True
        end>
    end
    object DBGrid2: TDBGrid
      Left = 349
      Top = 15
      Width = 379
      Height = 447
      Color = clWhite
      Ctl3D = True
      DataSource = QueryPageRight1Src
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      Options = [dgEditing, dgTitles, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnKeyPress = DBGrid2KeyPress
      Columns = <
        item
          Color = 16381940
          Expanded = False
          FieldName = #25351#26631#21517#31216
          ReadOnly = True
          Width = 159
          Visible = True
        end
        item
          Color = 16381940
          Expanded = False
          FieldName = #25351#26631#20195#30721
          ReadOnly = True
          Width = 62
          Visible = True
        end
        item
          Color = 16381940
          Expanded = False
          FieldName = #21333#20301
          ReadOnly = True
          Width = 66
          Visible = True
        end
        item
          Expanded = False
          FieldName = #26412#24180#23454#38469
          Width = 60
          Visible = True
        end>
    end
    object Panel4: TPanel
      Left = 701
      Top = 15
      Width = 94
      Height = 447
      BevelInner = bvLowered
      BevelOuter = bvLowered
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 2
      object Label3: TLabel
        Left = 32
        Top = 287
        Width = 26
        Height = 13
        Caption = #22791#27880
      end
      object BitBtn2: TBitBtn
        Left = 9
        Top = 11
        Width = 73
        Height = 25
        Caption = #28155#21152
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnClick = BitBtn2Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
          333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
          C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
          F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
          F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
          00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
          3333333373FF7333333333333000333333333333377733333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
      end
      object BitBtn6: TBitBtn
        Left = 9
        Top = 51