📄 currency.dfm
字号:
inherited frmCurrency: TfrmCurrency
Left = 143
Top = 86
Width = 582
Height = 432
Caption = '货币资料'
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
inherited sbBar: TStatusBar
Top = 364
Width = 574
end
inherited CoolBar1: TCoolBar
Width = 574
Bands = <
item
Control = tbMainBar
ImageIndex = -1
MinHeight = 35
Width = 574
end>
inherited tbMainBar: TToolBar
Width = 561
end
end
object FloatPanel1: TFloatPanel [2]
Left = 313
Top = 39
Width = 261
Height = 325
Align = alClient
Color = 50331647
Caption = 'FloatPanel1'
ParentColor = False
TabOrder = 2
object Label1: TLabel
Left = 25
Top = 27
Width = 60
Height = 12
Caption = '货币代码:'
end
object Label2: TLabel
Left = 25
Top = 54
Width = 60
Height = 12
Caption = '货币名称:'
end
object Label3: TLabel
Left = 25
Top = 133
Width = 60
Height = 12
Caption = '金额精度:'
end
object Label4: TLabel
Left = 25
Top = 160
Width = 60
Height = 12
Caption = '单价精度:'
end
object Label6: TLabel
Left = 25
Top = 186
Width = 60
Height = 12
Caption = '进位标志:'
end
object Label5: TLabel
Left = 25
Top = 80
Width = 60
Height = 12
Caption = '货币符号:'
end
object Label7: TLabel
Left = 25
Top = 107
Width = 60
Height = 12
Caption = '符号位置:'
end
object seCode: TSDEdit
Left = 82
Top = 21
Width = 128
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 0
Text = 'seCode'
OnKeyDown = seCodeKeyDown
SplitSymbol = ' | '
end
object seName: TSDEdit
Left = 82
Top = 48
Width = 128
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 1
Text = 'seName'
SplitSymbol = ' | '
end
object sePriceDec: TSDEdit
Left = 82
Top = 154
Width = 128
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 5
Text = 'sePriceDec'
CharType = ctNumeric
SplitSymbol = ' | '
end
object cbLocal: TCheckBox
Left = 28
Top = 224
Width = 95
Height = 13
Caption = '是否本币标志'
Color = 50331647
ParentColor = False
TabOrder = 7
end
object scCarry: TSDComboBox
Left = 82
Top = 179
Width = 128
Height = 20
Style = csDropDownList
Color = 50331647
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 6
KeyItem = cbItem2
end
object seSym: TSDEdit
Left = 82
Top = 74
Width = 128
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 2
Text = 'seSym'
SplitSymbol = ' | '
end
object scPos: TSDComboBox
Left = 82
Top = 100
Width = 128
Height = 20
Style = csDropDownList
Color = 50331647
Ctl3D = False
ItemHeight = 12
ParentCtl3D = False
TabOrder = 3
KeyItem = cbItem2
end
object seAmtDec: TSDEdit
Left = 82
Top = 127
Width = 128
Height = 18
Ctl3D = False
ParentColor = True
ParentCtl3D = False
TabOrder = 4
Text = 'seAmtDec'
CharType = ctNumeric
SplitSymbol = ' | '
end
end
object sgCurrency: TSDGrid [3]
Left = 0
Top = 39
Width = 313
Height = 325
Align = alLeft
Color = 50331647
Ctl3D = False
DefaultRowHeight = 18
FixedColor = 8564917
RowCount = 4
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
ParentCtl3D = False
TabOrder = 3
OnClick = sgCurrencyClick
EvenGridColor = 50331647
OddGridColor = 50331647
Columns = <
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '代码'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '货币名称'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '金额精度'
ColumnWidth = 0
end
item
ColumnFont.Charset = GB2312_CHARSET
ColumnFont.Color = clWindowText
ColumnFont.Height = -12
ColumnFont.Name = '宋体'
ColumnFont.Style = []
TitleString = '单价精度'
ColumnWidth = 0
end>
ColWidths = (
10
64
78
74
75)
end
inherited MainMenu1: TMainMenu
Left = 262
Top = 99
end
inherited ImageList1: TImageList
Left = 266
Top = 154
end
inherited RecPrintDlg: TPrintDialog
Left = 539
Top = 39
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -