⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit_custindiserv.dfm

📁 一个不错的源程序DELPHI开发的,功能比较好的客户管理系统
💻 DFM
📖 第 1 页 / 共 5 页
字号:
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'SERVCONTENT'
              Title.Caption = '服务内容'
              Width = 207
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'BEGINDATE'
              Title.Caption = '开始时间'
              Width = 98
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'ENDDATE'
              Title.Caption = '结束时间'
              Width = 132
              Visible = True
            end>
        end
        object FlatComboBoxServMode4: TFlatComboBox
          Tag = 41
          Left = 66
          Top = 151
          Width = 121
          Height = 22
          Style = csDropDownList
          Color = clWindow
          ItemHeight = 14
          TabOrder = 18
          ItemIndex = -1
          OnChange = FlatComboBoxServMode4Change
        end
        object DBGrid6: TDBGrid
          Left = 8
          Top = 40
          Width = 354
          Height = 104
          DataSource = DataSourceRela
          ImeName = '中文 (简体) - 郑码'
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 19
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -14
          TitleFont.Name = '宋体'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'VID'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'VIPH'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'Rel_Type'
              Title.Caption = '关系类别'
              Width = 75
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Name'
              Title.Caption = '姓名'
              Width = 82
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Sex'
              Title.Caption = '性别'
              Width = 52
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Tel'
              Title.Caption = '电话号码'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Addr'
              Title.Caption = '联系地址'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Work'
              Title.Caption = '工作单位'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Intro'
              Title.Caption = '备注'
              Visible = True
            end>
        end
        object FlatButtonQuery2: TFlatButton
          Left = 656
          Top = 10
          Width = 74
          Height = 25
          Caption = '查询'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333FF3FF3333333333CC30003333333333773777333333333C33
            3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
            33003377333337F33377333333333C333300333F333337F33377339333333C33
            3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
            330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
            330077F377F337F33377993399333C33330077FF773337F33377399993333C33
            33333777733337F333FF333333333C33300033333333373FF7773333333333CC
            3000333333333377377733333333333333333333333333333333}
          Layout = blGlyphLeft
          NumGlyphs = 2
          TabOrder = 20
          OnClick = FlatButtonQuery2Click
        end
      end
      object FlatButton1: TFlatButton
        Tag = 1
        Left = 366
        Top = 394
        Width = 89
        Height = 25
        Caption = '增加'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333FF33333333FF333993333333300033377F3333333777333993333333
          300033F77FFF3333377739999993333333333777777F3333333F399999933333
          33003777777333333377333993333333330033377F3333333377333993333333
          3333333773333333333F333333333333330033333333F33333773333333C3333
          330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
          993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
          333333333337733333FF3333333C333330003333333733333777333333333333
          3000333333333333377733333333333333333333333333333333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 1
        OnClick = FlatButton1Click
      end
      object FlatButton3: TFlatButton
        Tag = 4
        Left = 459
        Top = 394
        Width = 89
        Height = 25
        Caption = '保存'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
          00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
          00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
          00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
          0003737FFFFFFFFF7F7330099999999900333777777777777733}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 2
        OnClick = FlatButton3Click
      end
      object FlatButton4: TFlatButton
        Tag = 5
        Left = 553
        Top = 394
        Width = 89
        Height = 25
        Caption = '取消'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 3
        OnClick = FlatButton4Click
      end
      object FlatButton5: TFlatButton
        Left = 647
        Top = 394
        Width = 89
        Height = 25
        Caption = '关闭'
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
          F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
          000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
          338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
          45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
          3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
          F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
          000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
          338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
          4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
          8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
          0000}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 4
        OnClick = FlatButton5Click
      end
    end
    object TabSheet2: TTabSheet
      Caption = '查询服务日志'
      ImageIndex = 1
      OnShow = TabSheet2Show
      object FlatButtonUpdate2: TFlatButton
        Tag = 2
        Left = 377
        Top = 394
        Width = 89
        Height = 25
        Caption = '修改'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
          000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
          00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
          F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
          0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
          FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
          FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
          0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
          00333377737FFFFF773333303300000003333337337777777333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 0
        OnClick = FlatButtonUpdate2Click
      end
      object FlatButtonSave2: TFlatButton
        Tag = 4
        Left = 468
        Top = 394
        Width = 89
        Height = 25
        Caption = '保存'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
          00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
          00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
          00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
          0003737FFFFFFFFF7F7330099999999900333777777777777733}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 1
        OnClick = FlatButtonSave2Click
      end
      object FlatButtonCancel2: TFlatButton
        Tag = 5
        Left = 559
        Top = 394
        Width = 89
        Height = 25
        Caption = '取消'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 2
        OnClick = FlatButtonCancel2Click
      end
      object FlatButtonClose2: TFlatButton
        Left = 650
        Top = 394
        Width = 89
        Height = 25
        Caption = '关闭'
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
          F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
          000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
          338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
          45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
          3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
          F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
          000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
          338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
          4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
          8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
          0000}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 3
        OnClick = FlatButtonClose2Click
      end
      object Panel2: TPanel
        Left = 1
        Top = 2
        Width = 742
        Height = 387
        BevelOuter = bvLowered
        TabOrder = 4
        object Label31: TLabel
          Left = 354
          Top = 151
          Width = 56
          Height = 14
          Caption = '服务方式'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label35: TLabel
          Left = 553
          Top = 151
          Width = 56
          Height = 14
          Caption = '服务性质'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label23: TLabel
          Left = 162
          Top = 178
          Width = 56
          Height = 14
          Caption = '开始时间'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label24: TLabel
          Left = 361
          Top = 178
          Width = 56
          Height = 14
          Caption = '结束时间'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label32: TLabel
          Left = 161
          Top = 206
          Width = 56
          Height = 14
          Caption = '服务对象'
          Font.Charset = GB2312_CHARSET

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -