ord150_02.dfm

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

          end
          object lblClass: TLabel
            Tag = 1
            Left = 32
            Top = 96
            Width = 48
            Height = 12
            Caption = #23458#25143#20998#31867
          end
          object lblRegion: TLabel
            Tag = 1
            Left = 408
            Top = 96
            Width = 48
            Height = 12
            Caption = #25152#23646#22320#21306
          end
          object lblAddress: TLabel
            Left = 32
            Top = 120
            Width = 48
            Height = 12
            Caption = #36890#35759#22320#22336
            FocusControl = edtAddress
          end
          object lblPostalcode: TLabel
            Left = 464
            Top = 168
            Width = 48
            Height = 12
            Caption = #37038#25919#32534#30721
            FocusControl = edtPostalcode
          end
          object lblStatus: TLabel
            Tag = 1
            Left = 496
            Top = 24
            Width = 48
            Height = 12
            Caption = #23458#25143#29366#24577
          end
          object sbRegion: TSpeedButton
            Left = 674
            Top = 88
            Width = 22
            Height = 19
            Hint = #23458#25143#36164#26009#32500#25252
            Flat = True
            Glyph.Data = {
              42020000424D4202000000000000420000002800000010000000100000000100
              1000030000000002000000000000000000000000000000000000007C0000E003
              00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
              1F7C1F7C1F7C1F7C1F7C10421042104210421042104210421042104210421042
              1042104210421F7C000000000000000000000000000000000000000000000000
              0000000010421F7C0000FF7FE07FFF7FE07FFF7FE07FFF7FE07F00000000FF7F
              E07F000010421F7C0000E07FFF7FE07FFF7FE07FFF7FE07FFF7F00001F7C0000
              FF7F000010421F7C0000FF7F0000FF7F0000FF7F0000FF7FE07F0000E07F1F7C
              0000000010421F7C0000E07FFF7FE07FFF7FE07F00000000FF7F000000000000
              0000000010421F7C0000FF7FE07FFF7FE07FFF7F0000E07F0000FF7FE07FFF7F
              E07F000010421F7C0000E07FFF7FE07FFF7FE07F0000E07F0000E07FFF7FE07F
              FF7F000010421F7C0000FF7FE07FFF7FE07FFF7F0000E07FE07F0000E07FFF7F
              E07F000010421F7C0000E07FFF7FE07FFF7FE07F0000E07FE07F0000FF7FE07F
              FF7F000010421F7C00000000000000000000000000000000E07FE07F00000000
              000000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000E07FE07F00001F7C
              1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000
              1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000004000400000
              1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C000000001F7C
              1F7C1F7C1F7C}
            Visible = False
            OnClick = sbRegionClick
          end
          object sbClass: TSpeedButton
            Left = 298
            Top = 88
            Width = 22
            Height = 19
            Hint = #23458#25143#36164#26009#32500#25252
            Flat = True
            Glyph.Data = {
              42020000424D4202000000000000420000002800000010000000100000000100
              1000030000000002000000000000000000000000000000000000007C0000E003
              00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
              1F7C1F7C1F7C1F7C1F7C10421042104210421042104210421042104210421042
              1042104210421F7C000000000000000000000000000000000000000000000000
              0000000010421F7C0000FF7FE07FFF7FE07FFF7FE07FFF7FE07F00000000FF7F
              E07F000010421F7C0000E07FFF7FE07FFF7FE07FFF7FE07FFF7F00001F7C0000
              FF7F000010421F7C0000FF7F0000FF7F0000FF7F0000FF7FE07F0000E07F1F7C
              0000000010421F7C0000E07FFF7FE07FFF7FE07F00000000FF7F000000000000
              0000000010421F7C0000FF7FE07FFF7FE07FFF7F0000E07F0000FF7FE07FFF7F
              E07F000010421F7C0000E07FFF7FE07FFF7FE07F0000E07F0000E07FFF7FE07F
              FF7F000010421F7C0000FF7FE07FFF7FE07FFF7F0000E07FE07F0000E07FFF7F
              E07F000010421F7C0000E07FFF7FE07FFF7FE07F0000E07FE07F0000FF7FE07F
              FF7F000010421F7C00000000000000000000000000000000E07FE07F00000000
              000000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000E07FE07F00001F7C
              1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000
              1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C0000004000400000
              1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C000000001F7C
              1F7C1F7C1F7C}
            OnClick = sbClassClick
          end
          object lblEngNm: TLabel
            Left = 32
            Top = 72
            Width = 48
            Height = 12
            Caption = #33521#25991#21517#31216
            FocusControl = edtEngNm
          end
          object lblEngAd: TLabel
            Left = 32
            Top = 144
            Width = 48
            Height = 12
            Caption = #33521#25991#22320#22336
            FocusControl = edtEngAd
          end
          object edtCustNo: TDBEdit
            Left = 88
            Top = 16
            Width = 121
            Height = 20
            DataField = 'O150_002'
            DataSource = dsOrd150
            TabOrder = 0
          end
          object edtName: TDBEdit
            Left = 88
            Top = 40
            Width = 393
            Height = 20
            DataField = 'O150_003'
            DataSource = dsOrd150
            TabOrder = 3
          end
          object edtShort: TDBEdit
            Left = 280
            Top = 16
            Width = 201
            Height = 20
            DataField = 'O150_004'
            DataSource = dsOrd150
            TabOrder = 1
          end
          object edtPhone: TDBEdit
            Left = 88
            Top = 160
            Width = 145
            Height = 20
            DataField = 'O150_005'
            DataSource = dsOrd150
            TabOrder = 10
          end
          object edtFax: TDBEdit
            Left = 304
            Top = 160
            Width = 145
            Height = 20
            DataField = 'O150_006'
            DataSource = dsOrd150
            TabOrder = 11
          end
          object edtEmail: TDBEdit
            Left = 88
            Top = 184
            Width = 209
            Height = 20
            DataField = 'O150_007'
            DataSource = dsOrd150
            TabOrder = 13
          end
          object edtSite: TDBEdit
            Left = 464
            Top = 184
            Width = 209
            Height = 20
            DataField = 'O150_008'
            DataSource = dsOrd150
            TabOrder = 14
          end
          object edtAddress: TDBEdit
            Left = 88
            Top = 112
            Width = 585
            Height = 20
            DataField = 'O150_012'
            DataSource = dsOrd150
            TabOrder = 8
          end
          object edtPostalcode: TDBEdit
            Left = 520
            Top = 160
            Width = 153
            Height = 20
            DataField = 'O150_013'
            DataSource = dsOrd150
            TabOrder = 12
          end
          object cbStatus: TComboBox
            Left = 552
            Top = 16
            Width = 121
            Height = 20
            Style = csDropDownList
            ItemHeight = 12
            TabOrder = 2
            Items.Strings = (
              '0='#27491#24120
              '1='#38145#23450
              '2='#28508#22312)
          end
          object cbType: TComboBox
            Left = 552
            Top = 40
            Width = 121
            Height = 20
            Style = csDropDownList
            ItemHeight = 12
            TabOrder = 4
            Items.Strings = (
              '0='#23458#25143
              '1='#20379#24212#21830
              '2='#23458#25143'&'#20379#24212#21830)
          end
          object cbClass: TdxDBLookupTreeView
            Left = 88
            Top = 88
            Width = 209
            Height = 20
            CanSelectParents = False
            ParentColor = False
            TabOrder = 6
            TabStop = True
            Text = 'cbClass'
            TreeViewColor = clWindow
            TreeViewCursor = crDefault
            TreeViewFont.Charset = DEFAULT_CHARSET
            TreeViewFont.Color = clWindowText
            TreeViewFont.Height = -11
            TreeViewFont.Name = 'MS Sans Serif'
            TreeViewFont.Style = []
            TreeViewIndent = 19
            TreeViewReadOnly = True
            TreeViewShowButtons = True
            TreeViewShowHint = False
            TreeViewShowLines = True
            TreeViewShowRoot = True
            TreeViewSortType = stNone
            DividedChar = '.'
            ListSource = dsOrd110
            KeyField = 'O110_001'
            ListField = 'O110_002'
            Options = [trDBConfirmDelete, trCanDBNavigate, trSmartRecordCopy, trCheckHasChildren]
            ParentField = 'O110_003'
            TextStyle = tvtsShort
            DataField = 'O150_010'
            DataSource = dsOrd150
          end
          object cbRegion: TdxDBLookupTreeView
            Left = 464
            Top = 88
            Width = 209
            Height = 20
            CanSelectParents = False
            ParentColor = False
            TabOrder = 7
            TabStop = True
            Text = 'cbRegion'
            TreeViewColor = clWindow