daysql.~dfm

销售分析,JUSCO,日月周查询,待完善.

      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Transparent = True
      ParentColor = True
      ParentFont = False
      TabOrder = 9
      BorderColor = 8355711
      object suiRadioButton1: TsuiRadioButton
        Left = 0
        Top = 8
        Width = 72
        Height = 21
        UIStyle = MacOS
        AutoSize = True
        Checked = False
        Caption = #25968#37327#25490#24207
        TabOrder = 0
        TabStop = True
        State = cbUnchecked
        Transparent = True
        GroupIndex = 0
      end
      object suiRadioButton2: TsuiRadioButton
        Left = 0
        Top = 40
        Width = 72
        Height = 21
        UIStyle = MacOS
        AutoSize = True
        Checked = True
        Caption = #37329#39069#25490#24207
        TabOrder = 1
        TabStop = True
        State = cbChecked
        Transparent = True
        GroupIndex = 0
      end
      object suiButton4: TsuiButton
        Left = 80
        Top = 24
        Width = 73
        Height = 33
        Caption = #27719#24635#26597#35810
        AutoSize = False
        UIStyle = MacOS
        TabOrder = 2
        Transparent = True
        ModalResult = 0
        FocusedRectMargin = 2
        Layout = blGlyphLeft
        Spacing = 4
        MouseContinuouslyDownInterval = 100
        OnClick = suiButton4Click
        ResHandle = 0
      end
    end
    object suiComboBox1: TsuiComboBox
      Left = 64
      Top = 40
      Width = 57
      Height = 21
      UIStyle = MacOS
      BorderColor = 8355711
      ArrowColor = clBlack
      ButtonColor = 15198183
      ItemHeight = 13
      TabOrder = 10
      OnChange = suiComboBox1Change
      OnDblClick = suiComboBox1Change
      Items.Strings = (
        ''
        '0001'
        '0002'
        '0003'
        '0004'
        '0005'
        '0006'
        '0007'
        '0008'
        '0009'
        '0010'
        '0011'
        '0012'
        '0013'
        '0014'
        '0015'
        '0016'
        '0017'
        '0018'
        '0019'
        '0020'
        '')
    end
    object suiGroupBox3: TsuiGroupBox
      Left = 232
      Top = 80
      Width = 233
      Height = 73
      UIStyle = MacOS
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Transparent = True
      ParentColor = True
      ParentFont = False
      TabOrder = 11
      BorderColor = 8355711
      object suiButton3: TsuiButton
        Left = 160
        Top = 32
        Width = 65
        Height = 33
        Caption = #26126#32454#26597#35810
        AutoSize = False
        UIStyle = MacOS
        TabOrder = 0
        Transparent = True
        ModalResult = 0
        FocusedRectMargin = 2
        Layout = blGlyphLeft
        Spacing = 4
        MouseContinuouslyDownInterval = 100
        OnClick = suiButton3Click
        ResHandle = 0
      end
      object suiCheckBox1: TsuiCheckBox
        Left = 8
        Top = 16
        Width = 125
        Height = 21
        UIStyle = MacOS
        AutoSize = True
        Checked = False
        Caption = #30830#23450#26143#26399#26597#35810'('#21452#20987')'
        TabOrder = 1
        TabStop = True
        State = cbUnchecked
        Transparent = True
      end
      object suiListBox1: TsuiListBox
        Left = 8
        Top = 48
        Width = 97
        Height = 17
        UIStyle = MacOS
        BorderColor = 8355711
        Style = lbOwnerDrawFixed
        ItemHeight = 16
        Items.Strings = (
          #26143#26399#22825
          #26143#26399#19968
          #26143#26399#20108
          #26143#26399#19977
          #26143#26399#22235
          #26143#26399#20116
          #26143#26399#20845)
        TabOrder = 2
        OnDblClick = suiListBox1DblClick
      end
    end
    object Panel1: TPanel
      Left = 0
      Top = 285
      Width = 876
      Height = 250
      Align = alBottom
      Caption = 'Panel1'
      ParentColor = True
      ParentShowHint = False
      ShowHint = False
      TabOrder = 12
      object suiPanel1: TsuiPanel
        Left = 1
        Top = 1
        Width = 874
        Height = 184
        UIStyle = MacOS
        BorderColor = 8355711
        Caption = #26174#31034
        ShowButton = True
        CaptionFontColor = clBlack
        Align = alTop
        TabOrder = 0
        Color = clWhite
        object suiDBGrid1: TsuiDBGrid
          Left = 4
          Top = 25
          Width = 866
          Height = 155
          Align = alClient
          BorderStyle = bsNone
          Color = 15198183
          DataSource = dm.dayconn
          FixedColor = 12874553
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWhite
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          UIStyle = MacOS
          BorderColor = 8355711
          FocusedColor = clGreen
          SelectedColor = clYellow
          FontColor = clBlack
          TitleFontColor = clWhite
          FixedBGColor = 12874553
          BGColor = 15198183
        end
      end
      object suiDBGrid2: TsuiDBGrid
        Left = 1
        Top = 185
        Width = 874
        Height = 64
        Align = alClient
        BorderStyle = bsNone
        Color = 15198183
        DataSource = QueryForm.DataSource
        FixedColor = 12874553
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWhite
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UIStyle = MacOS
        BorderColor = 8355711
        FocusedColor = clGreen
        SelectedColor = clYellow
        FontColor = clBlack
        TitleFontColor = clWhite
        FixedBGColor = 12874553
        BGColor = 15198183
      end
    end
    object suiEdit2: TsuiEdit
      Left = 584