📄 unit1.dfm
字号:
object Form1: TForm1
Left = 302
Top = 282
Caption = #22810#39033#24335#35745#31639
ClientHeight = 285
ClientWidth = 496
Color = clInfoBk
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Visible = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 24
Top = 16
Width = 84
Height = 13
Caption = #35831#36755#20837#34920#36798#24335' :'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 328
Top = 224
Width = 28
Height = 13
Caption = #32467#26524':'
end
object Label3: TLabel
Left = 328
Top = 250
Width = 48
Height = 26
Caption = #36719#20214'5'#29677' '#21253#21253#21046#20316
WordWrap = True
end
object Edit1: TEdit
Left = 112
Top = 8
Width = 369
Height = 19
Color = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clPurple
Font.Height = -11
Font.Name = #38582#20070
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnKeyPress = Edit1KeyPress
end
object Button1: TButton
Left = 408
Top = 48
Width = 65
Height = 25
Caption = #24320#22987#35745#31639
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 328
Top = 48
Width = 65
Height = 25
Caption = #26597#30475#22534#26632
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button2Click
end
object ListBox1: TListBox
Left = 32
Top = 48
Width = 289
Height = 233
Color = clYellow
Font.Charset = GB2312_CHARSET
Font.Color = clFuchsia
Font.Height = -12
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ItemHeight = 12
ParentFont = False
TabOrder = 3
end
object memo1: TMemo
Left = 320
Top = 80
Width = 169
Height = 137
Color = clHotLight
Enabled = False
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
Lines.Strings = (
#25105#30340#31243#24207#23454#29616#22810#39033#24335#30340
#35745#31639','#21487#20197#23454#29616'+ - * / '
' %('#20313#25968')^('#20056#26041')'#20889
#26102#35831#27880#24847#25805#20316#25968#20026#25972#25968
','#36824#35201#25324#21495#35201#21305#37197#21704'.'#28857
'"'#24320#22987#35745#31639'"'#30452#25509#30475#32467#26524','
#28857'"'#26597#30475#22534#26632'"'#21487#20197#30475#21040
#31243#24207#30340#25191#34892#27493#39588#21644#22534#26632
#24773#20917','#35874#35874'!')
ParentFont = False
ReadOnly = True
TabOrder = 4
end
object Button3: TButton
Left = 400
Top = 248
Width = 81
Height = 25
Caption = #36864#20986
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = Button3Click
end
object Edit2: TEdit
Left = 368
Top = 224
Width = 57
Height = 22
Color = clActiveCaption
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
object Timer1: TTimer
OnTimer = Timer1Timer
Left = 448
Top = 216
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -