object frmSub: TfrmSub Left = 447 Top = 304 Width = 558 Height = 341 HelpContext = 81 Color = clBtnFace Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = '�l�r �o�S�V�b�N' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False OnClose = FormClose OnResize = edtSubResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object edtSub: TEditor Left = 0 Top = 0 Width = 550 Height = 276 Cursor = crIBeam Align = alClient Caret.AutoCursor = True Caret.AutoIndent = True Caret.BackSpaceUnIndent = True Caret.Cursors.DefaultCursor = crIBeam Caret.Cursors.DragSelCursor = 2 Caret.Cursors.DragSelCopyCursor = 2 Caret.Cursors.InSelCursor = 1 Caret.Cursors.LeftMarginCursor = 4 Caret.FreeCaret = True Caret.InTab = False Caret.KeepCaret = False Caret.LockScroll = False Caret.NextLine = False Caret.PrevSpaceIndent = False Caret.RowSelect = True Caret.SelDragMode = dmAutomatic Caret.SelMove = False Caret.SoftTab = False Caret.Style = csDefault Caret.TabIndent = False Caret.TabSpaceCount = 8 Font.Charset = SHIFTJIS_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'FixedSys' Font.Style = [] Marks.EofMark.Color = clGray Marks.EofMark.Visible = False Marks.RetMark.Color = clGray Marks.RetMark.Visible = False Marks.Underline.Color = clGray Marks.Underline.Visible = False Margin.Character = 0 Margin.Left = 19 Margin.Line = 0 Margin.Top = 2 Leftbar.BkColor = clBtnFace Leftbar.Color = clWindowText Leftbar.Column = 4 Leftbar.Edge = True Leftbar.LeftMargin = 8 Leftbar.RightMargin = 4 Leftbar.ShowNumber = True Leftbar.ShowNumberMode = nmRow Leftbar.Visible = False Leftbar.ZeroBase = False Leftbar.ZeroLead = False ParentColor = False ParentFont = False PopupMenu = PopupMenu1 ReadOnly = True Ruler.BkColor = clBtnFace Ruler.Color = clWindowText Ruler.Edge = True Ruler.GaugeRange = 10 Ruler.MarkColor = clWindowText Ruler.Visible = False ScrollBars = ssNone TabOrder = 0 UndoListMax = 64 View.Brackets = <> View.Colors.Ank.BkColor = clWindow View.Colors.Ank.Color = clWindowText View.Colors.Ank.Style = [] View.Colors.Comment.BkColor = clWindow View.Colors.Comment.Color = clWindowText View.Colors.Comment.Style = [] View.Colors.DBCS.BkColor = clWindow View.Colors.DBCS.Color = clWindowText View.Colors.DBCS.Style = [] View.Colors.Int.BkColor = clWindow View.Colors.Int.Color = clWindowText View.Colors.Int.Style = [] View.Colors.Mail.BkColor = clWindow View.Colors.Mail.Color = clWindowText View.Colors.Mail.Style = [] View.Colors.Reserve.BkColor = clWindow View.Colors.Reserve.Color = clWindowText View.Colors.Reserve.Style = [] View.Colors.Select.BkColor = clNavy View.Colors.Select.Color = clWhite View.Colors.Select.Style = [] View.Colors.Str.BkColor = clWindow View.Colors.Str.Color = clWindowText View.Colors.Str.Style = [] View.Colors.Symbol.BkColor = clWindow View.Colors.Symbol.Color = clWindowText View.Colors.Symbol.Style = [] View.Colors.Url.BkColor = clWindow View.Colors.Url.Color = clWindowText View.Colors.Url.Style = [] View.ControlCode = False View.Mail = False View.Url = False WantReturns = True WantTabs = True WordWrap = False WrapOption.FollowRetMark = False WrapOption.FollowPunctuation = False WrapOption.FollowStr = '�A�B�C�D�E�H�I�J�K�R�S�T�U�X�[�j�n�p�v�x!),.:;?]}�������' WrapOption.Leading = False WrapOption.LeadStr = '�i�m�o�u�w([{�' WrapOption.PunctuationStr = '�A�B�C�D,.��' WrapOption.WordBreak = False WrapOption.WrapByte = 80 OnCaretMoved = edtSubCaretMoved OnDblClick = edtSubDblClick OnMouseUp = edtSubMouseUp OnResize = edtSubResize OnSelectionChange = edtSubSelectionChange end object stBar2: TStatusBar Left = 0 Top = 276 Width = 550 Height = 19 Panels = < item Width = 80 end item Width = 50 end> SimplePanel = False end object MainMenu1: TMainMenu Left = 464 Top = 88 object File1: TMenuItem Caption = '�t�@�C��(&F)' object FileOpn2: TMenuItem Caption = '�t�@�C�����J��(&O)' OnClick = FileOpn2Click end object Close1: TMenuItem Caption = '�‚���(&X)' OnClick = Close1Click end end object Edit1: TMenuItem Caption = '�ҏW(&E)' object txtCopy: TMenuItem Caption = '�R�s�[(&C)' Enabled = False OnClick = txtCopyClick end object txtAddCopy: TMenuItem Caption = '�lj��R�s�[(&A)' Enabled = False OnClick = txtAddCopyClick end object N3: TMenuItem Caption = '-' end object txtPaste: TMenuItem Caption = '�I��͈͂�ҏW�ʒu�ɓ\��t��(&P)' Enabled = False OnClick = txtPasteClick end end end object PopupMenu1: TPopupMenu Left = 432 Top = 88 object popCopy: TMenuItem Caption = '�R�s�[(&C)' Enabled = False OnClick = txtCopyClick end object popAdd: TMenuItem Caption = '�lj��R�s�[(&A)' Enabled = False OnClick = txtAddCopyClick end object N1: TMenuItem Caption = '-' end object popPaste: TMenuItem Caption = '�I��͈͂�ҏW�ʒu�ɓ\��t��(&P)' Enabled = False OnClick = txtPasteClick end end end