fout.dfm.~246~

delphi2007开发的汽车配件进销存系统.实用级的源码.

object frmout: Tfrmout
  Left = 0
  Top = 0
  Caption = #38144#21806
  ClientHeight = 559
  ClientWidth = 922
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  DesignSize = (
    922
    559)
  PixelsPerInch = 96
  TextHeight = 13
  object cxPageControl1: TcxPageControl
    AlignWithMargins = True
    Left = 3
    Top = 3
    Width = 916
    Height = 553
    ActivePage = cxTabSheet1
    Align = alClient
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    ShowFrame = True
    Style = 8
    TabOrder = 0
    ClientRectBottom = 552
    ClientRectLeft = 1
    ClientRectRight = 915
    ClientRectTop = 25
    object cxTabSheet1: TcxTabSheet
      Caption = #38144#21806' - '#21019#24314#21333#35777
      ImageIndex = 0
      DesignSize = (
        914
        527)
      object cxGroupBox1: TcxGroupBox
        Left = 360
        Top = 1
        Anchors = [akLeft, akTop, akRight, akBottom]
        Caption = #21333#25454#35814#32454#20449#24687
        Style.LookAndFeel.Kind = lfOffice11
        StyleDisabled.LookAndFeel.Kind = lfOffice11
        StyleFocused.LookAndFeel.Kind = lfOffice11
        StyleHot.LookAndFeel.Kind = lfOffice11
        TabOrder = 1
        DesignSize = (
          549
          265)
        Height = 265
        Width = 549
        object DBGridEh1: TDBGridEh
          Left = 3
          Top = 73
          Width = 543
          Height = 157
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.ds8
          Flat = False
          FooterColor = clWindow
          FooterFont.Charset = ANSI_CHARSET
          FooterFont.Color = clWindowText
          FooterFont.Height = -12
          FooterFont.Name = #23435#20307
          FooterFont.Style = []
          FooterRowCount = 1
          SumList.Active = True
          TabOrder = 5
          TitleFont.Charset = ANSI_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          OnCellClick = DBGridEh1CellClick
          OnColExit = DBGridEh1ColExit
          OnDrawColumnCell = DBGridEh1DrawColumnCell
          OnDrawDataCell = DBGridEh1DrawDataCell
          OnKeyPress = DBGridEh1KeyPress
          Columns = <
            item
              EditButtons = <>
              Footers = <>
              Width = 30
            end
            item
              EditButtons = <>
              FieldName = 'xsdh'
              Footer.Value = #21512#35745#65306
              Footer.ValueType = fvtStaticText
              Footers = <>
              ReadOnly = True
              Visible = False
              Width = 100
            end
            item
              EditButtons = <>
              FieldName = 'bm'
              Footer.Value = #21512#35745#65306
              Footer.ValueType = fvtStaticText
              Footers = <>
              Width = 80
            end
            item
              EditButtons = <>
              FieldName = 'pm'
              Footers = <>
              Width = 100
            end
            item
              EditButtons = <>
              FieldName = 'gg'
              Footers = <>
              Width = 80
            end
            item
              EditButtons = <>
              FieldName = 'cd'
              Footers = <>
              Width = 80
            end
            item
              EditButtons = <>
              FieldName = 'sl'
              Footer.FieldName = 'sl'
              Footer.ValueType = fvtSum
              Footers = <>
              Width = 50
            end
            item
              DisplayFormat = #65509'0.00'
              EditButtons = <>
              FieldName = 'jj'
              Footers = <>
              Visible = False
            end
            item
              DisplayFormat = #65509'0.00'
              EditButtons = <>
              FieldName = 'dj'
              Footers = <>
              Width = 80
            end
            item
              DisplayFormat = #65509'0.00'
              EditButtons = <>
              FieldName = 'je'
              Footer.DisplayFormat = #65509'0.00'
              Footer.FieldName = 'je'
              Footer.ValueType = fvtSum
              Footers = <>
              Width = 100
            end>
        end
        object cxButton2: TcxButton
          Left = 311
          Top = 234
          Width = 75
          Height = 25
          Anchors = [akRight, akBottom]
          Caption = #21024#38500#19968#26465
          TabOrder = 7
          OnClick = cxButton2Click
        end
        object cxButton3: TcxButton
          Left = 228
          Top = 234
          Width = 75
          Height = 25
          Anchors = [akRight, akBottom]
          Caption = #26032#24314#21333#25454
          TabOrder = 6
          OnClick = cxButton3Click
        end
        object cxButton4: TcxButton
          Left = 472
          Top = 234
          Width = 75
          Height = 25
          Anchors = [akRight, akBottom]
          Caption = #25171#21360
          TabOrder = 14
          OnClick = cxButton4Click
        end
        object cxButton7: TcxButton
          Left = 422
          Top = 21
          Width = 114
          Height = 45
          Caption = #26032#24314#23458#25143#36164#26009
          TabOrder = 1
          OnClick = cxButton7Click
        end
        object cxButton8: TcxButton
          Left = 147
          Top = 234
          Width = 75
          Height = 25
          Anchors = [akRight, akBottom]
          Caption = #20445#23384#21333#25454
          TabOrder = 8
          Visible = False
          OnClick = cxButton8Click
        end
        object cxLabel2: TcxLabel
          Left = 7
          Top = 237
          Anchors = [akLeft, akBottom]
          Caption = #21333#21495#65306
          Transparent = True
        end
        object cxDBLabel1: TcxDBLabel
          Left = 46
          Top = 236
          Anchors = [akLeft, akBottom]
          DataBinding.DataField = 'xsdh'
          DataBinding.DataSource = DM.ds8
          ParentColor = False
          Style.Color = clSkyBlue
          Style.Shadow = False
          StyleFocused.BorderColor = clInfoText
          StyleFocused.BorderStyle = ebsOffice11
          StyleFocused.TextColor = clInfoText
          StyleFocused.TextStyle = []
          Transparent = True
          Height = 17
          Width = 89
        end
        object cxLabel3: TcxLabel
          Left = 46
          Top = 235
          Anchors = [akLeft, akBottom]
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clWindowText
          Style.Font.Height = -16
          Style.Font.Name = 'Fixedsys'
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object cxDBTextEdit2: TcxDBTextEdit
          Left = 76
          Top = 23
          DataBinding.DataField = 'dwmc'
          DataBinding.DataSource = DM.ds7
          TabOrder = 2
          Width = 121
        end
        object cxDBTextEdit3: TcxDBTextEdit
          Left = 283
          Top = 21
          DataBinding.DataField = 'lxr'
          DataBinding.DataSource = DM.ds7
          TabOrder = 0
          Width = 121
        end
        object cxDBTextEdit4: TcxDBTextEdit
          Left = 76
          Top = 47
          DataBinding.DataField = 'ch'
          DataBinding.DataSource = DM.ds7
          TabOrder = 3
          Width = 121
        end
        object cxDBTextEdit5: TcxDBTextEdit
          Left = 283
          Top = 47
          DataBinding.DataField = 'dh'
          DataBinding.DataSource = DM.ds7
          TabOrder = 4
          Width = 121
        end
        object cxLabel4: TcxLabel
          Left = 11
          Top = 23
          Caption = #21333#20301#21517#31216#65306
          Transparent = True
        end
        object cxLabel5: TcxLabel
          Left = 218
          Top = 24
          Caption = #32852' '#31995' '#20154#65306
          Transparent = True
        end
        object cxLabel6: TcxLabel
          Left = 11
          Top = 51
          Caption = #36710#36742#29260#21495#65306
          Transparent = True
        end
        object cxLabel7: TcxLabel
          Left = 218
          Top = 49
          Caption = #30005#35805#21495#30721#65306
          Transparent = True
        end
        object cxButton5: TcxButton
          Left = 391
          Top = 234
          Width = 75
          Height = 25
          Anchors = [akRight, akBottom]
          Caption = #32467#36134
          TabOrder = 9
          OnClick = cxButton5Click
        end
        object Memo1: TMemo
          Left = 76
          Top = 120
          Width = 77
          Height = 57
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'Fixedsys'
          Font.Style = []
          ParentFont = False
          ScrollBars = ssBoth
          TabOrder = 18
          Visible = False
        end
      end
      object cxGroupBox2: TcxGroupBox
        Left = 360
        Top = 272
        Anchors = [akLeft, akRight, akBottom]
        Caption = #37197#20214#20449#24687
        Style.LookAndFeel.Kind = lfOffice11
        StyleDisabled.LookAndFeel.Kind = lfOffice11
        StyleFocused.LookAndFeel.Kind = lfOffice11
        StyleHot.LookAndFeel.Kind = lfOffice11
        TabOrder = 2
        DesignSize = (
          549
          248)
        Height = 248
        Width = 549
        object cxTextEdit1: TcxTextEdit
          Left = 3
          Top = 20
          Anchors = [akLeft, akTop, akRight]
          Style.LookAndFeel.Kind = lfOffice11
          Style.LookAndFeel.NativeStyle = False
          StyleDisabled.LookAndFeel.Kind = lfOffice11
          StyleDisabled.LookAndFeel.NativeStyle = False
          StyleFocused.LookAndFeel.Kind = lfOffice11
          StyleFocused.LookAndFeel.NativeStyle = False
          StyleHot.LookAndFeel.Kind = lfOffice11
          StyleHot.LookAndFeel.NativeStyle = False
          TabOrder = 0
          Text = #36755#20837#26597#35810#26465#20214'('#32534#30721#25110#21697#21517#25110#35268#26684')'
          OnClick = cxTextEdit1Click
          OnKeyUp = cxTextEdit1KeyUp
          Width = 543
        end
        object DBGridEh2: TDBGridEh
          Left = 3
          Top = 41
          Width = 543
          Height = 204
          Anchors = [akLeft, akTop, akRight, akBottom]
          DataSource = DM.ds3
          Flat = False
          FooterColor = clWindow
          FooterFont.Charset = ANSI_CHARSET
          FooterFont.Color = clWindowText
          FooterFont.Height = -12
          FooterFont.Name = #23435#20307
          FooterFont.Style = []
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          SumList.Active = True
          TabOrder = 1
          TitleFont.Charset = ANSI_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          OnDblClick = DBGridEh2DblClick
          Columns = <
            item
              EditButtons = <>
              FieldName = 'hw'
              Footers = <>
              Width = 54
            end
            item
              EditButtons = <>
              FieldName = 'bm'
              Footers = <>
              Width = 84
            end
            item
              EditButtons = <>
              FieldName = 'pm'
              Footers = <>
              Width = 73
            end
            item
              EditButtons = <>