📄 unit1.dfm
字号:
object Form1: TForm1
Left = 129
Top = 0
Width = 701
Height = 719
Align = alLeft
Caption = 'Form1'
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -7
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 7
object Label1: TLabel
Left = 536
Top = 219
Width = 84
Height = 21
Caption = #28304#31243#24207#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
end
object ButtonRun: TButton
Left = 574
Top = 421
Width = 73
Height = 27
Caption = 'RUN'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'Times New Roman MT Extra Bold'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = ButtonRunClick
end
object Memo1: TMemo
Left = 9
Top = 5
Width = 512
Height = 668
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'Courier New'
Font.Style = [fsBold]
ImeName = #32043#20809#25340#38899#36755#20837#27861
Lines.Strings = (
'***** PL/0 Compiler Demo *****')
ParentFont = False
ScrollBars = ssBoth
TabOrder = 1
end
object EditName: TEdit
Left = 536
Top = 241
Width = 85
Height = 31
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'Courier New'
Font.Style = [fsBold]
ImeName = #32043#20809#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 2
end
object ListSwitch: TRadioGroup
Left = 555
Top = 306
Width = 94
Height = 88
Caption = #30446#26631#20195#30721
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #40657#20307
Font.Style = []
ItemIndex = 0
Items.Strings = (
#26174#31034
#19981#26174#31034)
ParentFont = False
TabOrder = 3
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -