📄 uuesrmgrf.dfm
字号:
object UserMgrF: TUserMgrF
Left = 0
Top = 0
Width = 601
Height = 439
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
object Button1: TButton
Left = 516
Top = 414
Width = 67
Height = 22
Caption = '关闭'
TabOrder = 0
TabStop = False
OnClick = Button1Click
end
object PageControl1: TPageControl
Left = 3
Top = 5
Width = 595
Height = 405
ActivePage = TabSheet1
TabOrder = 1
object TabSheet1: TTabSheet
Caption = '查询一般用户'
object GroupBox1: TGroupBox
Left = 3
Top = 2
Width = 581
Height = 70
Caption = '查询条件'
TabOrder = 0
object CheckBox1: TCheckBox
Left = 10
Top = 50
Width = 67
Height = 17
Caption = '模糊查找'
TabOrder = 0
end
object RadioButton1: TRadioButton
Left = 9
Top = 24
Width = 80
Height = 17
Caption = '按借书号'
Checked = True
TabOrder = 1
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 171
Top = 24
Width = 80
Height = 17
Caption = '按姓名'
TabOrder = 2
OnClick = RadioButton2Click
end
object RadioButton3: TRadioButton
Left = 333
Top = 24
Width = 80
Height = 17
Caption = '按身份'
TabOrder = 3
OnClick = RadioButton3Click
end
end
object StaticText1: TStaticText
Left = 6
Top = 79
Width = 40
Height = 16
Caption = '输入项'
TabOrder = 1
end
object ComboBox1: TComboBox
Left = 69
Top = 76
Width = 443
Height = 21
Style = csSimple
ItemHeight = 12
TabOrder = 2
end
object Button2: TButton
Left = 516
Top = 76
Width = 67
Height = 22
Caption = '查找'
Default = True
TabOrder = 3
OnClick = Button2Click
end
object ListView1: TListView
Left = 3
Top = 100
Width = 581
Height = 252
Columns = <
item
Caption = '借书号'
Width = 80
end
item
Caption = '姓名'
Width = 60
end
item
Caption = '性别'
Width = 40
end
item
Caption = '身份号'
end
item
Caption = '身份描述'
Width = 150
end
item
Caption = '身份证号'
Width = 150
end>
GridLines = True
ReadOnly = True
RowSelect = True
TabOrder = 4
ViewStyle = vsReport
end
object ListBox1: TListBox
Left = 501
Top = 213
Width = 67
Height = 55
ItemHeight = 12
TabOrder = 5
Visible = False
end
object StaticText7: TStaticText
Left = 9
Top = 355
Width = 58
Height = 16
Caption = '共0条记录'
TabOrder = 6
end
object Button9: TButton
Left = 441
Top = 356
Width = 67
Height = 22
Caption = '输出'
TabOrder = 7
OnClick = Button9Click
end
object Button10: TButton
Left = 508
Top = 356
Width = 67
Height = 22
Caption = '打印'
TabOrder = 8
OnClick = Button10Click
end
end
object TabSheet2: TTabSheet
Caption = '编辑一般用户'
ImageIndex = 1
object GroupBox2: TGroupBox
Left = 3
Top = 6
Width = 260
Height = 368
Caption = '用户列表'
TabOrder = 0
object ListView2: TListView
Left = 6
Top = 15
Width = 247
Height = 322
Columns = <
item
Caption = '借书证号'
Width = 80
end
item
Caption = '姓名'
Width = 70
end
item
Caption = '性别'
end
item
Caption = '身份号'
end
item
Caption = '身份证号'
Width = 120
end>
GridLines = True
MultiSelect = True
ReadOnly = True
RowSelect = True
TabOrder = 0
TabStop = False
ViewStyle = vsReport
OnChange = ListView2Change
OnMouseDown = ListView2MouseDown
end
object Button3: TButton
Left = 183
Top = 341
Width = 67
Height = 22
Caption = '刷新'
TabOrder = 1
TabStop = False
OnClick = Button3Click
end
object ListBox2: TListBox
Left = 171
Top = 192
Width = 79
Height = 64
ItemHeight = 12
TabOrder = 2
Visible = False
end
object Button4: TButton
Left = 115
Top = 341
Width = 67
Height = 22
Caption = '删除'
TabOrder = 3
TabStop = False
OnClick = Button4Click
end
end
object GroupBox3: TGroupBox
Left = 268
Top = 6
Width = 317
Height = 368
Caption = '编辑用户'
TabOrder = 1
object GroupBox4: TGroupBox
Left = 16
Top = 18
Width = 291
Height = 52
Caption = '操作'
TabOrder = 0
object RadioButton4: TRadioButton
Left = 21
Top = 21
Width = 49
Height = 17
Caption = '添加'
Checked = True
TabOrder = 0
TabStop = True
OnClick = RadioButton4Click
end
object RadioButton5: TRadioButton
Left = 96
Top = 21
Width = 52
Height = 17
Caption = '修改'
TabOrder = 1
OnClick = RadioButton5Click
end
end
object GroupBox5: TGroupBox
Left = 15
Top = 75
Width = 292
Height = 222
Caption = '选项'
TabOrder = 1
TabStop = True
object Edit3: TEdit
Left = 119
Top = 175
Width = 144
Height = 20
TabOrder = 5
end
object Edit1: TEdit
Left = 119
Top = 39
Width = 144
Height = 20
TabOrder = 0
end
object Edit2: TEdit
Left = 119
Top = 73
Width = 144
Height = 20
TabOrder = 1
end
object ComboBox2: TComboBox
Left = 119
Top = 107
Width = 50
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 2
Items.Strings = (
'男'
'女')
end
object ComboBox3: TComboBox
Left = 119
Top = 141
Width = 144
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 3
end
object StaticText2: TStaticText
Left = 18
Top = 41
Width = 52
Height = 16
Caption = '借书证号'
TabOrder = 4
end
object StaticText3: TStaticText
Left = 18
Top = 76
Width = 28
Height = 16
Caption = '姓名'
TabOrder = 6
end
object StaticText4: TStaticText
Left = 18
Top = 110
Width = 28
Height = 16
Caption = '性别'
TabOrder = 7
end
object StaticText5: TStaticText
Left = 18
Top = 145
Width = 28
Height = 16
Caption = '身份'
TabOrder = 8
end
object StaticText6: TStaticText
Left = 18
Top = 179
Width = 52
Height = 16
Caption = '身份证号'
TabOrder = 9
end
end
object Button5: TButton
Left = 241
Top = 341
Width = 67
Height = 22
Caption = '确定'
Default = True
TabOrder = 2
OnClick = Button5Click
end
end
end
object TabSheet3: TTabSheet
Caption = '用户身份编辑'
ImageIndex = 2
object GroupBox6: TGroupBox
Left = 3
Top = 6
Width = 260
Height = 368
Caption = '用户身份列表'
TabOrder = 0
object ListView3: TListView
Left = 6
Top = 15
Width = 247
Height = 318
Columns = <
item
Caption = '身份号'
end
item
Caption = '身份描述 '
Width = 120
end
item
Caption = '最大借阅图书数'
end>
GridLines = True
MultiSelect = True
ReadOnly = True
RowSelect = True
TabOrder = 0
ViewStyle = vsReport
OnChange = ListView3Change
end
object Button7: TButton
Left = 183
Top = 341
Width = 67
Height = 22
Caption = '删除'
TabOrder = 1
OnClick = Button7Click
end
object Button11: TButton
Left = 8
Top = 341
Width = 67
Height = 22
Caption = '输出'
TabOrder = 2
OnClick = Button11Click
end
object Button12: TButton
Left = 75
Top = 341
Width = 67
Height = 22
Caption = '打印'
TabOrder = 3
OnClick = Button12Click
end
end
object GroupBox7: TGroupBox
Left = 268
Top = 6
Width = 317
Height = 368
Caption = '编辑身份'
TabOrder = 1
object GroupBox8: TGroupBox
Left = 16
Top = 18
Width = 291
Height = 52
Caption = '操作'
TabOrder = 0
object RadioButton6: TRadioButton
Left = 21
Top = 21
Width = 49
Height = 17
Caption = '添加'
Checked = True
TabOrder = 0
TabStop = True
OnClick = RadioButton6Click
end
object RadioButton7: TRadioButton
Left = 96
Top = 21
Width = 52
Height = 17
Caption = '修改'
TabOrder = 1
OnClick = RadioButton7Click
end
end
object GroupBox9: TGroupBox
Left = 15
Top = 108
Width = 292
Height = 160
Caption = '选项'
TabOrder = 1
object Edit5: TEdit
Left = 110
Top = 42
Width = 166
Height = 20
MaxLength = 2
TabOrder = 0
end
object Edit6: TEdit
Left = 110
Top = 78
Width = 166
Height = 20
TabOrder = 1
end
object StaticText8: TStaticText
Left = 18
Top = 44
Width = 40
Height = 16
Caption = '身份号'
TabOrder = 2
end
object StaticText9: TStaticText
Left = 18
Top = 80
Width = 52
Height = 16
Caption = '身份描述'
TabOrder = 3
end
object Edit4: TEdit
Left = 110
Top = 114
Width = 166
Height = 20
TabOrder = 4
end
object StaticText10: TStaticText
Left = 18
Top = 117
Width = 88
Height = 16
Caption = '最大借阅图书数'
TabOrder = 5
end
end
object Button8: TButton
Left = 240
Top = 341
Width = 67
Height = 22
Caption = '确定'
TabOrder = 2
OnClick = Button8Click
end
end
end
object TabSheet4: TTabSheet
Caption = '用户统计'
ImageIndex = 3
object ListView4: TListView
Left = 2
Top = 2
Width = 582
Height = 351
Color = clInfoBk
Columns = <
item
Caption = '身份号'
end
item
Caption = '身份描述'
Width = 200
end
item
Caption = '用户总数'
Width = 60
end
item
Caption = '借阅图书用户数'
Width = 100
end
item
Caption = '借阅图书数'
Width = 100
end>
GridLines = True
MultiSelect = True
ReadOnly = True
RowSelect = True
TabOrder = 0
ViewStyle = vsReport
end
object Button6: TButton
Left = 508
Top = 356
Width = 67
Height = 22
Caption = '刷新'
TabOrder = 1
OnClick = Button6Click
end
object Button13: TButton
Left = 373
Top = 356
Width = 67
Height = 22
Caption = '输出'
TabOrder = 2
OnClick = Button13Click
end
object Button14: TButton
Left = 440
Top = 356
Width = 67
Height = 22
Caption = '打印'
TabOrder = 3
OnClick = Button14Click
end
end
end
object SaveDialog1: TSaveDialog
DefaultExt = '*.txt'
Filter = '*.txt|*.txt'
InitialDir = '.'
Left = 178
Top = 172
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -