📄 unit_archivesgroupinfo.dfm
字号:
ColorFlat = clWhite
MaxLength = 15
TabOrder = 6
end
object FlatComboBox_EDUCODE: TFlatComboBox
Tag = 22
Left = 456
Top = 12
Width = 120
Height = 22
Style = csDropDownList
Color = clMenu
ItemHeight = 14
Items.Strings = (
'男'
'女')
TabOrder = 2
ItemIndex = -1
end
object FlatEdit_INFOJOB: TFlatEdit
Tag = 1
Left = 88
Top = 36
Width = 120
Height = 20
ColorFlat = clWhite
MaxLength = 40
TabOrder = 3
end
object FlatEdit_INFOADDR: TFlatEdit
Tag = 1
Left = 88
Top = 108
Width = 489
Height = 20
ColorFlat = clWhite
MaxLength = 60
TabOrder = 10
end
object FlatEdit_INFOPOSTCODE: TFlatEdit
Tag = 1
Left = 456
Top = 60
Width = 120
Height = 20
ColorFlat = clWhite
MaxLength = 6
TabOrder = 8
end
object FlatEdit_EMAIL: TFlatEdit
Tag = 1
Left = 88
Top = 84
Width = 489
Height = 20
ColorFlat = clWhite
MaxLength = 40
TabOrder = 9
end
object FlatEdit_IDCARD: TFlatEdit
Tag = 1
Left = 272
Top = 36
Width = 120
Height = 20
ColorFlat = clWhite
MaxLength = 20
TabOrder = 4
end
object FlatEdit_INFOBIRTH: TFlatEdit
Tag = 1
Left = 456
Top = 36
Width = 120
Height = 20
Hint = '日期格式:YYYY-MM-DD'
ColorFlat = clWhite
MaxLength = 10
ParentShowHint = False
ShowHint = True
TabOrder = 5
OnExit = FlatEditbgExit
end
end
end
end
object TabSheet4: TTabSheet
Caption = '集团纪念日档案'
ImageIndex = 3
object Label55: TLabel
Left = 24
Top = 64
Width = 7
Height = 14
end
object DBGridQueryGroupMemoDay: TDBGrid
Left = 0
Top = 0
Width = 597
Height = 240
Align = alTop
DataSource = DataSourceQueryGroupMemoDay
ImeName = '中文 (简体) - 郑码'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'GMEMO_NAME'
Title.Caption = '集团纪念日标题'
Width = 239
Visible = True
end
item
Expanded = False
FieldName = 'GMEMO_SDATE'
Title.Caption = '开始日期'
Width = 114
Visible = True
end
item
Expanded = False
FieldName = 'GMEMO_EDATE'
Title.Caption = '结束日期'
Width = 121
Visible = True
end
item
Expanded = False
FieldName = 'SEND_TIME'
Title.Caption = '短信通知时间'
Width = 120
Visible = True
end>
end
object Panel10: TPanel
Left = 0
Top = 240
Width = 597
Height = 201
Align = alClient
BevelOuter = bvLowered
TabOrder = 1
object Label65: TLabel
Left = 8
Top = 16
Width = 98
Height = 14
Caption = '集团纪念日标题'
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label57: TLabel
Left = 8
Top = 40
Width = 98
Height = 14
Caption = '纪念日开始日期'
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label58: TLabel
Left = 315
Top = 40
Width = 56
Height = 14
Caption = '结束日期'
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label59: TLabel
Left = 8
Top = 65
Width = 98
Height = 14
Caption = '集团纪念日备注'
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label40: TLabel
Left = 150
Top = 148
Width = 56
Height = 14
Caption = '发送时间'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object FlatEdit_GMEMO_NAME: TFlatEdit
Tag = 1
Left = 110
Top = 12
Width = 467
Height = 20
ColorFlat = clWhite
MaxLength = 40
TabOrder = 0
end
object FlatEdit_GMEMO_SDATE: TFlatEdit
Tag = 1
Left = 110
Top = 36
Width = 200
Height = 20
Hint = '日期格式:YYYY-MM-DD'
ColorFlat = clWhite
MaxLength = 10
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnExit = FlatEditbgExit
end
object FlatEdit_GMEMO_EDATE: TFlatEdit
Tag = 1
Left = 377
Top = 36
Width = 200
Height = 20
Hint = '日期格式:YYYY-MM-DD'
ColorFlat = clWhite
MaxLength = 10
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnExit = FlatEditbgExit
end
object FlatMemo_GMEMO_MEMO: TFlatMemo
Tag = 1
Left = 111
Top = 61
Width = 466
Height = 78
ColorFlat = clWhite
MaxLength = 250
ScrollBars = ssVertical
TabOrder = 3
Lines.Strings = (
'')
end
object FlatCheckBox_SMS_FLAG: TFlatCheckBox
Tag = 1
Left = 12
Top = 147
Width = 133
Height = 17
Caption = '短信通知客户经理'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 4
TabStop = True
OnClick = FlatCheckBox_SMS_FLAGClick
end
object FlatEdit_SEND_TIME: TFlatEdit
Tag = 1
Left = 207
Top = 144
Width = 133
Height = 20
ColorFlat = clWhite
Enabled = False
TabOrder = 5
OnExit = FlatEditbgExit
end
end
end
object TabSheet5: TTabSheet
Caption = '集团关键人管理'
ImageIndex = 4
object DBGridt_f_custinfo1: TDBGrid
Left = 0
Top = 0
Width = 597
Height = 411
Align = alClient
DataSource = DataSourcet_f_custinfo
ImeName = '中文 (简体) - 郑码'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'SID'
Title.Caption = '用户号码'
Width = 95
Visible = True
end
item
Expanded = False
FieldName = 'ACT_USER'
Title.Caption = '实际使用人'
Width = 130
Visible = True
end
item
Expanded = False
FieldName = 'XYD'
Title.Caption = '信用度'
Width = 48
Visible = True
end
item
Expanded = False
FieldName = 'productname'
Title.Caption = '品牌'
Width = 87
Visible = True
end
item
Expanded = False
FieldName = 'statsm'
Title.Caption = '状态'
Width = 117
Visible = True
end
item
Expanded = False
FieldName = 'SDATE'
Title.Caption = '入网时间'
Width = 102
Visible = True
end
item
Expanded = False
FieldName = 'ADDR'
Title.Caption = '地址'
Width = 160
Visible = True
end
item
Expanded = False
FieldName = 'SR'
Title.Caption = '生日'
Width = 87
Visible = True
end
item
Expanded = False
FieldName = 'NLSR'
Title.Caption = '农历生日'
Width = 101
Visible = True
end
item
Expanded = False
FieldName = 'JFD'
Title.Caption = '积分点'
Visible = True
end>
end
object Panel11: TPanel
Left = 0
Top = 411
Width = 597
Height = 37
Align = alBottom
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 1
object Label30: TLabel
Left = 8
Top = 16
Width = 7
Height = 14
end
object Label28: TLabel
Left = 8
Top = 12
Width = 140
Height = 14
Caption = '集团客户关键成员数:'
end
object FlatButton6: TFlatButton
Left = 508
Top = 7
Width = 81
Height = 25
Caption = '退出集团'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF00000
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -