📄 returnfrm.~dfm
字号:
inherited ReturnForm: TReturnForm
Left = 159
Top = 107
Height = 471
Caption = #12310#20973#35777#36824#20070#12311
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
inherited Buttonpanel: TPanel
inherited BBtnReturn: TBitBtn
OnClick = BBtnReturnClick
end
inherited BBtnPrint: TBitBtn
OnClick = BBtnPrintClick
end
inherited BBtnCancel: TBitBtn
OnClick = BBtnCancelClick
end
end
inherited Pnlcompontparent: TPanel
Height = 373
object Splitter1: TSplitter
Left = 401
Top = 0
Width = 4
Height = 373
Cursor = crHSplit
end
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 401
Height = 373
Align = alLeft
Caption = #35835#32773#20449#24687#21345
Font.Charset = DEFAULT_CHARSET
Font.Color = clPurple
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
object Panel1: TPanel
Left = 16
Top = 24
Width = 369
Height = 73
BevelInner = bvLowered
BevelOuter = bvLowered
Caption = 'Panel1'
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 32
Width = 73
Height = 16
AutoSize = False
Caption = #20511#20070#35777#21495#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Edreaderid: TEdit
Left = 96
Top = 24
Width = 121
Height = 28
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
MaxLength = 14
ParentFont = False
TabOrder = 0
OnKeyPress = EdreaderidKeyPress
end
object BtBreader: TBitBtn
Left = 256
Top = 24
Width = 75
Height = 25
Cursor = crHandPoint
Caption = #30830#35748
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = BtBreaderClick
end
end
object GroupBox3: TGroupBox
Left = 16
Top = 112
Width = 185
Height = 241
Caption = #35835#32773#20449#24687
Font.Charset = DEFAULT_CHARSET
Font.Color = clTeal
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
object Label3: TLabel
Left = 16
Top = 48
Width = 36
Height = 13
AutoSize = False
Caption = #24037#21495#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 16
Top = 88
Width = 36
Height = 13
AutoSize = False
Caption = #35777#21495#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 16
Top = 165
Width = 36
Height = 13
AutoSize = False
Caption = #21333#20301#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 8
Top = 209
Width = 60
Height = 13
AutoSize = False
Caption = #21150#35777#26085#26399#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 16
Top = 123
Width = 36
Height = 13
AutoSize = False
Caption = #22995#21517#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DBE1: TDBEdit
Left = 72
Top = 40
Width = 105
Height = 22
Cursor = crNo
AutoSelect = False
Color = clInfoBk
Ctl3D = False
DataField = 'READER_NO'
DataSource = DMbook.DSreader
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 0
end
object DBE2: TDBEdit
Left = 72
Top = 79
Width = 105
Height = 22
Cursor = crNo
AutoSelect = False
Color = clInfoBk
Ctl3D = False
DataField = 'READER_ID'
DataSource = DMbook.DSreader
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 1
end
object DBE3: TDBEdit
Left = 72
Top = 121
Width = 105
Height = 22
Cursor = crNo
AutoSelect = False
Color = clInfoBk
Ctl3D = False
DataField = 'READER_NAME'
DataSource = DMbook.DSreader
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object DBE4: TDBEdit
Left = 72
Top = 161
Width = 105
Height = 22
Cursor = crNo
AutoSelect = False
Color = clInfoBk
Ctl3D = False
DataField = 'READER_DEPT'
DataSource = DMbook.DSreader
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 3
end
object DBE5: TDBEdit
Left = 72
Top = 202
Width = 105
Height = 19
Cursor = crNo
AutoSelect = False
Color = clInfoBk
Ctl3D = False
DataField = 'READER_DODATE'
DataSource = DMbook.DSreader
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 4
end
end
object GroupBox4: TGroupBox
Left = 208
Top = 112
Width = 177
Height = 241
Caption = #24050#20511#26377#30340#20070
Font.Charset = DEFAULT_CHARSET
Font.Color = clTeal
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
object Label22: TLabel
Left = 8
Top = 27
Width = 54
Height = 16
AutoSize = False
Caption = ' '#20070#21495' '
Color = clInfoBk
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label23: TLabel
Left = 80
Top = 27
Width = 57
Height = 16
AutoSize = False
Caption = #20070#21517' '
Color = clInfoBk
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object LBbook: TListBox
Left = 8
Top = 48
Width = 161
Height = 185
Cursor = crHandPoint
Color = clInfoBk
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 20
ParentCtl3D = False
ParentFont = False
TabOrder = 0
OnClick = LBbookClick
end
end
end
object GroupBox2: TGroupBox
Left = 405
Top = 0
Width = 376
Height = 373
Align = alClient
Caption = #36824#20070#22270#20070#20449#24687#21345
Font.Charset = DEFAULT_CHARSET
Font.Color = clPurple
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
object Panel2: TPanel
Left = 8
Top = 24
Width = 361
Height = 73
BevelInner = bvLowered
BevelOuter = bvLowered
Caption = 'Panel2'
TabOrder = 0
object Label2: TLabel
Left = 24
Top = 32
Width = 91
Height = 16
AutoSize = False
Caption = #24453#36824#20070#20070#21495#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Edbookid: TEdit
Left = 120
Top = 24
Width = 121
Height = 28
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
MaxLength = 8
ParentFont = False
TabOrder = 0
OnEnter = EdbookidEnter
OnKeyPress = EdbookidKeyPress
end
object BtBbook: TBitBtn
Left = 264
Top = 24
Width = 75
Height = 25
Cursor = crHandPoint
Caption = #30830#35748
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = BtBbookClick
end
end
object GroupBox5: TGroupBox
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -