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

📄 unit_custindiserv.dfm

📁 一个不错的源程序DELPHI开发的,功能比较好的客户管理系统
💻 DFM
📖 第 1 页 / 共 5 页
字号:
        end
        object Label43: TLabel
          Left = 7
          Top = 184
          Width = 56
          Height = 14
          Caption = '开始时间'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label44: TLabel
          Left = 212
          Top = 184
          Width = 56
          Height = 14
          Caption = '结束时间'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label45: TLabel
          Left = 7
          Top = 214
          Width = 56
          Height = 14
          Caption = '服务金额'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label46: TLabel
          Left = 158
          Top = 214
          Width = 14
          Height = 14
          Caption = '元'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label47: TLabel
          Left = 214
          Top = 214
          Width = 56
          Height = 14
          Caption = '耗费金额'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label48: TLabel
          Left = 356
          Top = 214
          Width = 14
          Height = 14
          Caption = '元'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label49: TLabel
          Left = 430
          Top = 214
          Width = 56
          Height = 14
          Caption = '实际金额'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label50: TLabel
          Left = 581
          Top = 214
          Width = 14
          Height = 14
          Caption = '元'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label51: TLabel
          Left = 7
          Top = 243
          Width = 56
          Height = 14
          Caption = '服务内容'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label52: TLabel
          Left = 7
          Top = 293
          Width = 56
          Height = 14
          Caption = '获得信息'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label53: TLabel
          Left = 7
          Top = 340
          Width = 56
          Height = 14
          Caption = '用户意见'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label54: TLabel
          Left = 8
          Top = 155
          Width = 56
          Height = 14
          Caption = '服务方式'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object FlatRadioButtonCust4: TFlatRadioButton
          Left = 7
          Top = 16
          Width = 81
          Height = 17
          Caption = '个人大户'
          Checked = True
          Enabled = False
          TabOrder = 0
          TabStop = True
          OnClick = FlatRadioButtonCust1Click
        end
        object FlatRadioButtonRela4: TFlatRadioButton
          Left = 89
          Top = 16
          Width = 73
          Height = 17
          Caption = '亲属伙伴'
          Enabled = False
          TabOrder = 1
        end
        object FlatComboBoxServQuality4: TFlatComboBox
          Tag = 42
          Left = 497
          Top = 151
          Width = 118
          Height = 22
          Style = csDropDownList
          Color = clWindow
          ItemHeight = 14
          TabOrder = 2
          ItemIndex = -1
          OnChange = FlatComboBoxServQuality4Change
        end
        object FlatEditObjectName4: TFlatEdit
          Tag = 1
          Left = 444
          Top = 13
          Width = 201
          Height = 20
          ColorFlat = clWhite
          Enabled = False
          TabOrder = 3
        end
        object FlatEditObject4Value: TFlatEdit
          Left = 241
          Top = 13
          Width = 129
          Height = 20
          ColorFlat = clWhite
          Enabled = False
          TabOrder = 4
          OnKeyPress = FlatEditObject4ValueKeyPress
        end
        object FlatComboBoxServKind4: TFlatComboBox
          Tag = 1
          Left = 273
          Top = 151
          Width = 130
          Height = 22
          Style = csDropDownList
          Color = clWindow
          ItemHeight = 14
          Items.Strings = (
            '主动服务'
            '被叫服务')
          TabOrder = 5
          Text = '主动服务'
          ItemIndex = 0
        end
        object FlatMaskEditBeginDate4: TFlatMaskEdit
          Tag = 7
          Left = 68
          Top = 181
          Width = 81
          Height = 20
          Hint = '格式:YYYY-MM-DD'
          ColorFlat = clWhite
          AutoSize = False
          BorderStyle = bsNone
          Color = clWhite
          Enabled = False
          EditMask = '0000-00-00;1;_'
          MaxLength = 10
          TabOrder = 6
          Text = '    -  -  '
          OnExit = FlatMaskEditBeginDate1Exit
          ImeName = '中文 (简体) - 郑码'
        end
        object FlatMaskEditBeginTime4: TFlatMaskEdit
          Tag = 8
          Left = 153
          Top = 181
          Width = 42
          Height = 20
          ColorFlat = clWhite
          AutoSize = False
          BorderStyle = bsNone
          Color = clWhite
          Enabled = False
          EditMask = '00:00;1;_'
          MaxLength = 5
          TabOrder = 7
          Text = '00:00'
          ImeName = '中文 (简体) - 郑码'
        end
        object FlatMaskEditEndDate4: TFlatMaskEdit
          Tag = 9
          Left = 271
          Top = 181
          Width = 81
          Height = 20
          Hint = '格式:YYYY-MM-DD'
          ColorFlat = clWhite
          AutoSize = False
          BorderStyle = bsNone
          Color = clWhite
          Enabled = False
          TabOrder = 8
          OnExit = FlatMaskEditEndDate1Exit
          ImeName = '中文 (简体) - 郑码'
        end
        object FlatMaskEditEndTime4: TFlatMaskEdit
          Tag = 10
          Left = 355
          Top = 181
          Width = 42
          Height = 20
          ColorFlat = clWhite
          AutoSize = False
          BorderStyle = bsNone
          Color = clWhite
          Enabled = False
          TabOrder = 9
          ImeName = '中文 (简体) - 郑码'
        end
        object FlatCheckBoxFinish4: TFlatCheckBox
          Tag = 1
          Left = 433
          Top = 183
          Width = 79
          Height = 17
          Caption = '完成标志'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -14
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 10
          TabStop = True
          OnClick = FlatCheckBoxFinish4Click
        end
        object FlatEditServMoney4: TFlatEdit
          Tag = 1
          Left = 68
          Top = 211
          Width = 87
          Height = 20
          ColorFlat = clWhite
          MaxLength = 7
          TabOrder = 11
          OnChange = FlatEditServMoney4Change
          OnKeyPress = FlatEditServMoney1KeyPress
        end
        object FlatEditUseMoney4: TFlatEdit
          Tag = 1
          Left = 270
          Top = 211
          Width = 84
          Height = 20
          ColorFlat = clWhite
          MaxLength = 7
          TabOrder = 12
          OnChange = FlatEditUseMoney4Change
          OnKeyPress = FlatEditUseMoney1KeyPress
        end
        object FlatSpinEditFloatTotalMoney4: TFlatSpinEditFloat
          Tag = 1
          Left = 488
          Top = 211
          Width = 89
          Height = 21
          ColorFlat = clWhite
          AutoSize = False
          Digits = 2
          Precision = 9
          FloatFormat = ffGeneral
          Enabled = False
          Increment = 0.5
          TabOrder = 13
        end
        object FlatMemoServCont4: TFlatMemo
          Tag = 1
          Left = 68
          Top = 240
          Width = 664
          Height = 41
          ColorFlat = clWhite
          MaxLength = 200
          ScrollBars = ssVertical
          TabOrder = 14
          Lines.Strings = (
            '')
        end
        object FlatMemoObjInfo4: TFlatMemo
          Tag = 1
          Left = 68
          Top = 291
          Width = 664
          Height = 41
          ColorFlat = clWhite
          MaxLength = 200
          ScrollBars = ssVertical
          TabOrder = 15
        end
        object FlatMemoObjAdvice4: TFlatMemo
          Tag = 1
          Left = 68
          Top = 340
          Width = 664
          Height = 41
          ColorFlat = clWhite
          MaxLength = 200
          ScrollBars = ssVertical
          TabOrder = 16
        end
        object DBGrid5: TDBGrid
          Left = 378
          Top = 40
          Width = 354
          Height = 104
          DataSource = DataSourceService
          ImeName = '中文 (简体) - 郑码'
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 17
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -14
          TitleFont.Name = '宋体'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'ServTop_Id'
              Title.Caption = '个性服务代码'
              Visible = False
            end
            item
              Expanded = False
              FieldName = 'SERV_TOPIC'
              Title.Caption = '个性服务标题'
              Width = 179

⌨️ 快捷键说明

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