📄 source.dfm
字号:
object SourceForm: TSourceForm
Left = 188
Top = 103
Width = 447
Height = 318
BorderIcons = [biSystemMenu]
Caption = '设置刷卡数据来源'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 12
object m_L1: TLabel
Left = 20
Top = 32
Width = 114
Height = 12
Caption = '选择刷卡数据来源(&S)'
FocusControl = m_SourceCoBox
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object m_SourceCoBox: TComboBox
Left = 38
Top = 53
Width = 137
Height = 20
Style = csDropDownList
Color = clGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImeName = '汉王输入法'
ItemHeight = 12
ParentFont = False
TabOrder = 0
OnChange = m_SourceCoBoxChange
end
object m_GBox1: TGroupBox
Left = 203
Top = 30
Width = 225
Height = 61
Caption = '原始数据库(&T)'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 1
object m_TableEdit: TEdit
Left = 9
Top = 21
Width = 175
Height = 20
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImeName = '汉王输入法'
ParentFont = False
TabOrder = 0
Text = 'm_TableEdit'
end
object m_FileBut: TButton
Left = 193
Top = 18
Width = 23
Height = 23
Caption = '>>'
TabOrder = 1
OnClick = m_FileButClick
end
end
object m_GBox2: TGroupBox
Left = 203
Top = 106
Width = 201
Height = 103
Caption = '通讯串行端口(&C)'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 2
object m_L2: TLabel
Left = 19
Top = 62
Width = 168
Height = 24
Caption = '注意:选择“COM0”, 则系统将自动侦测通讯端口'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
WordWrap = True
end
object m_CommCoBox: TComboBox
Left = 17
Top = 22
Width = 125
Height = 20
Style = csDropDownList
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImeName = '汉王输入法'
ItemHeight = 12
ParentFont = False
TabOrder = 0
end
end
object m_OkBut: TBitBtn
Left = 74
Top = 229
Width = 103
Height = 39
Caption = '确认(&Y)'
Default = True
TabOrder = 3
OnClick = m_OkButClick
Glyph.Data = {
F2010000424DF201000000000000760000002800000024000000130000000100
0400000000007C01000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333334433333
3333333333388F3333333333000033334224333333333333338338F333333333
0000333422224333333333333833338F33333333000033422222243333333333
83333338F3333333000034222A22224333333338F33F33338F33333300003222
A2A2224333333338F383F3338F33333300003A2A222A222433333338F8333F33
38F33333000034A22222A22243333338833333F3338F333300004222A2222A22
2433338F338F333F3338F3330000222A3A2224A22243338F3838F338F3338F33
0000A2A333A2224A2224338F83338F338F3338F300003A33333A2224A2224338
333338F338F3338F000033333333A2224A2243333333338F338F338F00003333
33333A2224A2233333333338F338F83300003333333333A2224A333333333333
8F338F33000033333333333A222433333333333338F338F30000333333333333
A224333333333333338F38F300003333333333333A223333333333333338F8F3
000033333333333333A3333333333333333383330000}
NumGlyphs = 2
end
object m_CancelBut: TBitBtn
Left = 258
Top = 230
Width = 103
Height = 39
Caption = '取消(&N)'
TabOrder = 4
Kind = bkCancel
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -