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

📄 unit_groupindiserv.dfm

📁 一个不错的源程序DELPHI开发的,功能比较好的客户管理系统
💻 DFM
📖 第 1 页 / 共 5 页
字号:
        end
        object Label24: TLabel
          Left = 365
          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
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label33: TLabel
          Left = 354
          Top = 206
          Width = 56
          Height = 14
          Caption = '对象名称'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label34: TLabel
          Left = 554
          Top = 206
          Width = 56
          Height = 14
          Caption = '服务质量'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label19: TLabel
          Left = 161
          Top = 233
          Width = 56
          Height = 14
          Caption = '服务金额'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label21: TLabel
          Left = 354
          Top = 233
          Width = 56
          Height = 14
          Caption = '耗费金额'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label20: TLabel
          Left = 304
          Top = 233
          Width = 14
          Height = 14
          Caption = '元'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label22: TLabel
          Left = 495
          Top = 233
          Width = 14
          Height = 14
          Caption = '元'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label25: TLabel
          Left = 554
          Top = 233
          Width = 56
          Height = 14
          Caption = '实际金额'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label36: TLabel
          Left = 718
          Top = 233
          Width = 14
          Height = 14
          Caption = '元'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label26: TLabel
          Left = 161
          Top = 260
          Width = 56
          Height = 14
          Caption = '服务内容'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object LabelServiceCode2: TLabel
          Left = 525
          Top = 260
          Width = 56
          Height = 14
          Caption = '服务序号'
          Visible = False
        end
        object Label27: TLabel
          Left = 160
          Top = 325
          Width = 56
          Height = 14
          Caption = '获得信息'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label28: TLabel
          Left = 456
          Top = 325
          Width = 56
          Height = 14
          Caption = '用户意见'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label56: TLabel
          Left = 554
          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 Label57: TLabel
          Left = 10
          Top = 13
          Width = 28
          Height = 14
          Caption = '地市'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label58: TLabel
          Left = 10
          Top = 40
          Width = 28
          Height = 14
          Caption = '局向'
          Font.Charset = GB2312_CHARSET
          Font.Color = clBlack
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label92: TLabel
          Left = 10
          Top = 68
          Width = 28
          Height = 14
          Caption = '工号'
        end
        object Label59: TLabel
          Left = 22
          Top = 117
          Width = 14
          Height = 14
          Caption = '从'
        end
        object Label60: TLabel
          Left = 9
          Top = 220
          Width = 56
          Height = 14
          Caption = '集团名称'
        end
        object FlatMaskEditBeginDate2Q: TFlatMaskEdit
          Left = 41
          Top = 114
          Width = 110
          Height = 22
          Hint = '格式:YYYY-MM-DD'
          ColorFlat = clWindow
          AutoSize = False
          BorderStyle = bsNone
          EditMask = '0000-00-00;1;_'
          MaxLength = 10
          TabOrder = 0
          Text = '    -  -  '
          ImeName = '中文 (简体) - 郑码'
        end
        object FlatMaskEditEndDate2Q: TFlatMaskEdit
          Left = 41
          Top = 140
          Width = 110
          Height = 22
          Hint = '格式:YYYY-MM-DD'
          ColorFlat = clWindow
          AutoSize = False
          BorderStyle = bsNone
          EditMask = '0000-00-00;1;_'
          MaxLength = 10
          TabOrder = 15
          Text = '    -  -  '
          ImeName = '中文 (简体) - 郑码'
        end
        object FlatComboBoxServKind2Q: TFlatComboBox
          Left = 41
          Top = 190
          Width = 110
          Height = 22
          Style = csDropDownList
          Color = clWindow
          ItemHeight = 14
          Items.Strings = (
            ''
            '主动服务'
            '被动服务')
          TabOrder = 16
          ItemIndex = -1
        end
        object FlatCheckBoxFinish2Q: TFlatCheckBox
          Left = 10
          Top = 271
          Width = 87
          Height = 17
          Caption = '未完成标志'
          TabOrder = 17
          TabStop = True
        end
        object FlatButton9: TFlatButton
          Left = 39
          Top = 310
          Width = 80
          Height = 25
          Caption = '查询'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            04000000000000010000130B0000130B00001000000000000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333FF3FF3333333333CC30003333333333773777333333333C33
            3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
            33003377333337F33377333333333C333300333F333337F33377339333333C33
            3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
            330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
            330077F377F337F33377993399333C33330077FF773337F33377399993333C33
            33333777733337F333FF333333333C33300033333333373FF7773333333333CC
            3000333333333377377733333333333333333333333333333333}
          Layout = blGlyphLeft
          NumGlyphs = 2
          TabOrder = 18
          OnClick = FlatButton9Click
        end
        object DBGridSerLog: TDBGrid
          Left = 165
          Top = 7
          Width = 567
          Height = 135
          DataSource = DataSourceServeLog2
          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 = 'SERVICECODE'
              Title.Caption = '序号'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'Beg_Date'
              Title.Caption = '开始日期'
              Width = 83
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'End_Date'
              Title.Caption = '结束日期'
              Width = 86
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'ObjFlag'
              Title.Caption = '大户标志'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'ServObj'
              Title.Caption = '服务对象'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'ObjName'
              Title.Caption = '对象名称'
              Width = 136
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'Finish'
              Title.Caption = '完成标志'
              Width = 145
              Visible = True
            end>
        end
        object FlatCheckBoxFinish2: TFlatCheckBox
          Left = 165
          Top = 150
          Width = 90
          Height = 17
          Caption = '未完成标志'
          Checked = True
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          TabStop = True
          OnClick = FlatCheckBoxFinish2Click
        end
        object FlatComboBoxServMode2: TFlatComboBox
          Tag = 41
          Left = 368
          Top = 147
          Width = 125
          Height = 22
          Color = clWindow
          ItemHeight = 14
          TabOrder = 2
  

⌨️ 快捷键说明

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