📄 uvipfull.dfm
字号:
inherited frmvipfull: Tfrmvipfull
Left = 202
Top = 156
ActiveControl = Edit1
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #20250#21592#20805#20540
ClientHeight = 321
ClientWidth = 330
OldCreateOrder = True
Visible = True
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 5
Top = 1
Width = 321
Height = 312
TabOrder = 0
object Bevel1: TBevel
Left = 56
Top = 29
Width = 190
Height = 1
end
object Bevel2: TBevel
Left = 56
Top = 189
Width = 190
Height = 1
end
object Label4: TLabel
Left = 16
Top = 184
Width = 45
Height = 17
AutoSize = False
Caption = #35831#36755#20837#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 16
Top = 24
Width = 47
Height = 17
AutoSize = False
Caption = #35831#21047#21345#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 64
Top = 216
Width = 55
Height = 17
AutoSize = False
Caption = #20805#20540#37329#39069
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 64
Top = 248
Width = 55
Height = 17
AutoSize = False
Caption = #22870#21382#31215#20998
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 253
Top = 40
Width = 54
Height = 21
Caption = #30830#23450
OnClick = SpeedButton1Click
end
object Edit1: TEdit
Left = 64
Top = 40
Width = 185
Height = 21
TabOrder = 0
end
object GroupBox2: TGroupBox
Left = 8
Top = 72
Width = 305
Height = 97
Caption = #20250#21592#20449#24687
TabOrder = 5
object Label2: TLabel
Left = 25
Top = 20
Width = 57
Height = 17
AutoSize = False
Caption = #22995#21517
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 25
Top = 43
Width = 57
Height = 17
AutoSize = False
Caption = #30005#35805
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label28: TLabel
Left = 1
Top = 66
Width = 83
Height = 17
AutoSize = False
Caption = #26368#21518#28040#36153#26085#26399
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label26: TLabel
Left = 156
Top = 42
Width = 57
Height = 17
AutoSize = False
Caption = #24080#25143#20313#39069
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label25: TLabel
Left = 156
Top = 20
Width = 57
Height = 17
AutoSize = False
Caption = #28040#36153#27425#25968
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 178
Top = 65
Width = 57
Height = 17
AutoSize = False
Caption = #24080#25143#31215#20998
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object text3: TwwDBDateTimePicker
Left = 74
Top = 63
Width = 98
Height = 21
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'MS Sans Serif'
CalendarAttributes.Font.Style = []
Color = 15530210
DataField = 'flastconsumed'
DataSource = frmvip.DSbaseinfo
Epoch = 1950
Enabled = False
ShowButton = True
TabOrder = 0
end
object text2: TwwDBEdit
Left = 74
Top = 40
Width = 81
Height = 20
Color = 15530210
DataField = 'fbalance'
DataSource = frmvip.DSbaseinfo
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
object text1: TwwDBEdit
Left = 74
Top = 17
Width = 81
Height = 20
Color = 15530210
DataField = 'fcomsumetotle'
DataSource = frmvip.DSbaseinfo
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
object text6: TwwDBEdit
Left = 235
Top = 63
Width = 62
Height = 20
Color = 15530210
DataField = 'fintegral'
DataSource = frmvip.DSbaseinfo
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
object text5: TwwDBEdit
Left = 216
Top = 40
Width = 81
Height = 20
Color = 15530210
DataField = 'fbalance'
DataSource = frmvip.DSbaseinfo
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
object text4: TwwDBEdit
Left = 216
Top = 17
Width = 81
Height = 20
Color = 15530210
DataField = 'fcomsumetotle'
DataSource = frmvip.DSbaseinfo
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
end
object Edit2: TEdit
Left = 120
Top = 213
Width = 81
Height = 21
TabOrder = 1
OnKeyPress = Edit2KeyPress
end
object Edit3: TEdit
Left = 120
Top = 245
Width = 81
Height = 21
TabOrder = 2
OnKeyPress = Edit3KeyPress
end
object btnexit: TBitBtn
Left = 248
Top = 281
Width = 65
Height = 22
HelpType = htKeyword
Caption = #21462#28040
TabOrder = 4
OnClick = btnexitClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00344446333334
44433333FFFF333333FFFF33000033AAA43333332A4333338833F33333883F33
00003332A46333332A4333333383F33333383F3300003332A2433336A6633333
33833F333383F33300003333AA463362A433333333383F333833F33300003333
6AA4462A46333333333833FF833F33330000333332AA22246333333333338333
33F3333300003333336AAA22646333333333383333F8FF33000033444466AA43
6A43333338FFF8833F383F330000336AA246A2436A43333338833F833F383F33
000033336A24AA442A433333333833F33FF83F330000333333A2AA2AA4333333
333383333333F3330000333333322AAA4333333333333833333F333300003333
333322A4333333333333338333F333330000333333344A433333333333333338
3F333333000033333336A24333333333333333833F333333000033333336AA43
33333333333333833F3333330000333333336663333333333333333888333333
0000}
NumGlyphs = 2
end
object btnok: TBitBtn
Left = 182
Top = 281
Width = 65
Height = 22
HelpType = htKeyword
Caption = #30830#23450
TabOrder = 3
OnClick = btnokClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BitBtn1: TBitBtn
Left = 116
Top = 281
Width = 65
Height = 22
HelpType = htKeyword
Caption = #20923#32467
TabOrder = 6
OnClick = BitBtn1Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
end
object CDSbaseinfo: TClientDataSet
Aggregates = <>
Params = <>
Left = 261
Top = 169
end
object dsBaseinfo: TDataSource
DataSet = CDSbaseinfo
Left = 245
Top = 153
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -