📄 unit1.dfm
字号:
object Form2: TForm2
Left = 199
Top = 138
Caption = 'RichEdit Demo'
ClientHeight = 582
ClientWidth = 587
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 587
Height = 339
Align = alClient
TabOrder = 0
object EmbeddedWB1: TEmbeddedWB
Left = 1
Top = 1
Width = 585
Height = 318
Align = alClient
TabOrder = 0
OnStatusTextChange = EmbeddedWB1StatusTextChange
OnCommandStateChange = EmbeddedWB1CommandStateChange
DisableCtrlShortcuts = 'N'
UserInterfaceOptions = [EnableThemes]
About = ' EmbeddedWB http://bsalsa.com/'
PrintOptions.Margins.Left = 19.050000000000000000
PrintOptions.Margins.Right = 19.050000000000000000
PrintOptions.Margins.Top = 19.050000000000000000
PrintOptions.Margins.Bottom = 19.050000000000000000
PrintOptions.Header = '&w&bSeite &p von &P'
PrintOptions.HTMLHeader.Strings = (
'<HTML></HTML>')
PrintOptions.Footer = '&u&b&d'
PrintOptions.Orientation = poPortrait
UserAgent = 'EmbeddedWB 14.52 from: http://www.bsalsa.com/'
VisualEffects.TextSize = 0
ControlData = {
4C000000B43A0000B21E00000000000000000000000000000000000000000000
000000004C000000000000000000000001000000E0D057007335CF11AE690800
2B2E126208000000000000004C0000000114020000000000C000000000000046
8000000000000000000000000000000000000000000000000000000000000000
00000000000000000100000000000000000000000000000000000000}
end
object StatusBar2: TStatusBar
Left = 1
Top = 319
Width = 585
Height = 19
Panels = <
item
Width = 400
end
item
Width = 70
end
item
Width = 50
end>
end
end
object Panel2: TPanel
Left = 0
Top = 339
Width = 587
Height = 224
Align = alBottom
TabOrder = 1
object RichEditWB1: TRichEditWB
Left = 1
Top = 1
Width = 585
Height = 222
Hint =
'File Name: Untitled. | '#10#13'Position: Line: 1 Col: 1. | '#10#13'Mod' +
'ified. | '#10#13'Caps Lock: Off. | '#10#13'NumLock: On. | '#10#13'Insert: On. | '#10#13 +
'Total Lines Count: 0. |'
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
ParentShowHint = False
ScrollBars = ssBoth
ShowHint = True
TabOrder = 0
WordWrap = False
AutoNavigate = True
EmbeddedWB = EmbeddedWB1
FileName = 'Untitled'
HighlightHTML = True
HighlightURL = True
HighlightXML = True
RTFText =
#23675#29810#12646#24924#29550#23657#25956#26214#31536#26204#28271#29812#27746#23675#12390#26204#26990#23660#25446#24936#29554#29797#8240#24916#28520#24941#32059#3453#31498#25436#27759#29295#25204#8300#23611#25970#12388#26460#25970#28261#23600#27746#25973#15152#3453#23562#26998#30565#26987#25710#23604#25461#23601#24944#25714#25436#12646#27740#28257#12903#13616#23605#12390#26204 +
#12659#23606#24944#3442#32010#2573#12288#29232#10076#12336#23668#12327#26160#10076#12336#23601#12327#23600#23644#12327#26160#10076#12336#23650#12327#26928#10076#12336#23652#12327#26928#10076#12336#23667#12327#23600#23644#12327#24880#10076#12336#23662#12327#29488#10076#12336#23657#12327#23600#23644#12327#25648#10076#12336#23653#12327#26160#10076#12336#23654#12327#12336#10076#12336 +
#31580#10076#12336#23644#10076#12336#23654#12327#28464#10076#12336#23662#12327#29744#10076#12336#23668#12327#25136#10076#12336#23660#12327#23600#23675#12327#23600#23644#12327#26160#10076#12336#23600#12327#23600#23644#12327#26160#10076#12336#23662#12327#26928#10076#12336#23660#12327#8240#10076#12336#23636#12327#24880#10076#12336#23656#12327#28464#10076#12336#23661#12327#24880#10076 +
#12336#23611#12327#23600#23677#12327#23600#23677#12327#23600#24944#3442#23562#12327#23600#24944#3442#23562#12327#23600#23675#12327#23600#23644#12327#25392#10076#12336#23663#12327#27696#10076#12336#23663#12327#29232#10076#12336#23668#12327#25136#10076#12336#23660#12327#8240#10076#12336#23611#12327#23600#23644#12327#29232#10076#12336#23653#12327#25648#10076#304#128#240
Statusbar = StatusBar1
SupprtMoreThen64KB = False
TextAlignment = taLeftJustify
HideCaret = False
Themes = tDefault
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 563
Width = 587
Height = 19
Panels = <
item
Text =
'File Name: Untitled. | '#10#13'Position: Line: 1 Col: 1. | '#10#13'Mod' +
'ified. | '#10#13'Caps Lock: Off. | '#10#13'NumLock: On. | '#10#13'Insert: Off. | '#10 +
#13'Total Lines Count: 1. |'
Width = 2000
end
item
Width = 50
end
item
Width = 50
end
item
Width = 50
end
item
Width = 50
end
item
Width = 50
end
item
Width = 50
end
item
Width = 50
end
item
Width = 50
end>
end
object MainMenu1: TMainMenu
Left = 56
Top = 208
object File1: TMenuItem
Caption = 'File'
object New1: TMenuItem
Caption = 'New'
OnClick = New1Click
end
object Open3: TMenuItem
Caption = 'Open'
OnClick = Open3Click
end
object Save1: TMenuItem
Caption = 'Save'
OnClick = Save1Click
end
object SaveAs2: TMenuItem
Caption = 'Save As..'
OnClick = SaveAs2Click
end
object N20: TMenuItem
Caption = '-'
end
object Print2: TMenuItem
Caption = 'Print'
OnClick = Print2Click
end
object N1: TMenuItem
Caption = '-'
end
object Exit1: TMenuItem
Caption = 'Exit'
OnClick = Exit1Click
end
end
object Edit1: TMenuItem
Caption = 'Edit'
object Find1: TMenuItem
Caption = 'Find'
OnClick = Find1Click
end
object Replace1: TMenuItem
Caption = 'Replace'
OnClick = Replace1Click
end
object GoToLineNumber1: TMenuItem
Caption = 'Go To Line Number..'
OnClick = GoToLineNumber1Click
end
object SetSelectionAsAHyperLink1: TMenuItem
Caption = 'Set Selection As A HyperLink'
OnClick = SetSelectionAsAHyperLink1Click
end
object SetWordAsAHyperLink1: TMenuItem
Caption = 'Set Word As A HyperLink'
OnClick = SetWordAsAHyperLink1Click
end
object WrapLongLines1: TMenuItem
Caption = 'Wrap Long Lines'
Checked = True
end
end
object Fonts1: TMenuItem
Caption = 'Fonts'
object SelectFonts1: TMenuItem
Caption = 'Set Fonts'
OnClick = SelectFonts1Click
end
object SetFontColor1: TMenuItem
Caption = 'Set Font Color'
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -