main_query.dfm

商场管理系统源码 一套值得初学者学习的源码包含全部源码,控件

inherited Frm_main_query: TFrm_main_query
  Left = 242
  Top = 178
  Caption = 'Frm_main_query'
  ClientWidth = 650
  OldCreateOrder = True
  OnCloseQuery = FormCloseQuery
  PixelsPerInch = 96
  TextHeight = 12
  inherited Image: TImage
    Width = 650
  end
  inherited P_back: TPanel
    Width = 650
    inherited P_main: TPanel
      Width = 644
      inherited Panel_down: TPanel
        Width = 642
        inherited Bevel_bass: TBevel
          Width = 642
        end
        object L_count: TLabel [1]
          Left = 12
          Top = 12
          Width = 146
          Height = 13
          Caption = #21512#35745#37329#39069#65306#38646#20803'  '#65509'0.00'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlue
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        inherited Panel_button: TPanel
          Left = 482
          inherited OKBtn: TDsFancyButton
            Visible = False
          end
          inherited CancelBtn: TDsFancyButton
            Caption = #20851#38381'[&C]'
          end
        end
      end
      object DBG_data: TDBGrid
        Left = 0
        Top = 36
        Width = 642
        Height = 322
        Align = alClient
        BorderStyle = bsNone
        DataSource = DataSource
        FixedColor = 14935011
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        OnDrawColumnCell = DBG_dataDrawColumnCell
      end
      object PageScroller1: TPageScroller
        Left = 0
        Top = 0
        Width = 642
        Height = 36
        Align = alTop
        AutoScroll = False
        Control = Panel_top
        TabOrder = 2
        object Panel_top: TPanel
          Left = 0
          Top = 0
          Width = 642
          Height = 36
          Color = 14935011
          TabOrder = 0
          object Label1: TLabel
            Left = 6
            Top = 14
            Width = 48
            Height = 12
            Caption = #19994#21153#21592#65306
          end
          object Label2: TLabel
            Left = 25
            Top = 6
            Width = 36
            Height = 12
            Caption = #21830#22330#65306
          end
          object Label3: TLabel
            Left = 12
            Top = 23
            Width = 36
            Height = 12
            Caption = #21830#21697#65306
          end
          object Label4: TLabel
            Left = 184
            Top = 10
            Width = 162
            Height = 12
            Caption = #26085#26399#65306'                   '#33267
          end
          object SB_query: TFlatSpeedButton
            Left = 466
            Top = 5
            Width = 22
            Height = 20
            Cursor = crHandPoint
            Hint = #25191#34892#26597#35810
            Glyph.Data = {
              F6000000424DF600000000000000760000002800000010000000100000000100
              0400000000008000000000000000000000001000000000000000000000000000
              8000008000000080800080000000800080008080000080808000C0C0C0000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
              8888888888888888888800000888880000080F000888880F00080F000888880F
              0008000000080000000800F000000F00000800F000800F00000800F000800F00
              00088000000000000088880F00080F0008888800000800000888888000888000
              88888880F08880F0888888800088800088888888888888888888}
            Layout = blGlyphLeft
            ParentShowHint = False
            ShowHint = True
            OnClick = SB_queryClick
          end
          object CB_ywy: TFlatComboBox
            Left = 53
            Top = 10
            Width = 93
            Height = 20
            Color = clWindow
            ItemHeight = 12
            TabOrder = 0
            ItemIndex = -1
          end
          object CB_depot: TFlatComboBox
            Left = 61
            Top = 1
            Width = 94
            Height = 20
            Color = clWindow
            ItemHeight = 12
            TabOrder = 1
            ItemIndex = -1
          end
          object CB_goods: TFlatComboBox
            Left = 48
            Top = 20
            Width = 96
            Height = 20
            Color = clWindow
            DropDownCount = 20
            ItemHeight = 12
            TabOrder = 2
            ItemIndex = -1
          end
          object DTP_begin: TDateTimePicker
            Left = 219
            Top = 6
            Width = 113
            Height = 20
            CalAlignment = dtaLeft
            Date = 37363.8363062037
            Time = 37363.8363062037
            DateFormat = dfLong
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 3
            OnChange = DTP_beginChange
          end
          object DTP_end: TDateTimePicker
            Left = 350
            Top = 6
            Width = 113
            Height = 20
            CalAlignment = dtaLeft
            Date = 37363.8366037384
            Time = 37363.8366037384
            DateFormat = dfLong
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 4
            OnChange = DTP_endChange
          end
          object Panel_print: TPanel
            Left = 481
            Top = 1
            Width = 160
            Height = 34
            Align = alRight
            BevelOuter = bvNone
            Color = 14935011
            TabOrder = 5
            object SB_print: TFlatSpeedButton
              Left = 2
              Top = 3
              Width = 78
              Height = 25
              Cursor = crHandPoint
              Hint = #25171#21360#39044#35272
              Caption = #25253#34920#36755#20986
              Glyph.Data = {
                06030000424D06030000000000003600000028000000100000000F0000000100
                180000000000D0020000C40E0000C40E00000000000000000000C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000000000000000000000000000000000
                0000000000000000000000000000000000C0C0C0C0C0C0C0C0C0C0C0C0000000
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000C0C0
                C0000000C0C0C0C0C0C000000000000000000000000000000000000000000000
                0000000000000000000000000000000000C0C0C0000000C0C0C0000000C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FFFF00FFFF00FFFFC0C0C0C0C0C00000
                00000000000000C0C0C0000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000
                0000000000000000C0C0C0C0C0C0000000C0C0C0000000C0C0C0000000000000
                0000000000000000000000000000000000000000000000000000000000000000
                00C0C0C0C0C0C0000000000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0000000C0C0C0000000C0C0C0000000C0C0C0000000
                000000000000000000000000000000000000000000000000000000C0C0C00000
                00C0C0C0000000000000C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFFFFFFFF
                FFFFFFFFFFFFFFFFFFFFFF000000C0C0C0000000C0C0C0000000C0C0C0C0C0C0
                C0C0C0000000FFFFFF000000000000000000000000000000FFFFFF0000000000
                00000000000000C0C0C0C0C0C0C0C0C0C0C0C0000000FFFFFFFFFFFFFFFFFFFF
                FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0000000FFFFFF000000000000000000000000000000FFFFFF0000
                00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000000FFFFFFFFFFFFFF
                FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C00000000000000000000000000000000000000000000000
                00000000C0C0C0C0C0C0}
              Layout = blGlyphLeft
              ParentShowHint = False
              ShowHint = True
              OnClick = SB_printClick
            end
            object SB_chart: TFlatSpeedButton
              Left = 82
              Top = 3
              Width = 64
              Height = 25
              Cursor = crHandPoint
              Caption = #23545#27604#22270
              Glyph.Data = {
                76020000424D76020000000000003600000028000000100000000C0000000100
                18000000000040020000C40E0000C40E00000000000000000000C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0000000000000000000C0C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000000000FFFF
                000000000000000000C0C0C0000000000000000000000000000000C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0000000000000000000FFFF0000000000000000FFFFFF
                FFFF00FFFFFFFFFF00FFFF000000C0C0C0C0C0C0C0C0C0C0C0C0000000000000
                000000FFFF0000000000FFFFFFFFFF00FFFFFFFFFF000000000000000000C0C0
                C0C0C0C0C0C0C0C0C0C0000000000000000000FFFF00000000FFFFFF00FFFFFF
                FFFF00FFFFFFFFFF00FFFFFFFFFF000000C0C0C0C0C0C0C0C0C0000000000000
                000000FFFF0000000000FFFFFFFFFF00FFFFFFFFFF0000000000000000000000
                00000000000000C0C0C0000000000000000000FFFF00000000FFFFFF00FFFFFF
                FFFF00FFFFFFFFFF00FFFFFFFFFF00FFFFFFFFFF00FFFF000000000000000000
                000000FFFF0000000000FFFFFFFFFF0000000000000000000000000000000000
                00000000000000C0C0C000000000000000000000000000000000000000FFFFFF
                FFFF00FFFF000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0000000000000000000C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
                C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
              Layout = blGlyphLeft
            end
          end
        end
      end
    end
  end
  object Query_data: TQuery
    AfterOpen = Query_dataAfterOpen
    AfterClose = Query_dataAfterClose
    Left = 144
    Top = 137
  end
  object DataSource: TDataSource
    DataSet = Query_data
    Left = 199
    Top = 120
  end
  object Query_temp: TQuery
    Left = 44
    Top = 136
  end
end