📄 book.dfm
字号:
Width = 75
Height = 25
Caption = #21462' '#28040
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
OnClick = Button12Click
end
object DBEdit9: TDBEdit
Left = 212
Top = 100
Width = 65
Height = 21
Color = clInfoBk
DataField = #20070#31867
DataSource = DataModule1.DataSource5
TabOrder = 12
end
end
object GroupBox2: TGroupBox
Left = 432
Top = 208
Width = 233
Height = 121
Caption = #20070#31821#26816#32034
TabOrder = 2
object Label9: TLabel
Left = 40
Top = 56
Width = 64
Height = 16
Caption = #26597#35810#20869#23481
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 40
Top = 24
Width = 64
Height = 16
Caption = #26597#35810#26465#20214
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
end
object Button5: TButton
Left = 42
Top = 88
Width = 63
Height = 25
Caption = #21462' '#28040
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button5Click
end
object Button6: TButton
Left = 138
Top = 88
Width = 63
Height = 25
Caption = #30830' '#23450
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = Button6Click
end
object Edit1: TEdit
Left = 112
Top = 56
Width = 89
Height = 21
TabOrder = 2
OnKeyPress = Edit1KeyPress
end
object ComboBox1: TComboBox
Left = 112
Top = 24
Width = 89
Height = 21
Color = clInfoBk
ItemHeight = 13
TabOrder = 3
Text = #20070#21495
Items.Strings = (
#20070#21495
#20070#21517
#20316#32773
#20070#31867
#20986#29256#31038)
end
end
object GroupBox3: TGroupBox
Left = 432
Top = 336
Width = 233
Height = 145
Caption = #20511#38405#30331#35760
TabOrder = 3
object Label11: TLabel
Left = 32
Top = 48
Width = 32
Height = 16
Caption = #20070#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 32
Top = 80
Width = 32
Height = 16
Caption = #23398#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 32
Top = 16
Width = 32
Height = 16
Caption = #20070#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
end
object Edit2: TEdit
Left = 80
Top = 80
Width = 73
Height = 21
TabOrder = 0
end
object DBEdit7: TDBEdit
Left = 80
Top = 48
Width = 137
Height = 21
Color = clInfoBk
DataField = #20070#21517
DataSource = DataModule1.DataSource5
ReadOnly = True
TabOrder = 1
end
object Button1: TButton
Left = 40
Top = 112
Width = 65
Height = 25
Caption = #26816' '#27979
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 144
Top = 112
Width = 65
Height = 25
Caption = #30830' '#23450
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = Button2Click
end
object Edit3: TEdit
Left = 160
Top = 80
Width = 57
Height = 21
Color = clInfoBk
TabOrder = 4
end
object DBEdit10: TDBEdit
Left = 80
Top = 16
Width = 137
Height = 21
Color = clInfoBk
DataField = #20070#21495
DataSource = DataModule1.DataSource5
ReadOnly = True
TabOrder = 5
end
end
object GroupBox4: TGroupBox
Left = 8
Top = 232
Width = 409
Height = 249
Caption = #20511#38405#20449#24687
TabOrder = 4
Visible = False
object DBGrid2: TDBGrid
Left = 8
Top = 24
Width = 393
Height = 153
Color = clInfoBk
DataSource = DataModule1.DataSource8
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clNavy
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object GroupBox5: TGroupBox
Left = 8
Top = 192
Width = 393
Height = 49
Caption = #36824#20070#26694
TabOrder = 1
object Label14: TLabel
Left = 120
Top = 20
Width = 56
Height = 13
Caption = #36824#20070#26085#26399
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 8
Top = 20
Width = 28
Height = 13
Caption = #20070#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 312
Top = 16
Width = 10
Height = 24
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 280
Top = 20
Width = 28
Height = 13
Caption = #36229#26399
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
end
object Button7: TButton
Left = 344
Top = 16
Width = 41
Height = 25
Caption = #36824#20070
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button7Click
end
object Edit4: TEdit
Left = 179
Top = 15
Width = 97
Height = 21
Color = clInfoBk
TabOrder = 1
end
object DBEdit8: TDBEdit
Left = 40
Top = 16
Width = 73
Height = 21
Color = clInfoBk
DataField = #20070#21495
DataSource = DataModule1.DataSource2
TabOrder = 2
OnChange = DBEdit8Change
end
end
end
object Button3: TButton
Left = 112
Top = 208
Width = 75
Height = 25
Caption = #20511#38405#20449#24687
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = Button3Click
end
object Button4: TButton
Left = 232
Top = 208
Width = 75
Height = 25
Caption = #20070#31821#31649#29702
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = Button4Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -