main.dfm

商品批发管理系统ADO版

            Width = 121
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dh'
            Title.Caption = #30005#35805
            Width = 59
            Visible = True
          end>
      end
      object Panel7: TPanel
        Left = 0
        Top = 226
        Width = 611
        Height = 41
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 1
        object EyhsglCX: TEdit
          Left = -8
          Top = 8
          Width = 121
          Height = 21
          TabOrder = 0
          OnKeyPress = EyhsglCXKeyPress
        end
        object Button8: TButton
          Left = 136
          Top = 8
          Width = 65
          Height = 25
          Caption = #26597#35810
          TabOrder = 1
          OnClick = Button8Click
        end
        object Button9: TButton
          Left = 208
          Top = 8
          Width = 75
          Height = 25
          Caption = #27169#31946#26597#35810
          TabOrder = 2
          OnClick = Button9Click
        end
        object Button22: TButton
          Left = 288
          Top = 8
          Width = 97
          Height = 25
          Caption = #28155#21152#36816#36135#21830#36164#26009
          TabOrder = 3
          OnClick = Button22Click
        end
        object Button23: TButton
          Left = 392
          Top = 8
          Width = 89
          Height = 25
          Caption = #20462#25913#36816#36135#21830#36164#26009
          TabOrder = 4
          OnClick = Button23Click
        end
        object Button24: TButton
          Left = 488
          Top = 8
          Width = 89
          Height = 25
          Caption = #21024#38500#36816#36135#21830#36164#26009
          TabOrder = 5
          OnClick = Button24Click
        end
        object DBEyhsglDW: TDBEdit
          Left = 8
          Top = 16
          Width = 0
          Height = 21
          DataField = 'yhsbh'
          DataSource = DM.DSyhsgl
          TabOrder = 6
        end
        object DBEyhsglCXDW: TDBEdit
          Left = 56
          Top = 16
          Width = 0
          Height = 21
          DataField = 'yhsbh'
          DataSource = DM.DSyhsglCX
          TabOrder = 7
        end
      end
      object RGyhsgl: TRadioGroup
        Left = 0
        Top = 193
        Width = 611
        Height = 33
        Align = alTop
        Caption = #26597#35810#23383#27573
        Columns = 5
        ItemIndex = 0
        Items.Strings = (
          #36816#36135#21830#32534#21495
          #36816#36135#21830#21517#31216
          #30005#35805)
        TabOrder = 2
        OnClick = RGyhsglClick
      end
      object DBGrid13: TDBGrid
        Left = 0
        Top = 267
        Width = 611
        Height = 95
        Align = alClient
        DataSource = DM.DSyhsglCX
        ReadOnly = True
        TabOrder = 3
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = DBGrid13CellClick
        OnKeyUp = DBGrid13KeyUp
      end
    end
    object TabSheet5: TTabSheet
      Caption = #38599#21592#31649#29702
      ImageIndex = 4
      OnShow = TabSheet5Show
      object DBGrid10: TDBGrid
        Left = 0
        Top = 0
        Width = 611
        Height = 153
        Align = alTop
        DataSource = DM.DSgygl
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'gybh'
            Title.Caption = #38599#21592#32534#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'xm'
            Title.Caption = #22995#21517
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'tx'
            Title.Caption = #22836#34900
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'zc'
            Title.Caption = #23562#31216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'csrq'
            Title.Caption = #20986#29983#26085#26399
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'gyrq'
            Title.Caption = #38599#20323#26085#26399
            Width = 62
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dz'
            Title.Caption = #22320#22336
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cs'
            Title.Caption = #22478#24066
            Width = 45
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dq'
            Title.Caption = #22320#21306
            Width = 48
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'yzbm'
            Title.Caption = #37038#25919#32534#30721
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'gj'
            Title.Caption = #22269#23478
            Width = 44
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dh'
            Title.Caption = #30005#35805
            Width = 59
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cz'
            Title.Caption = #20256#30495
            Visible = True
          end>
      end
      object RGgygl: TRadioGroup
        Left = 0
        Top = 153
        Width = 611
        Height = 57
        Align = alTop
        Caption = #23383#27573#32534#21495
        Columns = 5
        ItemIndex = 0
        Items.Strings = (
          #38599#21592#32534#21495
          #22995#21517
          #22836#34900
          #23562#31216
          #20986#29983#26085#26399
          #38599#20323#26085#26399
          #22320#22336
          #22478#24066
          #22320#21306
          #37038#25919#32534#30721
          #22269#23478
          #30005#35805
          #20256#30495)
        TabOrder = 1
        OnClick = RGgyglClick
      end
      object Panel6: TPanel
        Left = 0
        Top = 210
        Width = 611
        Height = 41
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 2
        object EgyglCX: TEdit
          Left = 16
          Top = 8
          Width = 121
          Height = 21
          TabOrder = 0
          OnKeyPress = EgyglCXKeyPress
        end
        object Button6: TButton
          Left = 144
          Top = 8
          Width = 75
          Height = 25
          Caption = #26597#35810
          TabOrder = 1
          OnClick = Button6Click
        end
        object Button7: TButton
          Left = 224
          Top = 8
          Width = 75
          Height = 25
          Caption = #27169#31946#26597#35810
          TabOrder = 2
          OnClick = Button7Click
        end
        object Button19: TButton
          Left = 304
          Top = 8
          Width = 81
          Height = 25
          Caption = #28155#21152#38599#21592#36164#26009
          TabOrder = 3
          OnClick = Button19Click
        end
        object Button20: TButton
          Left = 392
          Top = 8
          Width = 81
          Height = 25
          Caption = #20462#25913#38599#21592#36164#26009
          TabOrder = 4
          OnClick = Button20Click
        end
        object Button21: TButton
          Left = 480
          Top = 8
          Width = 89
          Height = 25
          Caption = #21024#38500#38599#21592#36164#26009
          TabOrder = 5
          OnClick = Button21Click
        end
        object DBEgyglDW: TDBEdit
          Left = 8
          Top = 24
          Width = 0
          Height = 21
          DataField = 'gybh'
          DataSource = DM.DSgygl
          TabOrder = 6
          Visible = False
        end
        object DBEgyglCXDW: TDBEdit
          Left = 56
          Top = 24
          Width = 0
          Height = 21
          DataField = 'gybh'
          DataSource = DM.DSgyglCX
          TabOrder = 7
          Visible = False
        end
      end
      object DBGrid11: TDBGrid
        Left = 0
        Top = 251
        Width = 611
        Height = 111
        Align = alClient
        DataSource = DM.DSgyglCX
        ReadOnly = True
        TabOrder = 3
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = DBGrid11CellClick
        OnKeyUp = DBGrid11KeyUp
      end
    end
    object TabSheet4: TTabSheet
      Caption = '--[ '#23450#21333#31649#29702' ]'
      ImageIndex = 3
      OnShow = TabSheet4Show
      object DBGrid7: TDBGrid
        Left = 0
        Top = 0
        Width = 611
        Height = 145
        Align = alTop
        DataSource = DM.DSddgl
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = DBGrid7CellClick