📄 unit4.~dfm
字号:
object pass2frm: Tpass2frm
Left = 307
Top = 225
BorderStyle = bsDialog
Caption = #35835#32773#26381#21153
ClientHeight = 362
ClientWidth = 630
Color = clSkyBlue
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Label4: TLabel
Left = 24
Top = 8
Width = 3
Height = 13
end
object Label8: TLabel
Left = 232
Top = 24
Width = 60
Height = 13
Caption = #26816#32034#22270#20070' '
end
object Label9: TLabel
Left = 448
Top = 24
Width = 60
Height = 13
Caption = #26816#32034#26041#24335' '
end
object DBGrid1: TDBGrid
Left = 232
Top = 48
Width = 385
Height = 129
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object GroupBox1: TGroupBox
Left = 8
Top = 16
Width = 193
Height = 129
Caption = #35831#20808#30331#38470':'
TabOrder = 1
object Label1: TLabel
Left = 16
Top = 24
Width = 36
Height = 13
Caption = #23398#21495#65306
end
object Label2: TLabel
Left = 16
Top = 56
Width = 36
Height = 13
Caption = #23494#30721#65306
end
object Edit1: TEdit
Left = 64
Top = 16
Width = 121
Height = 21
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object Edit2: TEdit
Left = 64
Top = 48
Width = 121
Height = 21
AutoSize = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordChar = '*'
TabOrder = 1
end
object Button1: TButton
Left = 64
Top = 88
Width = 49
Height = 25
Caption = #30331#38470
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 136
Top = 88
Width = 49
Height = 25
Caption = #27880#38144
TabOrder = 3
OnClick = Button2Click
end
end
object Edit3: TEdit
Left = 296
Top = 16
Width = 121
Height = 21
TabOrder = 2
end
object ComboBox1: TComboBox
Left = 520
Top = 16
Width = 97
Height = 21
ItemHeight = 13
TabOrder = 3
Text = 'ISBN'
OnChange = ComboBox1Change
Items.Strings = (
'ISBN'
#20070#21517
#20316#32773
#20986#29256#31038
'')
end
object Button3: TButton
Left = 528
Top = 184
Width = 89
Height = 25
Caption = #39044#32422#35813#22270#20070
Enabled = False
TabOrder = 4
OnClick = Button3Click
end
object GroupBox2: TGroupBox
Left = 8
Top = 184
Width = 193
Height = 169
Caption = #29992#25143#23494#30721#20462#25913
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
object Label5: TLabel
Left = 8
Top = 32
Width = 48
Height = 13
Caption = #21407#23494#30721#65306
end
object Label6: TLabel
Left = 8
Top = 72
Width = 48
Height = 13
Caption = #26032#23494#30721#65306
end
object Label7: TLabel
Left = 8
Top = 104
Width = 60
Height = 13
Caption = #23494#30721#30830#35748#65306
end
object Edit4: TEdit
Left = 72
Top = 32
Width = 113
Height = 21
AutoSize = False
PasswordChar = '*'
TabOrder = 0
end
object Edit5: TEdit
Left = 72
Top = 64
Width = 113
Height = 21
AutoSize = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordChar = '*'
TabOrder = 1
end
object Edit6: TEdit
Left = 72
Top = 96
Width = 113
Height = 21
AutoSize = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordChar = '*'
TabOrder = 2
end
object Button4: TButton
Left = 72
Top = 128
Width = 49
Height = 25
Caption = #20462#25913
Enabled = False
TabOrder = 3
OnClick = Button4Click
end
object Button5: TButton
Left = 136
Top = 128
Width = 49
Height = 25
Caption = #37325#32622
Enabled = False
TabOrder = 4
end
end
object Memo1: TMemo
Left = 232
Top = 224
Width = 385
Height = 129
TabOrder = 6
end
object Table1: TTable
Active = True
DatabaseName = 'DBDEMOS'
TableName = 'libstudent.DB'
Left = 16
Top = 80
end
object Table2: TTable
Active = True
DatabaseName = 'DBDEMOS'
TableName = 'libbook1.DB'
Left = 200
Top = 72
end
object DataSource1: TDataSource
DataSet = Table2
Left = 200
Top = 112
end
object Table3: TTable
Active = True
DatabaseName = 'DBDEMOS'
TableName = 'libyuebook.db'
Left = 192
end
object Table4: TTable
Active = True
DatabaseName = 'DBDEMOS'
TableName = 'libbook2.DB'
Left = 208
Top = 192
end
object Table5: TTable
DatabaseName = 'DBDEMOS'
IndexFieldNames = 'ISBN'
TableName = 'libbook1.DB'
Left = 200
Top = 152
end
object Table6: TTable
DatabaseName = 'DBDEMOS'
IndexFieldNames = #24615#21035
TableName = 'libstudent.DB'
Left = 208
Top = 248
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -