📄 card.dfm
字号:
object FormCard: TFormCard
Left = 25
Top = 30
Width = 766
Height = 541
Caption = '卡片管理'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object PageControl1: TPageControl
Left = 3
Top = 1
Width = 750
Height = 512
ActivePage = TabSheet1
TabOrder = 0
object TabSheet1: TTabSheet
Caption = '卡片管理'
object GroupBox1: TGroupBox
Left = 4
Top = 6
Width = 733
Height = 53
Caption = '编辑区'
Enabled = False
TabOrder = 0
object Label2: TLabel
Left = 87
Top = 24
Width = 66
Height = 12
Caption = '卡片编号(&B)'
FocusControl = DBEditBh
end
object Label3: TLabel
Left = 384
Top = 24
Width = 66
Height = 12
Caption = '卡片内码(&W)'
FocusControl = DBEditMc
end
object DBEditBh: TDBEdit
Left = 157
Top = 20
Width = 163
Height = 20
DataField = 'CardNo'
DataSource = DataSource1
TabOrder = 0
end
object DBEditMc: TDBEdit
Left = 454
Top = 20
Width = 196
Height = 20
DataField = 'CardID'
DataSource = DataSource1
TabOrder = 1
OnExit = DBEditMcExit
end
end
object DBGrid1: TDBGrid
Left = 3
Top = 63
Width = 736
Height = 354
DataSource = DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 1
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clBtnFace
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'CardNo'
Title.Alignment = taCenter
Title.Caption = '卡片编号'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clHighlight
Title.Font.Height = -12
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'CardID'
Title.Alignment = taCenter
Title.Caption = '卡片内码'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clHighlight
Title.Font.Height = -12
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'HolderNo'
Title.Alignment = taCenter
Title.Caption = '持卡人编号'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clHighlight
Title.Font.Height = -12
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'HolderName'
Title.Alignment = taCenter
Title.Caption = '持卡人姓名'
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clHighlight
Title.Font.Height = -12
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'CanUse'
Title.Alignment = taCenter
Title.Caption = '能否使用 '
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clHighlight
Title.Font.Height = -12
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end>
end
object BitBtnAdd: TBitBtn
Left = 94
Top = 425
Width = 70
Height = 25
Caption = '增加(&A)'
TabOrder = 2
OnClick = BitBtnAddClick
Glyph.Data = {
DE000000424DDE0000000000000076000000280000000D0000000D0000000100
0400000000006800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
F000FFFFFFFFFFFFF000FFFFF000FFFFF000FFFFF0F0FFFFF000FFFFF0F0FFFF
F000FF0000F0000FF000FF0FFFFFFF0FF000FF0000F0000FF000FFFFF0F0FFFF
F000FFFFF0F0FFFFF000FFFFF000FFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
F000}
end
object BitBtnDelete: TBitBtn
Left = 166
Top = 425
Width = 70
Height = 25
Caption = '删除(&D)'
TabOrder = 3
OnClick = BitBtnDeleteClick
Glyph.Data = {
DE000000424DDE0000000000000076000000280000000D0000000D0000000100
0400000000006800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
F000FF000000000FF000FF0FFFFFFF0FF000FF000000000FF000FFFFFFFFFFFF
F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
F000}
end
object BitBtnSave: TBitBtn
Left = 514
Top = 425
Width = 70
Height = 25
Caption = '保存(&S)'
Enabled = False
TabOrder = 4
OnClick = BitBtnSaveClick
Glyph.Data = {
26050000424D26050000000000003604000028000000100000000F0000000100
080000000000F000000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0C8
A400000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -