📄 check.~dfm
字号:
inherited f_check: Tf_check
Left = 255
Top = 205
Caption = #25253#25439#25253#28322#31649#29702
ClientHeight = 330
ClientWidth = 563
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 203
Top = 7
Width = 157
Height = 23
AutoSize = False
Caption = #25253#25439#25253#28322#31649#29702
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
end
object Panel3: TPanel
Left = 0
Top = 288
Width = 563
Height = 42
Align = alBottom
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
OnEnter = Panel1Enter
object Save: TButton
Left = 313
Top = 10
Width = 67
Height = 22
Caption = #20445#23384
TabOrder = 0
OnClick = SaveClick
OnEnter = Panel1Enter
end
object Cancel: TButton
Left = 391
Top = 10
Width = 67
Height = 22
Caption = #21462#28040
TabOrder = 1
OnClick = CancelClick
OnEnter = Panel1Enter
end
object Quit: TButton
Left = 470
Top = 10
Width = 67
Height = 22
Caption = #36864#20986
TabOrder = 2
OnClick = QuitClick
OnEnter = Panel1Enter
end
object Lose: TRadioButton
Left = 26
Top = 13
Width = 81
Height = 17
Caption = #25253#25439#22788#29702
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
TabStop = True
OnEnter = Panel1Enter
end
object More: TRadioButton
Left = 120
Top = 13
Width = 82
Height = 17
Caption = #25253#28322#22788#29702
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnEnter = Panel1Enter
end
end
object Grid: TStringGrid
Left = 0
Top = 135
Width = 563
Height = 153
Align = alBottom
ColCount = 4
Ctl3D = True
DefaultRowHeight = 18
FixedCols = 0
RowCount = 2
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goRowSelect]
ParentCtl3D = False
TabOrder = 2
OnEnter = Panel1Enter
OnKeyDown = GridKeyDown
OnSelectCell = GridSelectCell
ColWidths = (
168
167
116
80)
end
object Panel1: TPanel
Left = 0
Top = 55
Width = 563
Height = 42
Align = alBottom
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
OnEnter = Panel1Enter
object Label2: TLabel
Left = 355
Top = 13
Width = 40
Height = 13
AutoSize = False
Caption = #26102#38388
end
object Counter: TComboBox
Left = 238
Top = 10
Width = 100
Height = 19
Style = csOwnerDrawFixed
ItemHeight = 13
TabOrder = 0
OnEnter = Panel1Enter
end
object Radio1: TRadioButton
Left = 22
Top = 13
Width = 48
Height = 17
Caption = #20179#24211
Checked = True
TabOrder = 1
TabStop = True
OnEnter = Panel1Enter
end
object Radio2: TRadioButton
Left = 187
Top = 13
Width = 52
Height = 17
Caption = #26588#21488
TabOrder = 2
OnEnter = Panel1Enter
end
object Depot: TComboBox
Left = 72
Top = 10
Width = 100
Height = 19
Style = csOwnerDrawFixed
ItemHeight = 13
TabOrder = 3
OnEnter = Panel1Enter
end
object Picker1: TDateTimePicker
Left = 390
Top = 9
Width = 148
Height = 21
Date = 38496.649921678240000000
Time = 38496.649921678240000000
TabOrder = 4
OnEnter = Panel1Enter
end
end
object Panel2: TPanel
Left = 0
Top = 97
Width = 563
Height = 38
Align = alBottom
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
object Label6: TLabel
Left = 9
Top = 12
Width = 57
Height = 13
Alignment = taRightJustify
AutoSize = False
BiDiMode = bdRightToLeft
Caption = #26465#24418#30721
ParentBiDiMode = False
end
object Label10: TLabel
Left = 163
Top = 12
Width = 70
Height = 13
Alignment = taRightJustify
AutoSize = False
BiDiMode = bdRightToLeft
Caption = #20070#31821#21517#31216
ParentBiDiMode = False
end
object Label11: TLabel
Left = 349
Top = 12
Width = 35
Height = 13
Alignment = taRightJustify
AutoSize = False
BiDiMode = bdRightToLeft
Caption = #20316#32773
ParentBiDiMode = False
end
object Label13: TLabel
Left = 450
Top = 12
Width = 41
Height = 13
Alignment = taRightJustify
AutoSize = False
BiDiMode = bdRightToLeft
Caption = #25968#37327
ParentBiDiMode = False
end
object Barcode: TEdit
Left = 71
Top = 8
Width = 100
Height = 21
TabOrder = 0
OnEnter = Panel1Enter
OnKeyDown = BarcodeKeyDown
OnKeyPress = BarcodeKeyPress
end
object Bookname: TEdit
Left = 238
Top = 8
Width = 100
Height = 21
TabOrder = 1
OnChange = BooknameChange
OnEnter = Panel1Enter
OnKeyDown = BarcodeKeyDown
OnKeyPress = BooknameKeyPress
end
object Author: TEdit
Left = 390
Top = 8
Width = 63
Height = 21
Enabled = False
TabOrder = 2
OnEnter = Panel1Enter
end
object Sum: TEdit
Left = 495
Top = 8
Width = 42
Height = 21
TabOrder = 3
OnEnter = Panel1Enter
OnKeyDown = BarcodeKeyDown
OnKeyPress = SumKeyPress
end
end
object Grid1: TDBGrid
Left = 71
Top = 127
Width = 383
Height = 122
DataSource = Source1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 4
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Visible = False
OnDblClick = Grid1DblClick
OnExit = Panel1Enter
OnKeyDown = Grid1KeyDown
Columns = <
item
Expanded = False
FieldName = 'bookname'
Title.Caption = #20070#31821#21517#31216
Width = 108
Visible = True
end
item
Expanded = False
FieldName = 'barcode'
Title.Caption = #26465#24418#30721
Width = 91
Visible = True
end
item
Expanded = False
FieldName = 'bookconcern'
Title.Caption = #20986#29256#31038
Width = 75
Visible = True
end
item
Expanded = False
FieldName = 'author'
Title.Caption = #20316#32773
Width = 71
Visible = True
end>
end
object Source1: TDataSource
Left = 32
Top = 168
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -