📄 unit_groupindiserv.dfm
字号:
Width = 81
Height = 20
Hint = '格式:YYYY-MM-DD'
ColorFlat = clWindow
AutoSize = False
BorderStyle = bsNone
Enabled = False
EditMask = '0000-00-00;1;_'
MaxLength = 10
TabOrder = 4
Text = ' - - '
ImeName = '中文 (简体) - 郑码'
end
object FlatMaskEditBeginTime1: TFlatMaskEdit
Left = 152
Top = 181
Width = 42
Height = 20
Hint = '格式:HI24(24小时制)'
ColorFlat = clWindow
AutoSize = False
BorderStyle = bsNone
Enabled = False
EditMask = '00:00;1;_'
MaxLength = 5
TabOrder = 6
Text = '00:00'
ImeName = '中文 (简体) - 郑码'
end
object FlatMaskEditEndDate1: TFlatMaskEdit
Left = 271
Top = 181
Width = 81
Height = 20
Hint = '格式:YYYY-MM-DD'
ColorFlat = clWindow
AutoSize = False
BorderStyle = bsNone
Enabled = False
TabOrder = 5
ImeName = '中文 (简体) - 郑码'
end
object FlatMaskEditEndTime1: TFlatMaskEdit
Tag = 10
Left = 355
Top = 181
Width = 43
Height = 20
ColorFlat = clWindow
AutoSize = False
BorderStyle = bsNone
Enabled = False
TabOrder = 13
ImeName = '中文 (简体) - 郑码'
end
object FlatCheckBoxFinish1: 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 = 7
TabStop = True
OnClick = FlatCheckBoxFinish1Click
end
object FlatEditServMoney1: TFlatEdit
Tag = 1
Left = 68
Top = 211
Width = 87
Height = 20
ColorFlat = clWindow
MaxLength = 7
TabOrder = 8
OnChange = FlatEditServMoney1Change
OnKeyPress = FlatEditServMoney1KeyPress
end
object FlatEditUseMoney1: TFlatEdit
Tag = 1
Left = 270
Top = 211
Width = 84
Height = 20
ColorFlat = clWindow
MaxLength = 7
TabOrder = 9
OnChange = FlatEditUseMoney1Change
OnKeyPress = FlatEditUseMoney1KeyPress
end
object FlatSpinEditFloatTotalMoney1: TFlatSpinEditFloat
Tag = 1
Left = 490
Top = 211
Width = 89
Height = 21
ColorFlat = clWindow
AutoSize = False
Digits = 2
Precision = 9
FloatFormat = ffGeneral
Enabled = False
Increment = 0.5
TabOrder = 14
end
object FlatMemoServCont1: TFlatMemo
Tag = 1
Left = 68
Top = 240
Width = 664
Height = 41
ColorFlat = clWindow
MaxLength = 200
ScrollBars = ssVertical
TabOrder = 10
Lines.Strings = (
'')
end
object FlatMemoObjInfo1: TFlatMemo
Tag = 1
Left = 68
Top = 291
Width = 664
Height = 41
ColorFlat = clWindow
MaxLength = 200
ScrollBars = ssVertical
TabOrder = 11
end
object FlatMemoObjAdvice1: TFlatMemo
Tag = 1
Left = 68
Top = 340
Width = 664
Height = 41
ColorFlat = clWindow
MaxLength = 200
ScrollBars = ssVertical
TabOrder = 12
end
object DBGrid2: TDBGrid
Left = 378
Top = 35
Width = 354
Height = 107
DataSource = DataSourceService
ImeName = '中文 (简体) - 郑码'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 15
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
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 FlatComboBoxServMode1: TFlatComboBox
Tag = 41
Left = 68
Top = 151
Width = 126
Height = 22
Style = csDropDownList
Color = clWindow
ItemHeight = 14
TabOrder = 2
ItemIndex = -1
end
object DBGrid1: TDBGrid
Left = 8
Top = 35
Width = 354
Height = 107
DataSource = DataSourceGroupInfo
ImeName = '中文 (简体) - 郑码'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 16
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'JTYHDM'
Title.Caption = '集团编号'
Visible = False
end
item
Expanded = False
FieldName = 'JTYHMC'
Title.Caption = '集团名称'
Width = 150
Visible = True
end
item
Expanded = False
FieldName = 'ADDR'
Title.Caption = '联系地址'
Width = 112
Visible = True
end
item
Expanded = False
FieldName = 'LXR'
Title.Caption = '联系人'
Width = 104
Visible = True
end
item
Expanded = False
FieldName = 'SID'
Title.Caption = '联系电话'
Width = 114
Visible = True
end
item
Expanded = False
FieldName = 'BE_G_DATE'
Title.Caption = '成为大户时间'
Width = 111
Visible = True
end
item
Expanded = False
FieldName = 'GH'
Title.Caption = '工号'
Visible = False
end>
end
object FlatComboBoxServKind: TFlatComboBox
Tag = 1
Left = 272
Top = 152
Width = 126
Height = 22
Style = csDropDownList
Color = clWindow
ItemHeight = 14
Items.Strings = (
'主动服务'
'被叫服务')
TabOrder = 1
Text = '主动服务'
ItemIndex = 0
end
object FlatComboBoxServModeT: TFlatComboBox
Left = 435
Top = 348
Width = 46
Height = 22
Color = clWindow
ItemHeight = 14
TabOrder = 17
Text = 'FlatComboBoxServMode1'
Visible = False
ItemIndex = -1
end
object FlatComboBoxCityName1: TFlatComboBox
Left = 42
Top = 8
Width = 105
Height = 22
Style = csDropDownList
Color = clWindow
ItemHeight = 14
TabOrder = 18
ItemIndex = -1
end
object FlatComboBoxJX1: TFlatComboBox
Left = 203
Top = 8
Width = 105
Height = 22
Style = csDropDownList
Color = clWindow
ItemHeight = 14
TabOrder = 19
ItemIndex = -1
end
object FlatButtonQuery1: TFlatButton
Left = 640
Top = 6
Width = 85
Height = 25
Caption = '查询'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 20
OnClick = FlatButtonQuery1Click
end
end
end
object TabSheet4: TTabSheet
Caption = '登记服务日志(移动提供)'
ImageIndex = 3
OnShow = TabSheet4Show
object Panel5: TPanel
Left = 2
Top = 2
Width = 742
Height = 387
BevelOuter = bvLowered
TabOrder = 0
object Label2: TLabel
Left = 432
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 Label39: TLabel
Left = 213
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 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
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -