jtyh.dfm

delphi开发的中国移动大客户管理系统,后台数据库为oracle

              Left = 410
              Top = 49
              Width = 95
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 15
              TabOrder = 4
            end
            object FlatComboBoxINFOGENDER: TFlatComboBox
              Tag = 20
              Left = 474
              Top = 117
              Width = 34
              Height = 22
              Color = clMenu
              ItemHeight = 14
              TabOrder = 5
              ItemIndex = -1
            end
            object FlatEditPHONE: TFlatEdit
              Left = 240
              Top = 50
              Width = 95
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 15
              TabOrder = 6
            end
            object FlatComboBoxEDUCODE: TFlatComboBox
              Tag = 22
              Left = 411
              Top = 71
              Width = 95
              Height = 22
              Color = clMenu
              ItemHeight = 14
              Items.Strings = (
                '男'
                '女')
              TabOrder = 7
              ItemIndex = -1
            end
            object FlatEditINFOJOB: TFlatEdit
              Left = 80
              Top = 96
              Width = 209
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 40
              TabOrder = 8
            end
            object FlatEditINFOADDR: TFlatEdit
              Left = 240
              Top = 27
              Width = 313
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 60
              TabOrder = 9
            end
            object FlatEditINFOPOSTCODE: TFlatEdit
              Left = 80
              Top = 73
              Width = 81
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 16
              TabOrder = 10
            end
            object FlatEditEMAIL: TFlatEdit
              Left = 80
              Top = 119
              Width = 209
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 40
              TabOrder = 11
            end
            object FlatEditIDCARD: TFlatEdit
              Left = 371
              Top = 95
              Width = 137
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 40
              TabOrder = 12
            end
            object FlatEditINFOBIRTH: TFlatEdit
              Left = 241
              Top = 72
              Width = 95
              Height = 20
              Hint = '日期格式：YYYY-MM-DD'
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 10
              ParentShowHint = False
              ShowHint = True
              TabOrder = 13
            end
            object FlatEditgh: TFlatEdit
              Left = 372
              Top = 118
              Width = 56
              Height = 19
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              MaxLength = 6
              TabOrder = 14
            end
            object Panel8: TPanel
              Left = 1
              Top = 201
              Width = 590
              Height = 235
              Align = alBottom
              BevelInner = bvLowered
              BevelOuter = bvNone
              TabOrder = 15
              object DBGridCustInfoMember: TDBGrid
                Left = 1
                Top = 1
                Width = 588
                Height = 233
                Hint = '点击右键弹出右菜单'
                Align = alClient
                DataSource = DataSourceCustInfoMember
                ParentShowHint = False
                PopupMenu = PopupMenu1
                ShowHint = True
                TabOrder = 0
                TitleFont.Charset = ANSI_CHARSET
                TitleFont.Color = clWindowText
                TitleFont.Height = -14
                TitleFont.Name = '宋体'
                TitleFont.Style = []
                Columns = <
                  item
                    Expanded = False
                    FieldName = 'INFOCODE'
                    Title.Caption = '信息员代号'
                    Width = 82
                    Visible = True
                  end
                  item
                    Expanded = False
                    FieldName = 'INFONAME'
                    Title.Caption = '信息员姓名'
                    Width = 129
                    Visible = True
                  end
                  item
                    Expanded = False
                    FieldName = 'INFOSID'
                    Title.Caption = '手机号码'
                    Width = 88
                    Visible = True
                  end
                  item
                    Expanded = False
                    FieldName = 'PHONE'
                    Title.Caption = '联系电话'
                    Width = 113
                    Visible = True
                  end
                  item
                    Expanded = False
                    FieldName = 'EMAIL'
                    Title.Caption = '电子邮件'
                    Width = 150
                    Visible = True
                  end>
              end
            end
            object FlatPanel1: TFlatPanel
              Left = 445
              Top = 165
              Width = 139
              Height = 33
              ParentColor = True
              TabOrder = 16
              UseDockManager = True
              object FlatButtoncancel1: TFlatButton
                Left = 70
                Top = 5
                Width = 63
                Height = 23
                ColorFocused = 7715583
                Caption = '取消'
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                  3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
                  3333333777333777FF33339993707399933333773337F3777FF3399933000339
                  9933377333777F3377F3399333707333993337733337333337FF993333333333
                  399377F33333F333377F993333303333399377F33337FF333373993333707333
                  333377F333777F333333993333101333333377F333777F3FFFFF993333000399
                  999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
                  99933773FF777F3F777F339993707399999333773F373F77777F333999999999
                  3393333777333777337333333999993333333333377777333333}
                Layout = blGlyphLeft
                NumGlyphs = 2
                TabOrder = 0
                OnClick = FlatButtoncancel1Click
              end
              object FlatButtonok1: TFlatButton
                Tag = 4
                Left = 6
                Top = 5
                Width = 60
                Height = 23
                ColorFocused = 7715583
                Caption = '保存'
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000120B0000120B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                  333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
                  00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
                  00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
                  00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
                  00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
                  00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
                  00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
                  0003737FFFFFFFFF7F7330099999999900333777777777777733}
                Layout = blGlyphLeft
                NumGlyphs = 2
                TabOrder = 1
                OnClick = FlatButtonok1Click
              end
            end
          end
        end
        object TabSheet4: TTabSheet
          Caption = '纪念日档案'
          ImageIndex = 3
          object Label55: TLabel
            Left = 24
            Top = 64
            Width = 7
            Height = 14
          end
          object Panel9: TPanel
            Left = 0
            Top = 0
            Width = 592
            Height = 437
            Align = alClient
            TabOrder = 0
            object Label57: TLabel
              Left = 8
              Top = 80
              Width = 98
              Height = 14
              Caption = '纪念日开始日期'
            end
            object Label58: TLabel
              Left = 204
              Top = 80
              Width = 56
              Height = 14
              Caption = '结束日期'
            end
            object Label59: TLabel
              Left = 8
              Top = 104
              Width = 98
              Height = 14
              Caption = '集团纪念日备注'
            end
            object Label63: TLabel
              Left = 8
              Top = 31
              Width = 56
              Height = 14
              Caption = '集团名称'
            end
            object Label64: TLabel
              Left = 8
              Top = 8
              Width = 56
              Height = 14
              Caption = '集团代码'
            end
            object Label65: TLabel
              Left = 8
              Top = 56
              Width = 98
              Height = 14
              Caption = '集团纪念日标题'
            end
            object FlatEditjtyhmc2: TFlatEdit
              Left = 110
              Top = 28
              Width = 311
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              TabOrder = 0
            end
            object FlatEditjtyhdm2: TFlatEdit
              Left = 110
              Top = 5
              Width = 81
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              Enabled = False
              TabOrder = 1
            end
            object FlatEditGMEMO_SDATE: TFlatEdit
              Left = 110
              Top = 76
              Width = 89
              Height = 20
              Hint = '日期格式：YYYY-MM-DD'
              ColorFlat = clBtnFace
              ParentColor = True
              MaxLength = 10
              ParentShowHint = False
              ShowHint = True
              TabOrder = 2
            end
            object FlatEditGMEMO_EDATE: TFlatEdit
              Left = 266
              Top = 76
              Width = 91
              Height = 20
              Hint = '日期格式：YYYY-MM-DD'
              ColorFlat = clBtnFace
              ParentColor = True
              MaxLength = 10
              ParentShowHint = False
              ShowHint = True
              TabOrder = 3
            end
            object FlatEditGMEMO_NAME: TFlatEdit
              Left = 110
              Top = 52
              Width = 247
              Height = 20
              ColorFlat = clBtnFace
              ParentColor = True
              MaxLength = 40
              TabOrder = 4
            end
            object FlatMemoGMEMO_MEMO: TFlatMemo
              Left = 8
              Top = 120
              Width = 353
              Height = 105
              ColorFlat = clBtnFace
              ParentColor = True
              ScrollBars = ssVertical
              TabOrder = 5
              Lines.Strings = (
                '')
            end
            object Panel10: TPanel
              Left = 1
              Top = 223
              Width = 590
              Height = 213
              Align = alBottom
              BevelInner = bvLowered
              BevelOuter = bvNone
              Caption = 'Panel10'
              TabOrder = 6
              object DBGridQueryGroupMemoDay: TDBGrid
                Left = 1