📄 unit29.dfm
字号:
object F_custcha: TF_custcha
Left = 499
Top = 278
Width = 715
Height = 580
Caption = #23458#25143#36164#26009#31649#29702
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 707
Height = 97
Align = alTop
Color = clInactiveCaption
TabOrder = 0
object SpeedButton1: TSpeedButton
Left = 80
Top = 24
Width = 97
Height = 57
Caption = #25171#21360
Flat = True
Glyph.Data = {
7E010000424D7E01000000000000760000002800000018000000160000000100
0400000000000801000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00800000000000
0000000000080777777777777777777777700F77777777777777777777700F88
888888888888888887700F88888888888888888887700F888888888000088888
87700F880000000FFF08888887700F80FF00FFFFFFF0888887700F80F0F0FFF0
00F0888887700F80F0F00FFFFFFF088887700F88000F0FFF000F088887700F88
0FFFF000FFFFF08887700F8880FFF0FFF000F08887700F8880FFFF0FFFFFFF08
87700F88880FFF0FFFF0000887700F88880FFFF00008888887700F888880FFF0
8888888887700F888880FFF08888888887700F88888800088888888887700F88
888888888888888887700FFFFFFFFFFFFFFFFFFFFF7080000000000000000000
0008}
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 224
Top = 24
Width = 97
Height = 57
Caption = #21024#38500
Flat = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F5555000555555505555577755555557555}
NumGlyphs = 2
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 368
Top = 24
Width = 97
Height = 57
Caption = #36864#20986
Flat = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
333333333333337FF3333333333333903333333333333377FF33333333333399
03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
3333777777333333333333333333333333333333333333333333}
NumGlyphs = 2
OnClick = SpeedButton3Click
end
end
object Panel2: TPanel
Left = 0
Top = 97
Width = 707
Height = 177
Align = alClient
Color = clGradientInactiveCaption
TabOrder = 1
object Label1: TLabel
Left = 128
Top = 32
Width = 161
Height = 13
AutoSize = False
Caption = #25353#23458#25143'/'#25237#20445#20154#32534#21495#26597#35810#65306
end
object Label2: TLabel
Left = 128
Top = 80
Width = 145
Height = 13
AutoSize = False
Caption = #25353#25237#20445#20154#22995#21517#26597#35810#65306
end
object Edit1: TEdit
Left = 304
Top = 28
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 0
end
object Edit2: TEdit
Left = 304
Top = 78
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 1
end
object Button1: TButton
Left = 488
Top = 24
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 488
Top = 72
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 3
OnClick = Button2Click
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 274
Width = 707
Height = 272
Align = alBottom
Color = clInactiveCaptionText
DataSource = mydm.cust1src
FixedColor = clGradientInactiveCaption
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ReadOnly = True
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Cust_ID'
Title.Caption = #25237#20445#20154#32534#21495
Width = 89
Visible = True
end
item
Expanded = False
FieldName = 'Cust_Gender'
Title.Caption = #24615#21035
Visible = True
end
item
Expanded = False
FieldName = 'Cust_nation'
Title.Caption = #21517#26063
Visible = True
end
item
Expanded = False
FieldName = 'Cust_prof'
Title.Caption = #32844#19994
Visible = True
end
item
Expanded = False
FieldName = 'Cust_birthday'
Title.Caption = #20986#29983#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'Cust_marriage'
Title.Caption = #23130#21542
Visible = True
end
item
Expanded = False
FieldName = 'Cust_name'
Title.Caption = #22995#21517
Visible = True
end
item
Expanded = False
FieldName = 'Cust_IDCard'
Title.Caption = #30465#20221#35777#21495
Visible = True
end
item
Expanded = False
FieldName = 'Cust_Housephone'
Title.Caption = #23478#24237#30005#35805
Visible = True
end
item
Expanded = False
FieldName = 'Cust_Officephone'
Title.Caption = #21150#20844'/'#31227#21160#30005#35805
Visible = True
end
item
Expanded = False
FieldName = 'Cust_homeaddr'
Title.Caption = #23478#24237#20303#22336
Visible = True
end
item
Expanded = False
FieldName = 'Cust_workaddr'
Title.Caption = #21333#20301#22320#22336
Visible = True
end
item
Expanded = False
FieldName = 'Cust_post'
Title.Caption = #37038#32534
Visible = True
end
item
Expanded = False
FieldName = 'Cust_creat'
Title.Caption = #24314#26723#26085#26399
Visible = True
end>
end
object RvProject4: TRvProject
ProjectFile = 'cust.rav'
Left = 120
Top = 392
end
object RvDataSetConnection4: TRvDataSetConnection
RuntimeVisibility = rtDeveloper
DataSet = mydm.cust1query
Left = 216
Top = 392
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -