📄 unit_serviceeconbuycard.dfm
字号:
object Frm_ServiceEconBuyCard: TFrm_ServiceEconBuyCard
Left = 159
Top = 160
Width = 670
Height = 450
Caption = '优惠购卡'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object PageControl1: TPageControl
Left = 0
Top = 0
Width = 662
Height = 169
ActivePage = TabSheet1
Align = alTop
Style = tsFlatButtons
TabOrder = 0
OnChange = PageControl1Change
object TabSheet1: TTabSheet
Caption = '个人大客户'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
object FlatPanel2: TFlatPanel
Left = 0
Top = 0
Width = 654
Height = 33
ParentColor = True
Align = alTop
TabOrder = 0
UseDockManager = True
object Label1: TLabel
Left = 8
Top = 11
Width = 98
Height = 14
Caption = '请选择查询方式'
end
object Label2: TLabel
Left = 218
Top = 11
Width = 28
Height = 14
Caption = '号码'
end
object FlatButtonok: TFlatButton
Left = 584
Top = 4
Width = 64
Height = 25
Caption = '查询'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 0
OnClick = FlatButtonokClick
Anchors = [akRight, akBottom]
end
object FlatEdvip1: TFlatEdit
Left = 272
Top = 8
Width = 121
Height = 20
ColorFlat = clWhite
MaxLength = 15
TabOrder = 1
OnKeyPress = FlatEdvip1KeyPress
end
object FlatComboBoxgr: TFlatComboBox
Left = 106
Top = 7
Width = 103
Height = 22
Style = csDropDownList
Color = clMenu
ItemHeight = 14
Items.Strings = (
'手机号码'
'贵宾卡')
TabOrder = 2
ItemIndex = -1
OnChange = FlatComboBoxgrChange
end
end
object DBGridT_F_CustInfo1: TDBGrid
Left = 0
Top = 33
Width = 654
Height = 104
Align = alClient
DataSource = DataSourceT_F_CustInfo1
ImeName = '中文 (简体) - 郑码'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'SID'
Title.Caption = '手机号码'
Width = 93
Visible = True
end
item
Expanded = False
FieldName = 'VIP_NO'
Title.Caption = '贵宾卡号'
Width = 119
Visible = True
end
item
Expanded = False
FieldName = 'NAME'
Title.Caption = '客户姓名'
Width = 119
Visible = True
end
item
Expanded = False
FieldName = 'Act_User'
Title.Caption = '实际使用人'
Width = 106
Visible = True
end
item
Expanded = False
FieldName = 'DESCRIPTION'
Title.Caption = '星级'
Visible = True
end
item
Expanded = False
FieldName = 'par_desc'
Title.Caption = '状态'
Visible = True
end
item
Expanded = False
FieldName = 'gh'
Title.Caption = '工号'
Visible = True
end>
end
end
object TabSheet2: TTabSheet
Caption = '集团大客户'
ImageIndex = 1
object FlatPanel4: TFlatPanel
Left = 0
Top = 0
Width = 654
Height = 33
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentColor = True
Align = alTop
TabOrder = 0
UseDockManager = True
object Label15: TLabel
Left = 200
Top = 11
Width = 56
Height = 14
Caption = '集团名称'
end
object Label17: TLabel
Left = 10
Top = 11
Width = 49
Height = 14
Caption = 'VIP卡号'
end
object Panel1: TPanel
Left = 468
Top = 1
Width = 185
Height = 31
Align = alRight
BevelOuter = bvNone
TabOrder = 2
object FlatButton7: TFlatButton
Left = 118
Top = 4
Width = 64
Height = 25
Caption = '查询'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 0
OnClick = FlatButton7Click
end
end
object Flatvip2: TFlatEdit
Left = 72
Top = 8
Width = 121
Height = 20
ColorFlat = clBtnFace
ParentColor = True
MaxLength = 30
TabOrder = 0
OnKeyPress = Flatvip2KeyPress
end
object FlatEditjtyhmc: TFlatEdit
Left = 258
Top = 8
Width = 258
Height = 20
ColorFlat = clBtnFace
ParentColor = True
Enabled = False
MaxLength = 60
TabOrder = 1
end
end
object DBGridt_f_groupinto11: TDBGrid
Left = 0
Top = 33
Width = 654
Height = 104
Align = alClient
DataSource = DataSourcet_f_groupinfo1
ImeName = '中文 (简体) - 郑码'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'SID'
Title.Caption = '手机号码'
Width = 93
Visible = True
end
item
Expanded = False
FieldName = 'VIP_NO'
Title.Caption = '贵宾卡号'
Width = 119
Visible = True
end
item
Expanded = False
FieldName = 'NAME'
Title.Caption = '客户姓名'
Width = 119
Visible = True
end
item
Expanded = False
FieldName = 'Act_User'
Title.Caption = '实际使用人'
Width = 106
Visible = True
end
item
Expanded = False
FieldName = 'DESCRIPTION'
Title.Caption = '星级'
Visible = True
end
item
Expanded = False
FieldName = 'par_desc'
Title.Caption = '状态'
Visible = True
end
item
Expanded = False
FieldName = 'gh'
Title.Caption = '工号'
Visible = True
end>
end
end
end
object FlatPanel1: TFlatPanel
Left = 0
Top = 375
Width = 662
Height = 41
ParentColor = True
Align = alBottom
TabOrder = 1
UseDockManager = True
object Panel2: TPanel
Left = 1
Top = 1
Width = 661
Height = 39
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object FlatButton2: TFlatButton
Left = 12
Top = 8
Width = 70
Height = 25
Caption = '新增'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 0
OnClick = FlatButton2Click
Anchors = [akRight, akBottom]
end
object FlatButton1: TFlatButton
Left = 127
Top = 8
Width = 70
Height = 25
Caption = '修改'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF773333303300000003333337337777777333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 1
OnClick = FlatButton1Click
Anchors = [akRight, akBottom]
end
object FlatButton3: TFlatButton
Left = 242
Top = 8
Width = 70
Height = 25
Caption = '删除'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 2
OnClick = FlatButton3Click
Anchors = [akRight, akBottom]
end
object FlatButton5: TFlatButton
Left = 358
Top = 8
Width = 70
Height = 25
Caption = '保存'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F7330099999999900333777777777777733}
Layout = blGlyphLeft
NumGlyphs = 2
TabOrder = 3
OnClick = FlatButton5Click
Anchors = [akRight, akBottom]
end
object FlatButton4: TFlatButton
Left = 473
Top = 8
Width = 70
Height = 25
Caption = '取消'
Enabled = False
Glyph.Data = {
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -