companyinf.dfm
来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 757 行 · 第 1/2 页
DFM
757 行
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 8
Text = 'seCompanyBackupPath'
SplitSymbol = ' | '
end
end
object GroupBox2: TGroupBox
Left = 309
Top = 5
Width = 274
Height = 299
TabOrder = 2
object Label15: TLabel
Left = 18
Top = 21
Width = 60
Height = 12
Caption = '法人代表:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 18
Top = 48
Width = 48
Height = 12
Caption = '税 号:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 18
Top = 74
Width = 60
Height = 12
Caption = '银行帐号:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 18
Top = 101
Width = 48
Height = 12
Caption = '本 币:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 18
Top = 127
Width = 60
Height = 12
Caption = '当前月份:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 18
Top = 206
Width = 60
Height = 12
Caption = '启用日期:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 18
Top = 153
Width = 48
Height = 12
Caption = '新代码:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 18
Top = 180
Width = 48
Height = 12
Caption = '旧代码:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 18
Top = 233
Width = 60
Height = 12
Caption = '修改日期:'
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object seCompanyLegalPerson: TSDEdit
Left = 74
Top = 16
Width = 166
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 0
Text = 'seCompanyLegalPerson'
SplitSymbol = ' | '
end
object seCompanyTaxNo: TSDEdit
Left = 74
Top = 42
Width = 166
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 1
Text = 'seCompanyTaxNo'
SplitSymbol = ' | '
end
object seCompanyBankNo: TSDEdit
Left = 74
Top = 68
Width = 166
Height = 18
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 2
Text = 'seCompanyBankNo'
SplitSymbol = ' | '
end
object scCompanyCurrency: TSDComboBox
Left = 74
Top = 95
Width = 106
Height = 20
Color = 16643297
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ItemHeight = 12
ParentCtl3D = False
ParentFont = False
TabOrder = 3
Text = 'scCompanyCurrency'
KeyItem = cbItem2
end
object seCompanyFmonth: TSDEdit
Left = 74
Top = 122
Width = 106
Height = 18
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 4
Text = 'seCompanyCurMonth'
SplitSymbol = ' | '
end
object seCompanyNewCode: TSDEdit
Left = 74
Top = 148
Width = 106
Height = 18
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 5
Text = 'seCompanyNewCode'
SplitSymbol = ' | '
end
object seCompanyOldCode: TSDEdit
Left = 74
Top = 174
Width = 106
Height = 18
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 6
Text = 'seCompanyOldCode'
SplitSymbol = ' | '
end
object sdCompanyEdate: TSDEdit
Left = 74
Top = 227
Width = 106
Height = 18
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 7
Text = 'sdCompanyEdate'
SplitSymbol = ' | '
end
object sdCompanySdate: TSDEdit
Left = 74
Top = 200
Width = 106
Height = 18
Ctl3D = False
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 8
Text = 'seCompanyNewCode'
SplitSymbol = ' | '
end
object chkCompanyCancel: TCheckBox
Left = 18
Top = 258
Width = 46
Height = 16
Caption = '停 用'
Color = 16643297
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentColor = False
ParentFont = False
State = cbGrayed
TabOrder = 9
end
end
object btOk: TBitBtn
Left = 394
Top = 311
Width = 69
Height = 23
Caption = '确定'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ModalResult = 1
ParentFont = False
TabOrder = 3
OnClick = btOkClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object btCacel: TBitBtn
Left = 475
Top = 311
Width = 70
Height = 23
Caption = '取消'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = btCacelClick
Kind = bkCancel
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?