📄 scalcunit.dfm
字号:
object sCalcForm: TsCalcForm
Left = 138
Top = 169
BorderStyle = bsNone
Caption = 'Calculator'
ClientHeight = 172
ClientWidth = 214
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poMainFormCenter
Scaled = False
ShowHint = True
OnCreate = FormCreate
OnDeactivate = FormDeactivate
OnKeyPress = FormKeyPress
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object FMainPanel: TsPanel
Left = 0
Top = 0
Width = 214
Height = 172
Align = alClient
BorderWidth = 2
PopupMenu = PopupMenu1
TabOrder = 0
SkinData.SkinSection = 'PANEL'
object FCalculatorPanel: TsPanel
Left = 3
Top = 27
Width = 208
Height = 142
Align = alBottom
BorderWidth = 4
Caption = ' '
TabOrder = 0
SkinData.SkinSection = 'PANEL'
object sSpeedButton1: TsSpeedButton
Left = 89
Top = 29
Width = 55
Height = 20
Cursor = crHandPoint
Caption = '<-'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 0
OnClick = sSpeedButton1Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton2: TsSpeedButton
Left = 146
Top = 29
Width = 55
Height = 20
Cursor = crHandPoint
Caption = 'C'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 3
OnClick = sSpeedButton2Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton3: TsSpeedButton
Left = 5
Top = 51
Width = 31
Height = 20
Cursor = crHandPoint
Hint = 'Clear memory'
Caption = 'MC'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Spacing = 3
OnClick = sSpeedButton3Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton4: TsSpeedButton
Tag = 7
Left = 38
Top = 51
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '7'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton5: TsSpeedButton
Tag = 8
Left = 71
Top = 51
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '8'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton6: TsSpeedButton
Tag = 9
Left = 104
Top = 51
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '9'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton7: TsSpeedButton
Left = 137
Top = 51
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '/'
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 3
OnClick = sSpeedButton7Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton8: TsSpeedButton
Left = 170
Top = 51
Width = 31
Height = 20
Cursor = crHandPoint
Caption = 'sqrt'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 3
OnClick = sSpeedButton8Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton9: TsSpeedButton
Left = 5
Top = 73
Width = 31
Height = 20
Cursor = crHandPoint
Hint = 'From memory'
Caption = 'MR'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Spacing = 3
OnClick = sSpeedButton9Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton10: TsSpeedButton
Tag = 4
Left = 38
Top = 73
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '4'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton11: TsSpeedButton
Tag = 5
Left = 71
Top = 73
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '5'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton12: TsSpeedButton
Tag = 6
Left = 104
Top = 73
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '6'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton13: TsSpeedButton
Left = 137
Top = 73
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '*'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 3
OnClick = sSpeedButton13Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton14: TsSpeedButton
Left = 170
Top = 73
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '%'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 3
OnClick = sSpeedButton14Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton15: TsSpeedButton
Left = 5
Top = 95
Width = 31
Height = 20
Cursor = crHandPoint
Hint = 'To memory'
Caption = 'MS'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Spacing = 3
OnClick = sSpeedButton15Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton16: TsSpeedButton
Tag = 1
Left = 38
Top = 95
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '1'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton17: TsSpeedButton
Tag = 2
Left = 71
Top = 95
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '2'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton18: TsSpeedButton
Tag = 3
Left = 104
Top = 95
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '3'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton19: TsSpeedButton
Left = 137
Top = 95
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '-'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 3
OnClick = sSpeedButton19Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton20: TsSpeedButton
Left = 170
Top = 95
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '1/%'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Spacing = 3
Visible = False
OnClick = sSpeedButton20Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton21: TsSpeedButton
Left = 5
Top = 117
Width = 31
Height = 20
Cursor = crHandPoint
Hint = 'Sum with memory'
Caption = 'MP'
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Spacing = 3
OnClick = sSpeedButton21Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton22: TsSpeedButton
Left = 38
Top = 117
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '0'
Spacing = 3
OnClick = sSpeedButton22Click
SkinData.SkinSection = 'SPEEDBUTTON_SMALL'
DisabledGlyphKind = []
end
object sSpeedButton23: TsSpeedButton
Left = 71
Top = 117
Width = 31
Height = 20
Cursor = crHandPoint
Caption = '⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -