📄 bookin.dfm
字号:
object BookInForm: TBookInForm
Left = 201
Top = 97
BorderStyle = bsSingle
Caption = #20837#24211#31649#29702
ClientHeight = 364
ClientWidth = 486
Color = 16248814
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 486
Height = 113
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
ParentColor = True
TabOrder = 0
object Label1: TLabel
Left = 13
Top = 13
Width = 80
Height = 16
Caption = #22270#20070#26465#30721#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 213
Top = 13
Width = 80
Height = 16
Caption = #22270#20070#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 13
Top = 37
Width = 80
Height = 16
Caption = #20070' '#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 213
Top = 37
Width = 80
Height = 16
Caption = #21333' '#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 13
Top = 61
Width = 80
Height = 16
Caption = #20837#24211#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 213
Top = 61
Width = 80
Height = 16
Caption = #37329' '#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 13
Top = 85
Width = 80
Height = 16
Caption = #32463' '#25163' '#20154#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 213
Top = 85
Width = 80
Height = 16
Caption = #20837#24211#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 285
Top = 85
Width = 8
Height = 16
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 417
Top = 8
Width = 62
Height = 25
Caption = '&E'#30830#23450
Enabled = False
Flat = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 417
Top = 34
Width = 62
Height = 25
Caption = '&C'#25552#20132
Enabled = False
Flat = True
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 417
Top = 59
Width = 62
Height = 25
Caption = '&X'#20851#38381
Flat = True
OnClick = SpeedButton3Click
end
object Edit2: TEdit
Left = 85
Top = 12
Width = 121
Height = 21
BevelKind = bkFlat
BevelOuter = bvRaised
BorderStyle = bsNone
Ctl3D = True
ParentCtl3D = False
TabOrder = 0
OnKeyPress = Edit2KeyPress
end
object Edit1: TEdit
Left = 285
Top = 12
Width = 121
Height = 21
BevelKind = bkFlat
BevelOuter = bvRaised
BorderStyle = bsNone
Ctl3D = True
Enabled = False
ParentCtl3D = False
TabOrder = 1
OnKeyPress = Edit1KeyPress
end
object Edit3: TEdit
Left = 85
Top = 36
Width = 121
Height = 21
BevelKind = bkFlat
BevelOuter = bvRaised
BorderStyle = bsNone
Ctl3D = True
Enabled = False
ParentCtl3D = False
TabOrder = 2
OnKeyPress = Edit3KeyPress
end
object Edit4: TEdit
Left = 285
Top = 36
Width = 121
Height = 21
BevelKind = bkFlat
BevelOuter = bvRaised
BorderStyle = bsNone
Ctl3D = True
Enabled = False
ParentCtl3D = False
TabOrder = 3
OnKeyPress = Edit4KeyPress
end
object Edit5: TEdit
Left = 85
Top = 60
Width = 121
Height = 21
BevelKind = bkFlat
BevelOuter = bvRaised
BorderStyle = bsNone
Ctl3D = True
Enabled = False
ParentCtl3D = False
TabOrder = 4
Text = '1'
OnChange = Edit5Change
OnKeyPress = Edit5KeyPress
end
object Edit6: TEdit
Left = 285
Top = 60
Width = 121
Height = 21
BevelKind = bkFlat
BevelOuter = bvRaised
BorderStyle = bsNone
Ctl3D = True
Enabled = False
ParentCtl3D = False
TabOrder = 5
OnKeyPress = Edit6KeyPress
end
object Edit7: TEdit
Left = 85
Top = 84
Width = 121
Height = 21
BevelKind = bkFlat
BevelOuter = bvRaised
BorderStyle = bsNone
Ctl3D = True
Enabled = False
ParentCtl3D = False
TabOrder = 6
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 113
Width = 486
Height = 251
Align = alClient
Caption = #20837#24211#35814#21333
TabOrder = 1
object DBGrid1: TDBGrid
Left = 2
Top = 15
Width = 482
Height = 234
Align = alClient
Color = 16632508
DataSource = Data.public1
FixedColor = 16248814
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -