namebooksalequeryunit.dfm

公交行业的管理系统

          TabOrder = 0
          ViewStyle = vsReport
        end
      end
      object TabSheet3: TTabSheet
        Caption = #20844#20132#34892#19994#21517#24405#26597#35810#34920#65288#19977#65289
        ImageIndex = 2
        object ListView3: TListView
          Left = 35
          Top = 10
          Width = 694
          Height = 366
          Columns = <
            item
              Caption = #25351#26631#21517#31216
              MaxWidth = 200
              MinWidth = 200
              Width = 200
            end
            item
              Caption = #20195#30721
              MaxWidth = 70
              MinWidth = 70
              Width = 70
            end
            item
              Alignment = taRightJustify
              Caption = #21512#35745
              MaxWidth = 70
              MinWidth = 70
              Width = 70
            end
            item
              Alignment = taRightJustify
              Caption = #33829#19994
              MaxWidth = 70
              MinWidth = 70
              Width = 70
            end
            item
              Alignment = taRightJustify
              Caption = #20572#19994
              MaxWidth = 70
              MinWidth = 70
              Width = 70
            end
            item
              Alignment = taRightJustify
              Caption = #22312#24314
              MaxWidth = 70
              MinWidth = 70
              Width = 70
            end
            item
              Alignment = taRightJustify
              Caption = #25764#28040
              MaxWidth = 70
              MinWidth = 70
              Width = 70
            end
            item
              Alignment = taRightJustify
              Caption = #20854#20182
              MaxWidth = 70
              MinWidth = 70
              Width = 70
            end>
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          GridLines = True
          Items.Data = {
            850300001400000000000000FFFFFFFFFFFFFFFF07000000000000000F283429
            B0B4C6F3D2B5B9E6C4A3B7D6054D4E53343200000000000000000000FFFFFFFF
            FFFFFFFF07000000000000000961A1A2CCD8B4F3D0CD054D4E53343300000000
            000000000000FFFFFFFFFFFFFFFF07000000000000000762A1A2B4F3D0CD054D
            4E53343400000000000000000000FFFFFFFFFFFFFFFF07000000000000000763
            A1A2D6D0D0CD054D4E53343500000000000000000000FFFFFFFFFFFFFFFF0700
            0000000000000764A1A2D0A1D0CD054D4E53343600000000000000000000FFFF
            FFFFFFFFFFFF07000000000000000765A1A2C6E4CBFB054D4E53343700000000
            000000000000FFFFFFFFFFFFFFFF07000000000000001932A1A2C6F3D2B5D7A2
            B2E1D7CAB1BEBDF0A3A8CDF2D4AAA3A9054D4E53343800000000000000000000
            FFFFFFFFFFFFFFFF07000000000000001161A1A2B9ABB9B2C6FBB3B5A1A2B5E7
            B3B5054D4E53343900000000000000000000FFFFFFFFFFFFFFFF070000000000
            00000762A1A2B5D8CCFA054D4E53353000000000000000000000FFFFFFFFFFFF
            FFFF07000000000000000763A1A2C7E1B9EC054D4E5335310000000000000000
            0000FFFFFFFFFFFFFFFF07000000000000000764A1A2C2D6B6C9054D4E533532
            00000000000000000000FFFFFFFFFFFFFFFF010000000000000000054D4E5335
            3300000000FFFFFFFFFFFFFFFF010000000000000000054D4E53353400000000
            FFFFFFFFFFFFFFFF010000000000000000054D4E53353500000000FFFFFFFFFF
            FFFFFF010000000000000000054D4E53353600000000FFFFFFFFFFFFFFFF0100
            00000000000000054D4E53353700000000FFFFFFFFFFFFFFFF01000000000000
            0000054D4E53353800000000FFFFFFFFFFFFFFFF010000000000000000054D4E
            53353900000000FFFFFFFFFFFFFFFF010000000000000000054D4E5336300000
            0000FFFFFFFFFFFFFFFF010000000000000000054D4E533631FFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFF}
          RowSelect = True
          ParentFont = False
          TabOrder = 0
          ViewStyle = vsReport
        end
      end
    end
    object Panel2: TPanel
      Left = 1
      Top = 54
      Width = 802
      Height = 53
      TabOrder = 1
      object Label1: TLabel
        Left = 183
        Top = 21
        Width = 12
        Height = 13
        AutoSize = False
        Caption = #24180
      end
      object Label3: TLabel
        Left = 34
        Top = 21
        Width = 76
        Height = 13
        AutoSize = False
        Caption = #35831#36873#25321#24180#20221#65306
      end
      object ComboBox1: TComboBox
        Left = 117
        Top = 17
        Width = 60
        Height = 21
        ItemHeight = 13
        TabOrder = 0
        OnChange = ComboBox1Change
        Items.Strings = (
          '2000'
          '2001'
          '2002'
          '2003'
          '2004'
          '2005'
          '2006'
          '2007'
          '2008'
          '2009'
          '2010')
      end
      object BitBtn1: TBitBtn
        Left = 468
        Top = 14
        Width = 75
        Height = 25
        Caption = #26597'  '#35810
        TabOrder = 1
        OnClick = BitBtn1Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333FF3FF3333333333CC30003333333333773777333333333C33
          3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
          33003377333337F33377333333333C333300333F333337F33377339333333C33
          3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
          330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
          330077F377F337F33377993399333C33330077FF773337F33377399993333C33
          33333777733337F333FF333333333C33300033333333373FF7773333333333CC
          3000333333333377377733333333333333333333333333333333}
        NumGlyphs = 2
      end
      object BitBtn2: TBitBtn
        Left = 652
        Top = 14
        Width = 75
        Height = 25
        Caption = #36820'  '#22238
        TabOrder = 2
        OnClick = BitBtn2Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333333333333333333333333333333333FF333333333333
          3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
          E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
          E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
          E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
          000033333373FF77777733333330003333333333333777333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
      end
      object BitBtn3: TBitBtn
        Left = 560
        Top = 16
        Width = 75
        Height = 25
        Caption = #25171'   '#21360
        Enabled = False
        TabOrder = 3
        OnClick = BitBtn3Click
      end
    end
    object Panel3: TPanel
      Left = 1
      Top = 1
      Width = 798
      Height = 53
      Align = alTop
      TabOrder = 2
      object Label2: TLabel
        Left = 209
        Top = 16
        Width = 333
        Height = 27
        AutoSize = False
        Caption = #20844#20132#34892#19994#21517#24405#26597#35810#34920'('#22235')'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -29
        Font.Name = #38582#20070
        Font.Style = []
        ParentFont = False
      end
    end
  end
  object ADOQuery1: TADOQuery
    Connection = BusTradeDataModule.ADOConnection1
    Parameters = <>
    SQL.Strings = (
      'SELECT a.'#20027#35201#19994#21153#27963#21160', Count(*) AS '#21512#35745
      'FROM '#20844#29992#20107#19994#21333#20301#22522#26412#24773#20917#34920' AS a, '#20027#35201#19994#21153#27963#21160#34920' AS b'
      
        'WHERE (((a.'#32479#35745#24180#20221')=2002) AND ((b.'#32479#35745#24180#20221')=2002) AND ((a.'#21333#20301#20195#30721')=[b].['#20225#19994 +
        #20195#30721']) AND ((a.'#33829#19994#29366#20917')='#39#33829#19994#39'))'
      'GROUP BY a.'#20027#35201#19994#21153#27963#21160';')
    Left = 512
    Top = 96
  end
  object ADOQuery2: TADOQuery
    Connection = BusTradeDataModule.ADOConnection1
    Parameters = <>
    Left = 552
    Top = 96
  end
  object ADOQuery3: TADOQuery
    Connection = BusTradeDataModule.ADOConnection1
    Parameters = <>
    Left = 592
    Top = 96
  end
end