comment ********************************************************************

  TEditor version 2.36

  start  1998/07/05
  update 2001/10/19

  Copyright (c) 1998,2001 {cF <katsuhiko.honda@nifty.ne.jp>

  --------------------------------------------------------------------
  key words B-)
  $VScrollMax ......... cXN[̏ɂ
  $OriginBase ......... Leftbar, Ruler ̌镔ɂ
  $DotUnderline ....... fsUnderline _jŕ`悵Ȃꍇɂ

  comments
  #MaxLineCharacter ... PCOOOɂ
  #ScreenStrings ...... ̍XVAundo, redo, ĕ`̎dg
  #UndoObj ............ TEditorUndoObj IuWFNg̓ɂ
  #IME ................ SetImeComposition IME EBhD̈ړɂ
  #Scroll ............. ScrollWindowEx ɂ
  #Caret .............. `ƃLbgɂ
  #Leftbar, #Ruler .... Leftbar, Ruler prbg}bvɂ
  #Drawing ............ `ɂ
  #Selection .......... Ï̏ɂ
  #SelectionMove ...... Ï̈ړɂ
  #WM_IME_COMOISITION . IME 擾ɂ
  #RowMarks ........... Imagebar ɕ\ RowMarks ̈ɂ
  #HitSelLength ....... v̕`ɂ
  #HScroll ............ XN[{^ɂ鉡XN[
  --------------------------------------------------------------------

*********************************************************************
nil
check unit unit
"unit"
check HEditor ident
"HEditor"
### portability_directive
";"
check ; ;
";"
check interface interface
"interface"
check uses uses
"uses"
check Windows ident
"Windows"
","
check Messages ident
"Messages"
","
check SysUtils ident
"SysUtils"
","
check Classes ident
"Classes"
","
check Graphics ident
"Graphics"
","
check Controls ident
"Controls"
","
check Forms ident
"Forms"
","
check StdCtrls ident
"StdCtrls"
","
check Imm ident
"Imm"
","
check Clipbrd ident
"Clipbrd"
","
check Menus ident
"Menus"
","
check heClasses ident
"heClasses"
","
check heFountain ident
"heFountain"
","
check heRaStrings ident
"heRaStrings"
","
check EditorFountain ident
"EditorFountain"
","
check htSearch ident
"htSearch"
";"
check const const
comment  TEditor consts 
"const"
check DefaultCaretWidth ident
"DefaultCaretWidth"
### @t.check = in const_decl
check = =
"="
check 2 ident
"2"
### portability_directive
";"
";"
check BriefCaretHeight ident
"BriefCaretHeight"
### @t.check = in const_decl
check = =
"="
check 2 ident
"2"
### portability_directive
";"
";"
check MaxLineCharacter ident
"MaxLineCharacter"
### @t.check = in const_decl
check = =
"="
check 1000 ident
"1000"
### portability_directive
";"
";"
check MarginLimit ident
"MarginLimit"
### @t.check = in const_decl
check = =
"="
check 100 ident
"100"
### portability_directive
";"
";"
check UndoListMin ident
"UndoListMin"
### @t.check = in const_decl
check = =
"="
check 64 ident
"64"
### portability_directive
";"
";"
check MaxWrapByte ident
"MaxWrapByte"
### @t.check = in const_decl
check = =
"="
check 250 ident
"250"
### portability_directive
";"
";"
check MinWrapByte ident
"MinWrapByte"
### @t.check = in const_decl
check = =
"="
check 20 ident
"20"
### portability_directive
comment  TEditorAttributeArray special attributes 
";"
";"
check caEof ident
"caEof"
### @t.check = in const_decl
check = =
"="
### string #
"#"
### string $30
"$30"
### portability_directive
comment '0'
";"
";"
check caAnk ident
"caAnk"
### @t.check = in const_decl
check = =
"="
### string #
"#"
### string $31
"$31"
### portability_directive
comment '1'
";"
";"
check caDelimiter ident
"caDelimiter"
### @t.check = in const_decl
check = =
"="
### string #
"#"
### string $32
"$32"
### portability_directive
comment '2'
";"
";"
check caTabSpace ident
"caTabSpace"
### @t.check = in const_decl
check = =
"="
### string #
"#"
### string $33
"$33"
### portability_directive
comment '3'
";"
";"
check caDBCS1 ident
"caDBCS1"
### @t.check = in const_decl
check = =
"="
### string #
"#"
### string $34
"$34"
### portability_directive
comment '4'
";"
";"
check caDBCS2 ident
"caDBCS2"
### @t.check = in const_decl
check = =
"="
### string #
"#"
### string $35
"$35"
### portability_directive
comment '5'
";"
";"
check type ident
check type type
"type"
check TEditorCursors ident
"TEditorCursors"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FDefaultCursor ident
"FDefaultCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
";"
";"
check FDragSelCursor ident
"FDragSelCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
";"
";"
check FDragSelCopyCursor ident
"FDragSelCopyCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
";"
";"
check FInSelCursor ident
"FInSelCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
";"
";"
check FLeftMarginCursor ident
"FLeftMarginCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
";"
";"
check FTopMarginCursor ident
"FTopMarginCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
";"
";"
check public ident
"public"
check constructor :
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check DefaultCursor ident
"DefaultCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
"read"
### type_ident
check FDefaultCursor ident
"FDefaultCursor"
"write"
### type_ident
check FDefaultCursor ident
"FDefaultCursor"
";"
";"
### prop_list
check property property
"property"
check DragSelCursor ident
"DragSelCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
"read"
### type_ident
check FDragSelCursor ident
"FDragSelCursor"
"write"
### type_ident
check FDragSelCursor ident
"FDragSelCursor"
";"
";"
### prop_list
check property property
"property"
check DragSelCopyCursor ident
"DragSelCopyCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
"read"
### type_ident
check FDragSelCopyCursor ident
"FDragSelCopyCursor"
"write"
### type_ident
check FDragSelCopyCursor ident
"FDragSelCopyCursor"
";"
";"
### prop_list
check property property
"property"
check InSelCursor ident
"InSelCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
"read"
### type_ident
check FInSelCursor ident
"FInSelCursor"
"write"
### type_ident
check FInSelCursor ident
"FInSelCursor"
";"
";"
### prop_list
check property property
"property"
check LeftMarginCursor ident
"LeftMarginCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
"read"
### type_ident
check FLeftMarginCursor ident
"FLeftMarginCursor"
"write"
### type_ident
check FLeftMarginCursor ident
"FLeftMarginCursor"
";"
";"
### prop_list
check property property
"property"
check TopMarginCursor ident
"TopMarginCursor"
check : :
":"
### normal_type
### ord_type
check TCursor ident
"TCursor"
### portability_directive
"read"
### type_ident
check FTopMarginCursor ident
"FTopMarginCursor"
"write"
### type_ident
check FTopMarginCursor ident
"FTopMarginCursor"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorCaretStyle ident
"TEditorCaretStyle"
check = =
"="
### normal_type
check ( (
"("
check csDefault ident
"csDefault"
","
check csBrief ident
"csBrief"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorCaret ident
"TEditorCaret"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FAutoCursor ident
"FAutoCursor"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FAutoIndent ident
"FAutoIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FBackSpaceUnIndent ident
"FBackSpaceUnIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FCursors ident
"FCursors"
check : :
":"
### normal_type
### ord_type
check TEditorCursors ident
"TEditorCursors"
### portability_directive
";"
";"
check FFreeCaret ident
"FFreeCaret"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FFreeRow ident
"FFreeRow"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FInTab ident
"FInTab"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FKeepCaret ident
"FKeepCaret"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FLockScroll ident
"FLockScroll"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FNextLine ident
"FNextLine"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FPrevSpaceIndent ident
"FPrevSpaceIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FRowSelect ident
"FRowSelect"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FSelDragMode ident
"FSelDragMode"
check : :
":"
### normal_type
### ord_type
check TDragMode ident
"TDragMode"
### portability_directive
";"
";"
check FSelMove ident
"FSelMove"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FSoftTab ident
"FSoftTab"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FStyle ident
"FStyle"
check : :
":"
### normal_type
### ord_type
check TEditorCaretStyle ident
"TEditorCaretStyle"
### portability_directive
";"
";"
check FTabIndent ident
"FTabIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FTabSpaceCount ident
"FTabSpaceCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetStyle ident
"SetStyle"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorCaretStyle ident
"TEditorCaretStyle"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetTabSpaceCount ident
"SetTabSpaceCount"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check destructor destructor
"destructor"
check Destroy ident
"Destroy"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check AutoCursor ident
"AutoCursor"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FAutoCursor ident
"FAutoCursor"
"write"
### type_ident
check FAutoCursor ident
"FAutoCursor"
";"
";"
### prop_list
check property property
"property"
check AutoIndent ident
"AutoIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FAutoIndent ident
"FAutoIndent"
"write"
### type_ident
check FAutoIndent ident
"FAutoIndent"
";"
";"
### prop_list
check property property
"property"
check BackSpaceUnIndent ident
"BackSpaceUnIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FBackSpaceUnIndent ident
"FBackSpaceUnIndent"
"write"
### type_ident
check FBackSpaceUnIndent ident
"FBackSpaceUnIndent"
";"
";"
### prop_list
check property property
"property"
check Cursors ident
"Cursors"
check : :
":"
### normal_type
### ord_type
check TEditorCursors ident
"TEditorCursors"
### portability_directive
"read"
### type_ident
check FCursors ident
"FCursors"
"write"
### type_ident
check FCursors ident
"FCursors"
";"
";"
### prop_list
check property property
"property"
check FreeCaret ident
"FreeCaret"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FFreeCaret ident
"FFreeCaret"
"write"
### type_ident
check FFreeCaret ident
"FFreeCaret"
";"
";"
### prop_list
check property property
"property"
check FreeRow ident
"FreeRow"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FFreeRow ident
"FFreeRow"
"write"
### type_ident
check FFreeRow ident
"FFreeRow"
";"
";"
### prop_list
check property property
"property"
check InTab ident
"InTab"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FInTab ident
"FInTab"
"write"
### type_ident
check FInTab ident
"FInTab"
";"
";"
### prop_list
check property property
"property"
check KeepCaret ident
"KeepCaret"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FKeepCaret ident
"FKeepCaret"
"write"
### type_ident
check FKeepCaret ident
"FKeepCaret"
";"
";"
### prop_list
check property property
"property"
check LockScroll ident
"LockScroll"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FLockScroll ident
"FLockScroll"
"write"
### type_ident
check FLockScroll ident
"FLockScroll"
";"
";"
### prop_list
check property property
"property"
check NextLine ident
"NextLine"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FNextLine ident
"FNextLine"
"write"
### type_ident
check FNextLine ident
"FNextLine"
";"
";"
### prop_list
check property property
"property"
check PrevSpaceIndent ident
"PrevSpaceIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FPrevSpaceIndent ident
"FPrevSpaceIndent"
"write"
### type_ident
check FPrevSpaceIndent ident
"FPrevSpaceIndent"
";"
";"
### prop_list
check property property
"property"
check RowSelect ident
"RowSelect"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FRowSelect ident
"FRowSelect"
"write"
### type_ident
check FRowSelect ident
"FRowSelect"
";"
";"
### prop_list
check property property
"property"
check SelDragMode ident
"SelDragMode"
check : :
":"
### normal_type
### ord_type
check TDragMode ident
"TDragMode"
### portability_directive
"read"
### type_ident
check FSelDragMode ident
"FSelDragMode"
"write"
### type_ident
check FSelDragMode ident
"FSelDragMode"
";"
";"
### prop_list
check property property
"property"
check SelMove ident
"SelMove"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FSelMove ident
"FSelMove"
"write"
### type_ident
check FSelMove ident
"FSelMove"
";"
";"
### prop_list
check property property
"property"
check SoftTab ident
"SoftTab"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FSoftTab ident
"FSoftTab"
"write"
### type_ident
check FSoftTab ident
"FSoftTab"
";"
";"
### prop_list
check property property
"property"
check Style ident
"Style"
check : :
":"
### normal_type
### ord_type
check TEditorCaretStyle ident
"TEditorCaretStyle"
### portability_directive
"read"
### type_ident
check FStyle ident
"FStyle"
"write"
### type_ident
check SetStyle ident
"SetStyle"
";"
";"
### prop_list
check property property
"property"
check TabIndent ident
"TabIndent"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FTabIndent ident
"FTabIndent"
"write"
### type_ident
check FTabIndent ident
"FTabIndent"
";"
";"
### prop_list
check property property
"property"
check TabSpaceCount ident
"TabSpaceCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FTabSpaceCount ident
"FTabSpaceCount"
"write"
### type_ident
check SetTabSpaceCount ident
"SetTabSpaceCount"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorMargin ident
"TEditorMargin"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FCharacter ident
"FCharacter"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FLeft ident
"FLeft"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FLine ident
"FLine"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FTop ident
"FTop"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FUnderline ident
"FUnderline"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetCharacter ident
"SetCharacter"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLeft ident
"SetLeft"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLine ident
"SetLine"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetTop ident
"SetTop"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetUnderline ident
"SetUnderline"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"protected"
### class_prop_list
### prop_list
check property property
"property"
check Underline ident
"Underline"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FUnderline ident
"FUnderline"
"write"
### type_ident
check SetUnderline ident
"SetUnderline"
";"
";"
### prop_list
check public property
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check Character ident
"Character"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FCharacter ident
"FCharacter"
"write"
### type_ident
check SetCharacter ident
"SetCharacter"
";"
";"
### prop_list
check property property
"property"
check Left ident
"Left"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FLeft ident
"FLeft"
"write"
### type_ident
check SetLeft ident
"SetLeft"
";"
";"
### prop_list
check property property
"property"
check Line ident
"Line"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FLine ident
"FLine"
"write"
### type_ident
check SetLine ident
"SetLine"
";"
";"
### prop_list
check property property
"property"
check Top ident
"Top"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FTop ident
"FTop"
"write"
### type_ident
check SetTop ident
"SetTop"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorMark ident
"TEditorMark"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FColor ident
"FColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
";"
";"
check FVisible ident
"FVisible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetColor ident
"SetColor"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetVisible ident
"SetVisible"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check Color ident
"Color"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
"read"
### type_ident
check FColor ident
"FColor"
"write"
### type_ident
check SetColor ident
"SetColor"
";"
";"
### prop_list
check property property
"property"
check Visible ident
"Visible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FVisible ident
"FVisible"
"write"
### type_ident
check SetVisible ident
"SetVisible"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorMarks ident
"TEditorMarks"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FEofMark ident
"FEofMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
";"
";"
check FRetMark ident
"FRetMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
";"
";"
check FWrapMark ident
"FWrapMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
";"
";"
check FHideMark ident
"FHideMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
";"
";"
check FUnderline ident
"FUnderline"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetEofMark ident
"SetEofMark"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetRetMark ident
"SetRetMark"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetWrapMark ident
"SetWrapMark"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetHideMark ident
"SetHideMark"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetUnderline ident
"SetUnderline"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check destructor destructor
"destructor"
check Destroy ident
"Destroy"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check EofMark ident
"EofMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
"read"
### type_ident
check FEofMark ident
"FEofMark"
"write"
### type_ident
check SetEofMark ident
"SetEofMark"
";"
";"
### prop_list
check property property
"property"
check RetMark ident
"RetMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
"read"
### type_ident
check FRetMark ident
"FRetMark"
"write"
### type_ident
check SetRetMark ident
"SetRetMark"
";"
";"
### prop_list
check property property
"property"
check WrapMark ident
"WrapMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
"read"
### type_ident
check FWrapMark ident
"FWrapMark"
"write"
### type_ident
check SetWrapMark ident
"SetWrapMark"
";"
";"
### prop_list
check property property
"property"
check HideMark ident
"HideMark"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
"read"
### type_ident
check FHideMark ident
"FHideMark"
"write"
### type_ident
check SetHideMark ident
"SetHideMark"
";"
";"
### prop_list
check property property
"property"
check Underline ident
"Underline"
check : :
":"
### normal_type
### ord_type
check TEditorMark ident
"TEditorMark"
### portability_directive
"read"
### type_ident
check FUnderline ident
"FUnderline"
"write"
### type_ident
check SetUnderline ident
"SetUnderline"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorViewInfo ident
"TEditorViewInfo"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FEditorFountain ident
"FEditorFountain"
check : :
":"
### normal_type
### ord_type
check TEditorFountain ident
"TEditorFountain"
### portability_directive
";"
";"
check function ident
### class_method_list
### method_list
### method_header
check function function
"function"
check GetBrackets ident
"GetBrackets"
check : :
":"
### normal_type
### ord_type
check TEditorBracketCollection ident
"TEditorBracketCollection"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetColors ident
"GetColors"
check : :
":"
### normal_type
### ord_type
check TEditorColors ident
"TEditorColors"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetCommenter ident
"GetCommenter"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetControlCode ident
"GetControlCode"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetHexPrefix ident
"GetHexPrefix"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetMail ident
"GetMail"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetQuotation ident
"GetQuotation"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetUrl ident
"GetUrl"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetBrackets ident
"SetBrackets"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorBracketCollection ident
"TEditorBracketCollection"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetColors ident
"SetColors"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorColors ident
"TEditorColors"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetCommenter ident
"SetCommenter"
check ( (
"("
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetControlCode ident
"SetControlCode"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetHexPrefix ident
"SetHexPrefix"
check ( (
"("
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetMail ident
"SetMail"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetQuotation ident
"SetQuotation"
check ( (
"("
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetUrl ident
"SetUrl"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"protected"
### class_field_list
### obj_field_list
check FComponent ident
"FComponent"
check : :
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
";"
";"
check function ident
### class_method_list
### method_list
### method_header
check function function
"function"
check CreateEditorFountain ident
"CreateEditorFountain"
check : :
":"
### normal_type
### ord_type
check TEditorFountain ident
"TEditorFountain"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetOwner ident
"GetOwner"
check : :
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check destructor destructor
"destructor"
check Destroy ident
"Destroy"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
### class_prop_list
### prop_list
check property property
"property"
check EditorFountain ident
"EditorFountain"
check : :
":"
### normal_type
### ord_type
check TEditorFountain ident
"TEditorFountain"
### portability_directive
"read"
### type_ident
check FEditorFountain ident
"FEditorFountain"
";"
";"
### prop_list
check published property
"published"
### class_prop_list
### prop_list
check property property
"property"
check Brackets ident
"Brackets"
check : :
":"
### normal_type
### ord_type
check TEditorBracketCollection ident
"TEditorBracketCollection"
### portability_directive
"read"
### type_ident
check GetBrackets ident
"GetBrackets"
"write"
### type_ident
check SetBrackets ident
"SetBrackets"
";"
";"
### prop_list
check property property
"property"
check Colors ident
"Colors"
check : :
":"
### normal_type
### ord_type
check TEditorColors ident
"TEditorColors"
### portability_directive
"read"
### type_ident
check GetColors ident
"GetColors"
"write"
### type_ident
check SetColors ident
"SetColors"
";"
";"
### prop_list
check property property
"property"
check Commenter ident
"Commenter"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check GetCommenter ident
"GetCommenter"
"write"
### type_ident
check SetCommenter ident
"SetCommenter"
";"
";"
### prop_list
check property property
"property"
check ControlCode ident
"ControlCode"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetControlCode ident
"GetControlCode"
"write"
### type_ident
check SetControlCode ident
"SetControlCode"
";"
";"
### prop_list
check property property
"property"
check HexPrefix ident
"HexPrefix"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check GetHexPrefix ident
"GetHexPrefix"
"write"
### type_ident
check SetHexPrefix ident
"SetHexPrefix"
";"
";"
### prop_list
check property property
"property"
check Mail ident
"Mail"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetMail ident
"GetMail"
"write"
### type_ident
check SetMail ident
"SetMail"
";"
";"
### prop_list
check property property
"property"
check Quotation ident
"Quotation"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check GetQuotation ident
"GetQuotation"
"write"
### type_ident
check SetQuotation ident
"SetQuotation"
";"
";"
### prop_list
check property property
"property"
check Url ident
"Url"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetUrl ident
"GetUrl"
"write"
### type_ident
check SetUrl ident
"SetUrl"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorRuler ident
"TEditorRuler"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FBkColor ident
"FBkColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
";"
";"
check FColor ident
"FColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
";"
";"
check FEdge ident
"FEdge"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FGaugeRange ident
"FGaugeRange"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FMarkColor ident
"FMarkColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
";"
";"
check FVisible ident
"FVisible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetBkColor ident
"SetBkColor"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetColor ident
"SetColor"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetEdge ident
"SetEdge"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetGaugeRange ident
"SetGaugeRange"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetMarkColor ident
"SetMarkColor"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetVisible ident
"SetVisible"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check BkColor ident
"BkColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
"read"
### type_ident
check FBkColor ident
"FBkColor"
"write"
### type_ident
check SetBkColor ident
"SetBkColor"
";"
";"
### prop_list
check property property
"property"
check Color ident
"Color"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
"read"
### type_ident
check FColor ident
"FColor"
"write"
### type_ident
check SetColor ident
"SetColor"
";"
";"
### prop_list
check property property
"property"
check Edge ident
"Edge"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FEdge ident
"FEdge"
"write"
### type_ident
check SetEdge ident
"SetEdge"
";"
";"
### prop_list
check property property
"property"
check GaugeRange ident
"GaugeRange"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FGaugeRange ident
"FGaugeRange"
"write"
### type_ident
check SetGaugeRange ident
"SetGaugeRange"
";"
";"
### prop_list
check property property
"property"
check MarkColor ident
"MarkColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
"read"
### type_ident
check FMarkColor ident
"FMarkColor"
"write"
### type_ident
check SetMarkColor ident
"SetMarkColor"
";"
";"
### prop_list
check property property
"property"
check Visible ident
"Visible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FVisible ident
"FVisible"
"write"
### type_ident
check SetVisible ident
"SetVisible"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorShowNumberMode ident
"TEditorShowNumberMode"
check = =
"="
### normal_type
check ( (
"("
check nmRow ident
"nmRow"
","
check nmLine ident
"nmLine"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorLeftbar ident
"TEditorLeftbar"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FBkColor ident
"FBkColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
";"
";"
check FColor ident
"FColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
";"
";"
check FColumn ident
"FColumn"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FEdge ident
"FEdge"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FLeftMargin ident
"FLeftMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRightMargin ident
"FRightMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FShowNumber ident
"FShowNumber"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FShowNumberMode ident
"FShowNumberMode"
check : :
":"
### normal_type
### ord_type
check TEditorShowNumberMode ident
"TEditorShowNumberMode"
### portability_directive
";"
";"
check FVisible ident
"FVisible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FZeroBase ident
"FZeroBase"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FZeroLead ident
"FZeroLead"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetBkColor ident
"SetBkColor"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetColor ident
"SetColor"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetColumn ident
"SetColumn"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetEdge ident
"SetEdge"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLeftMargin ident
"SetLeftMargin"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetRightMargin ident
"SetRightMargin"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetShowNumber ident
"SetShowNumber"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetShowNumberMode ident
"SetShowNumberMode"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorShowNumberMode ident
"TEditorShowNumberMode"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetVisible ident
"SetVisible"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetZeroBase ident
"SetZeroBase"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetZeroLead ident
"SetZeroLead"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check BkColor ident
"BkColor"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
"read"
### type_ident
check FBkColor ident
"FBkColor"
"write"
### type_ident
check SetBkColor ident
"SetBkColor"
";"
";"
### prop_list
check property property
"property"
check Color ident
"Color"
check : :
":"
### normal_type
### ord_type
check TColor ident
"TColor"
### portability_directive
"read"
### type_ident
check FColor ident
"FColor"
"write"
### type_ident
check SetColor ident
"SetColor"
";"
";"
### prop_list
check property property
"property"
check Column ident
"Column"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FColumn ident
"FColumn"
"write"
### type_ident
check SetColumn ident
"SetColumn"
";"
";"
### prop_list
check property property
"property"
check Edge ident
"Edge"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FEdge ident
"FEdge"
"write"
### type_ident
check SetEdge ident
"SetEdge"
";"
";"
### prop_list
check property property
"property"
check LeftMargin ident
"LeftMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FLeftMargin ident
"FLeftMargin"
"write"
### type_ident
check SetLeftMargin ident
"SetLeftMargin"
";"
";"
### prop_list
check property property
"property"
check RightMargin ident
"RightMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FRightMargin ident
"FRightMargin"
"write"
### type_ident
check SetRightMargin ident
"SetRightMargin"
";"
";"
### prop_list
check property property
"property"
check ShowNumber ident
"ShowNumber"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FShowNumber ident
"FShowNumber"
"write"
### type_ident
check SetShowNumber ident
"SetShowNumber"
";"
";"
### prop_list
check property property
"property"
check ShowNumberMode ident
"ShowNumberMode"
check : :
":"
### normal_type
### ord_type
check TEditorShowNumberMode ident
"TEditorShowNumberMode"
### portability_directive
"read"
### type_ident
check FShowNumberMode ident
"FShowNumberMode"
"write"
### type_ident
check SetShowNumberMode ident
"SetShowNumberMode"
";"
";"
### prop_list
check property property
"property"
check Visible ident
"Visible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FVisible ident
"FVisible"
"write"
### type_ident
check SetVisible ident
"SetVisible"
";"
";"
### prop_list
check property property
"property"
check ZeroBase ident
"ZeroBase"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FZeroBase ident
"FZeroBase"
"write"
### type_ident
check SetZeroBase ident
"SetZeroBase"
";"
";"
### prop_list
check property property
"property"
check ZeroLead ident
"ZeroLead"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FZeroLead ident
"FZeroLead"
"write"
### type_ident
check SetZeroLead ident
"SetZeroLead"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorImagebar ident
"TEditorImagebar"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FDigitWidth ident
"FDigitWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FLeftMargin ident
"FLeftMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FMarkWidth ident
"FMarkWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRightmargin ident
"FRightmargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FVisible ident
"FVisible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetDigitWidth ident
"SetDigitWidth"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLeftMargin ident
"SetLeftMargin"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetMarkWidth ident
"SetMarkWidth"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetRightMargin ident
"SetRightMargin"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetVisible ident
"SetVisible"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check DigitWidth ident
"DigitWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FDigitWidth ident
"FDigitWidth"
"write"
### type_ident
check SetDigitWidth ident
"SetDigitWidth"
";"
";"
### prop_list
check property property
"property"
check LeftMargin ident
"LeftMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FLeftMargin ident
"FLeftMargin"
"write"
### type_ident
check SetLeftMargin ident
"SetLeftMargin"
";"
";"
### prop_list
check property property
"property"
check MarkWidth ident
"MarkWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FMarkWidth ident
"FMarkWidth"
"write"
### type_ident
check SetMarkWidth ident
"SetMarkWidth"
";"
";"
### prop_list
check property property
"property"
check RightMargin ident
"RightMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FRightMargin ident
"FRightMargin"
"write"
### type_ident
check SetRightMargin ident
"SetRightMargin"
";"
";"
### prop_list
check property property
"property"
check Visible ident
"Visible"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FVisible ident
"FVisible"
"write"
### type_ident
check SetVisible ident
"SetVisible"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorSpeedRange ident
"TEditorSpeedRange"
check = =
"="
### normal_type
### ord_type
check 1 ident
"1"
".."
check 4 ident
"4"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorSpeed ident
"TEditorSpeed"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TPersistent ident
"TPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FCaretVerticalAc ident
"FCaretVerticalAc"
check : :
":"
### normal_type
### ord_type
check TEditorSpeedRange ident
"TEditorSpeedRange"
### portability_directive
";"
";"
check FInitBracketsFull ident
"FInitBracketsFull"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FPageVerticalRange ident
"FPageVerticalRange"
check : :
":"
### normal_type
### ord_type
check TEditorSpeedRange ident
"TEditorSpeedRange"
### portability_directive
";"
";"
check FPageVerticalRangeAc ident
"FPageVerticalRangeAc"
check : :
":"
### normal_type
### ord_type
check TEditorSpeedRange ident
"TEditorSpeedRange"
### portability_directive
";"
";"
check public ident
"public"
check constructor :
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check CaretVerticalAc ident
"CaretVerticalAc"
check : :
":"
### normal_type
### ord_type
check TEditorSpeedRange ident
"TEditorSpeedRange"
### portability_directive
"read"
### type_ident
check FCaretVerticalAc ident
"FCaretVerticalAc"
"write"
### type_ident
check FCaretVerticalAc ident
"FCaretVerticalAc"
";"
";"
### prop_list
check property property
"property"
check InitBracketsFull ident
"InitBracketsFull"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FInitBracketsFull ident
"FInitBracketsFull"
"write"
### type_ident
check FInitBracketsFull ident
"FInitBracketsFull"
";"
";"
### prop_list
check property property
"property"
check PageVerticalRange ident
"PageVerticalRange"
check : :
":"
### normal_type
### ord_type
check TEditorSpeedRange ident
"TEditorSpeedRange"
### portability_directive
"read"
### type_ident
check FPageVerticalRange ident
"FPageVerticalRange"
"write"
### type_ident
check FPageVerticalRange ident
"FPageVerticalRange"
";"
";"
### prop_list
check property property
"property"
check PageVerticalRangeAc ident
"PageVerticalRangeAc"
check : :
":"
### normal_type
### ord_type
check TEditorSpeedRange ident
"TEditorSpeedRange"
### portability_directive
"read"
### type_ident
check FPageVerticalRangeAc ident
"FPageVerticalRangeAc"
"write"
### type_ident
check FPageVerticalRangeAc ident
"FPageVerticalRangeAc"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditor ident
"TEditor"
check = =
"="
### normal_type
check class class
"class"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorScreenStrings ident
"TEditorScreenStrings"
check = =
"="
### normal_type
check class class
"class"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorAttributeArray ident
"TEditorAttributeArray"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TObject ident
"TObject"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FAttribute ident
"FAttribute"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
";"
check FAttributes ident
"FAttributes"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
";"
check FPosition ident
"FPosition"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FSource ident
"FSource"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
";"
check FSourcePos ident
"FSourcePos"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check function ident
### class_method_list
### method_list
### method_header
check function function
"function"
check GetSize ident
"GetSize"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetPosition ident
"SetPosition"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
check ( (
"("
"const"
check Source ident
"Source"
","
check Attributes ident
"Attributes"
":"
"String"
check ) )
")"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Next ident
"Next"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check NextPositionString ident
"NextPositionString"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check PositionString ident
"PositionString"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check NewData ident
"NewData"
check ( (
"("
"const"
check Source ident
"Source"
","
check Attributes ident
"Attributes"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Prior ident
"Prior"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
### class_prop_list
### prop_list
check property property
"property"
check Attribute ident
"Attribute"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
"read"
### type_ident
check FAttribute ident
"FAttribute"
";"
";"
### prop_list
check property property
"property"
check Position ident
"Position"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FPosition ident
"FPosition"
"write"
### type_ident
check SetPosition ident
"SetPosition"
";"
";"
### prop_list
check property property
"property"
check SourcePos ident
"SourcePos"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FSourcePos ident
"FSourcePos"
";"
";"
### prop_list
check property property
"property"
check Size ident
"Size"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetSize ident
"GetSize"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorRowAttribute ident
"TEditorRowAttribute"
check = =
"="
### normal_type
### ord_type
check TRowAttribute ident
"TRowAttribute"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorStringList ident
"TEditorStringList"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TRowAttributeStringList ident
"TRowAttributeStringList"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorDrawInfo ident
"TEditorDrawInfo"
check = =
"="
### normal_type
check record record
"record"
### record_field_list
### field_list
check Start ident
"Start"
","
check Delete ident
"Delete"
","
check Insert ident
"Insert"
","
check Invalid ident
"Invalid"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check NeedUpdate ident
"NeedUpdate"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check end ident
check end end
"end"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorUndoObj ident
"TEditorUndoObj"
check = =
"="
### normal_type
check class class
"class"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorWrapOption ident
"TEditorWrapOption"
check = =
"="
### normal_type
check class class
"class"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorScreenStrings ident
"TEditorScreenStrings"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TEditorStringList ident
"TEditorStringList"
check ) )
")"
### class_type protected
"protected"
### class_field_list
### obj_field_list
check FClients ident
"FClients"
check : :
":"
### normal_type
### ord_type
check TList ident
"TList"
### portability_directive
";"
";"
check FDrawInfo ident
"FDrawInfo"
check : :
":"
### normal_type
### ord_type
check TEditorDrawInfo ident
"TEditorDrawInfo"
### portability_directive
";"
";"
check FValidRowMarks ident
"FValidRowMarks"
check : :
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
";"
";"
check FUndoObj ident
"FUndoObj"
check : :
":"
### normal_type
### ord_type
check TEditorUndoObj ident
"TEditorUndoObj"
### portability_directive
";"
";"
check FWordWrap ident
"FWordWrap"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FWrapOption ident
"FWrapOption"
check : :
":"
### normal_type
### ord_type
check TEditorWrapOption ident
"TEditorWrapOption"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check ChangeLink ident
"ChangeLink"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ChangeList ident
"ChangeList"
check ( (
"("
check Index ident
"Index"
","
check DeleteCount ident
"DeleteCount"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check List ident
"List"
":"
### normal_type
### ord_type
check TEditorStringList ident
"TEditorStringList"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CheckCrlf ident
"CheckCrlf"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"var"
check S ident
"S"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ClientsAdjustRow ident
"ClientsAdjustRow"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ClientsCleanSelection ident
"ClientsCleanSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ClientsInitCol ident
"ClientsInitCol"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ClientsInitView ident
"ClientsInitView"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetActiveClient ident
"GetActiveClient"
check : :
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetClient ident
"GetClient"
check : :
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateUndoObj ident
"CreateUndoObj"
check : :
":"
### normal_type
### ord_type
check TEditorUndoObj ident
"TEditorUndoObj"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateWrapOption ident
"CreateWrapOption"
check : :
":"
### normal_type
### ord_type
check TEditorWrapOption ident
"TEditorWrapOption"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check DeleteList ident
"DeleteList"
check ( (
"("
check Index ident
"Index"
","
check DeleteCount ident
"DeleteCount"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitBrackets ident
"InitBrackets"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InsertList ident
"InsertList"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check List ident
"List"
":"
### normal_type
### ord_type
check TEditorStringList ident
"TEditorStringList"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ListInfo ident
"ListInfo"
check ( (
"("
check Index ident
"Index"
","
check TargetCount ident
"TargetCount"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"var"
check S ident
"S"
":"
"String"
";"
"var"
check TakenRowCount ident
"TakenRowCount"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"var"
check RowAttribute ident
"RowAttribute"
":"
### normal_type
### ord_type
check TEditorRowAttribute ident
"TEditorRowAttribute"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Reference ident
"Reference"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Release ident
"Release"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check RowEnd ident
"RowEnd"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check RowStart ident
"RowStart"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetUpdateState ident
"SetUpdateState"
check ( (
"("
check Updating ident
"Updating"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetWordWrap ident
"SetWordWrap"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check StretchLines ident
"StretchLines"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check StrToWrapList ident
"StrToWrapList"
check ( (
"("
"const"
check S ident
"S"
":"
"String"
";"
check List ident
"List"
":"
### normal_type
### ord_type
check TEditorStringList ident
"TEditorStringList"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check UpdateBrackets ident
"UpdateBrackets"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check InvalidateFlag ident
"InvalidateFlag"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UpdateDrawInfo ident
"UpdateDrawInfo"
check ( (
"("
check Index ident
"Index"
","
check DeleteCount ident
"DeleteCount"
","
check InsertCount ident
"InsertCount"
","
check InvalidCount ident
"InvalidCount"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UpdateList ident
"UpdateList"
check ( (
"("
check Index ident
"Index"
","
check DeleteCount ident
"DeleteCount"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"const"
check S ident
"S"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check WrapCount ident
"WrapCount"
check ( (
"("
check S ident
"S"
":"
"String"
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WrapLines ident
"WrapLines"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WrapOptionChanged ident
"WrapOptionChanged"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
### class_prop_list
### prop_list
check property property
"property"
check ActiveClient ident
"ActiveClient"
check : :
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
"read"
### type_ident
check GetActiveClient ident
"GetActiveClient"
";"
";"
### prop_list
check property property
"property"
check Client ident
"Client"
check : :
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
"read"
### type_ident
check GetClient ident
"GetClient"
";"
";"
### prop_list
check property property
"property"
check WordWrap ident
"WordWrap"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FWordWrap ident
"FWordWrap"
"write"
### type_ident
check SetWordWrap ident
"SetWordWrap"
";"
";"
### prop_list
check public property
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check destructor destructor
"destructor"
check Destroy ident
"Destroy"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Clear ident
"Clear"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ExcludeRowMarks ident
"ExcludeRowMarks"
check ( (
"("
check Marks ident
"Marks"
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check IncludeRowMarks ident
"IncludeRowMarks"
check ( (
"("
check Marks ident
"Marks"
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Redo ident
"Redo"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Undo ident
"Undo"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ValidRowMarks ident
"ValidRowMarks"
check : :
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorStrings ident
"TEditorStrings"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TStrings ident
"TStrings"
check ) )
")"
### class_type private
"private"
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check ReadData ident
"ReadData"
check ( (
"("
check Reader ident
"Reader"
":"
### normal_type
### ord_type
check TReader ident
"TReader"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WriteData ident
"WriteData"
check ( (
"("
check Writer ident
"Writer"
":"
### normal_type
### ord_type
check TWriter ident
"TWriter"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"protected"
### class_field_list
### obj_field_list
check FEditor ident
"FEditor"
check : :
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
";"
";"
check FUpdateCount ident
"FUpdateCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check DefineProperties ident
"DefineProperties"
check ( (
"("
check Filer ident
"Filer"
":"
### normal_type
### ord_type
check TFiler ident
"TFiler"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check Get ident
"Get"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetCount ident
"GetCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetTextStr ident
"GetTextStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check LinesToRow ident
"LinesToRow"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Put ident
"Put"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"const"
check S ident
"S"
":"
"String"
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetTextStr ident
"SetTextStr"
check ( (
"("
"const"
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetUpdateState ident
"SetUpdateState"
check ( (
"("
check Updating ident
"Updating"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check function function
"function"
check Add ident
"Add"
check ( (
"("
"const"
check S ident
"S"
":"
"String"
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Clear ident
"Clear"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Delete ident
"Delete"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Insert ident
"Insert"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"const"
check S ident
"S"
":"
"String"
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check LoadFromFile ident
"LoadFromFile"
check ( (
"("
"const"
check FileName ident
"FileName"
":"
"String"
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check PUndoData ident
"PUndoData"
check = =
"="
### normal_type
"^"
check TUndoData ident
"TUndoData"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TUndoData ident
"TUndoData"
check = =
"="
### normal_type
check record record
"record"
### record_field_list
### field_list
check Row ident
"Row"
","
check Col ident
"Col"
","
check DataRow ident
"DataRow"
","
check DeleteCount ident
"DeleteCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check RowAttribute ident
"RowAttribute"
check : :
":"
### normal_type
### ord_type
check TEditorRowAttribute ident
"TEditorRowAttribute"
### portability_directive
";"
";"
check InsertStr ident
"InsertStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
";"
check end ident
check end end
"end"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TUndoDataList ident
"TUndoDataList"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TList ident
"TList"
check ) )
")"
### class_type public
"public"
### class_method_list
### method_list
### method_header
check destructor destructor
"destructor"
check Destroy ident
"Destroy"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Clear ident
"Clear"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Delete ident
"Delete"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorUndoObj ident
"TEditorUndoObj"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TObject ident
"TObject"
check ) )
")"
### class_type protected
"protected"
### class_field_list
### obj_field_list
check FList ident
"FList"
check : :
":"
### normal_type
### ord_type
check TEditorScreenStrings ident
"TEditorScreenStrings"
### portability_directive
";"
";"
check FListMax ident
"FListMax"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRedoing ident
"FRedoing"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FRedoList ident
"FRedoList"
check : :
":"
### normal_type
### ord_type
check TUndoDataList ident
"TUndoDataList"
### portability_directive
";"
";"
check FUndoList ident
"FUndoList"
check : :
":"
### normal_type
### ord_type
check TUndoDataList ident
"TUndoDataList"
### portability_directive
";"
";"
check function ident
### class_method_list
### method_list
### method_header
check function function
"function"
check Add ident
"Add"
check : :
":"
### normal_type
### ord_type
check PUndoData ident
"PUndoData"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CanRedo ident
"CanRedo"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CanUndo ident
"CanUndo"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Redo ident
"Redo"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Undo ident
"Undo"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UndoToRedo ident
"UndoToRedo"
check ( (
"("
check Data ident
"Data"
":"
### normal_type
### ord_type
check PUndoData ident
"PUndoData"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check destructor destructor
"destructor"
check Destroy ident
"Destroy"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Clear ident
"Clear"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorWrapOption ident
"TEditorWrapOption"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TNotifyPersistent ident
"TNotifyPersistent"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FFollowRetMark ident
"FFollowRetMark"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FFollowPunctuation ident
"FFollowPunctuation"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FFollowStr ident
"FFollowStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
";"
check FLeading ident
"FLeading"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FLeadStr ident
"FLeadStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
";"
check FPunctuationStr ident
"FPunctuationStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
";"
check FWordBreak ident
"FWordBreak"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FWrapByte ident
"FWrapByte"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetFollowPunctuation ident
"SetFollowPunctuation"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetFollowRetMark ident
"SetFollowRetMark"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetFollowStr ident
"SetFollowStr"
check ( (
"("
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLeading ident
"SetLeading"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLeadStr ident
"SetLeadStr"
check ( (
"("
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetPunctuationStr ident
"SetPunctuationStr"
check ( (
"("
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetWordBreak ident
"SetWordBreak"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetWrapByte ident
"SetWrapByte"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Assign ident
"Assign"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TPersistent ident
"TPersistent"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
"published"
### class_prop_list
### prop_list
check property property
"property"
check FollowRetMark ident
"FollowRetMark"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FFollowRetMark ident
"FFollowRetMark"
"write"
### type_ident
check SetFollowRetMark ident
"SetFollowRetMark"
";"
";"
### prop_list
check property property
"property"
check FollowPunctuation ident
"FollowPunctuation"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FFollowPunctuation ident
"FFollowPunctuation"
"write"
### type_ident
check SetFollowPunctuation ident
"SetFollowPunctuation"
";"
";"
### prop_list
check property property
"property"
check FollowStr ident
"FollowStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check FFollowStr ident
"FFollowStr"
"write"
### type_ident
check SetFollowStr ident
"SetFollowStr"
";"
";"
### prop_list
check property property
"property"
check Leading ident
"Leading"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FLeading ident
"FLeading"
"write"
### type_ident
check SetLeading ident
"SetLeading"
";"
";"
### prop_list
check property property
"property"
check LeadStr ident
"LeadStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check FLeadStr ident
"FLeadStr"
"write"
### type_ident
check SetLeadStr ident
"SetLeadStr"
";"
";"
### prop_list
check property property
"property"
check PunctuationStr ident
"PunctuationStr"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check FPunctuationStr ident
"FPunctuationStr"
"write"
### type_ident
check SetPunctuationStr ident
"SetPunctuationStr"
";"
";"
### prop_list
check property property
"property"
check WordBreak ident
"WordBreak"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FWordBreak ident
"FWordBreak"
"write"
### type_ident
check SetWordBreak ident
"SetWordBreak"
";"
";"
### prop_list
check property property
"property"
check WrapByte ident
"WrapByte"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FWrapByte ident
"FWrapByte"
"write"
### type_ident
check SetWrapByte ident
"SetWrapByte"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorPopupMenu ident
"TEditorPopupMenu"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TPopupMenu ident
"TPopupMenu"
check ) )
")"
### class_type protected
"protected"
### class_field_list
### obj_field_list
check FEditor ident
"FEditor"
check : :
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
";"
";"
check FSetMark ident
"FSetMark"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FN0 ident
"FN0"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FGotoMark ident
"FGotoMark"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FUndo ident
"FUndo"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FRedo ident
"FRedo"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FN1 ident
"FN1"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FCut ident
"FCut"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FCopy ident
"FCopy"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FPaste ident
"FPaste"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FBoxPaste ident
"FBoxPaste"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FDelete ident
"FDelete"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FN2 ident
"FN2"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FSelAll ident
"FSelAll"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FN3 ident
"FN3"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check FSelMode ident
"FSelMode"
check : :
":"
### normal_type
### ord_type
check TMenuItem ident
"TMenuItem"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check SetMarkClick ident
"SetMarkClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check GotoMarkClick ident
"GotoMarkClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UndoClick ident
"UndoClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check RedoClick ident
"RedoClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CutClick ident
"CutClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CopyClick ident
"CopyClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PasteClick ident
"PasteClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check BoxPasteClick ident
"BoxPasteClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DeleteClick ident
"DeleteClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelAllClick ident
"SelAllClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelModeClick ident
"SelModeClick"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetMenu ident
"SetMenu"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CreateMenuItem ident
"CreateMenuItem"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
check ( (
"("
check AOwner ident
"AOwner"
":"
### normal_type
### ord_type
check TComponent ident
"TComponent"
### portability_directive
check ) )
")"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorScreen ident
"TEditorScreen"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TObject ident
"TObject"
check ) )
")"
### class_type protected
"protected"
### class_field_list
### obj_field_list
check FEditor ident
"FEditor"
check : :
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check Update ident
"Update"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorStrInfo ident
"TEditorStrInfo"
check = =
"="
### normal_type
check record record
"record"
### record_field_list
### field_list
check Line ident
"Line"
","
check CharIndex ident
"CharIndex"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check end ident
check end end
"end"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TSelectedPosition ident
"TSelectedPosition"
check = =
"="
### normal_type
check record record
"record"
### record_field_list
### field_list
check Sr ident
"Sr"
","
check Er ident
"Er"
","
check Sc ident
"Sc"
","
check Ec ident
"Ec"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check end ident
check end end
"end"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorHitStyle ident
"TEditorHitStyle"
check = =
"="
### normal_type
check ( (
"("
check hsSelect ident
"hsSelect"
","
check hsDraw ident
"hsDraw"
","
check hsCaret ident
"hsCaret"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorSelectionState ident
"TEditorSelectionState"
check = =
"="
### normal_type
check ( (
"("
check sstNone ident
"sstNone"
","
check sstInit ident
"sstInit"
","
check sstSelected ident
"sstSelected"
","
check sstHitSelected ident
"sstHitSelected"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorSelectionMode ident
"TEditorSelectionMode"
check = =
"="
### normal_type
check ( (
"("
check smLine ident
"smLine"
","
check smBox ident
"smBox"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorSelDragState ident
"TEditorSelDragState"
check = =
"="
### normal_type
check ( (
"("
check sdNone ident
"sdNone"
","
check sdInit ident
"sdInit"
","
check sdDragging ident
"sdDragging"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditorMouseCursorState ident
"TEditorMouseCursorState"
check = =
"="
### normal_type
check ( (
"("
check mcClient ident
"mcClient"
","
check mcLeftMargin ident
"mcLeftMargin"
","
check mcTopMargin ident
"mcTopMargin"
","
check mcInSel ident
"mcInSel"
","
check mcDragging ident
"mcDragging"
","
check mcDraggingCopy ident
"mcDraggingCopy"
check ) )
")"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TDrawLineEvent ident
"TDrawLineEvent"
check = =
"="
### normal_type
### proc_type
check procedure procedure
"procedure"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
";"
";"
check LineStr ident
"LineStr"
":"
"String"
";"
check X ident
"X"
","
check Y ident
"Y"
","
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check ARect ident
"ARect"
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
";"
";"
check Selected ident
"Selected"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
"of"
check Object object
"Object"
### directive
";"
### portability_directive
";"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TSelectionChangeEvent ident
"TSelectionChangeEvent"
check = =
"="
### normal_type
### proc_type
check procedure procedure
"procedure"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
";"
";"
check Selected ident
"Selected"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
"of"
check Object object
"Object"
### directive
";"
### portability_directive
";"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check TEditor ident
"TEditor"
check = =
"="
### normal_type
check class class
"class"
check ( (
"("
check TCustomControl ident
"TCustomControl"
check ) )
")"
### class_type private
"private"
### class_field_list
### obj_field_list
check FBorderStyle ident
"FBorderStyle"
check : :
":"
### normal_type
### ord_type
check TBorderStyle ident
"TBorderStyle"
### portability_directive
";"
";"
check FCaret ident
"FCaret"
check : :
":"
### normal_type
### ord_type
check TEditorCaret ident
"TEditorCaret"
### portability_directive
";"
";"
check FCol ident
"FCol"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FColCount ident
"FColCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FFontWidth ident
"FFontWidth"
check : :
":"
### normal_type
### ord_type
check integer ident
"integer"
### portability_directive
";"
";"
check FCursorState ident
"FCursorState"
check : :
":"
### normal_type
### ord_type
check TEditorMouseCursorState ident
"TEditorMouseCursorState"
### portability_directive
";"
";"
check FDelimiters ident
"FDelimiters"
check : :
":"
### normal_type
### ord_type
check TCharSet ident
"TCharSet"
### portability_directive
";"
";"
check FFontHeight ident
"FFontHeight"
check : :
":"
### normal_type
### ord_type
check integer ident
"integer"
### portability_directive
";"
";"
check FFountain ident
"FFountain"
check : :
":"
### normal_type
### ord_type
check TFountain ident
"TFountain"
### portability_directive
";"
";"
check FHitSelLength ident
"FHitSelLength"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FHitStyle ident
"FHitStyle"
check : :
":"
### normal_type
### ord_type
check TEditorHitStyle ident
"TEditorHitStyle"
### portability_directive
";"
";"
check FImagebar ident
"FImagebar"
check : :
":"
### normal_type
### ord_type
check TEditorImagebar ident
"TEditorImagebar"
### portability_directive
";"
";"
check FImageDigits ident
"FImageDigits"
check : :
":"
### normal_type
### ord_type
check TImageList ident
"TImageList"
### portability_directive
";"
";"
check FImageMarks ident
"FImageMarks"
check : :
":"
### normal_type
### ord_type
check TImageList ident
"TImageList"
### portability_directive
";"
";"
check FLeftbar ident
"FLeftbar"
check : :
":"
### normal_type
### ord_type
check TEditorLeftbar ident
"TEditorLeftbar"
### portability_directive
";"
";"
check FLines ident
"FLines"
check : :
":"
### normal_type
### ord_type
check TStrings ident
"TStrings"
### portability_directive
";"
";"
check FMarks ident
"FMarks"
check : :
":"
### normal_type
### ord_type
check TEditorMarks ident
"TEditorMarks"
### portability_directive
";"
";"
check FMargin ident
"FMargin"
check : :
":"
### normal_type
### ord_type
check TEditorMargin ident
"TEditorMargin"
### portability_directive
";"
";"
check FModified ident
"FModified"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FOverWrite ident
"FOverWrite"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FReadOnly ident
"FReadOnly"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FRow ident
"FRow"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRowCount ident
"FRowCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRuler ident
"FRuler"
check : :
":"
### normal_type
### ord_type
check TEditorRuler ident
"TEditorRuler"
### portability_directive
";"
";"
check FScrollBars ident
"FScrollBars"
check : :
":"
### normal_type
### ord_type
check TScrollStyle ident
"TScrollStyle"
### portability_directive
";"
";"
check FSpeed ident
"FSpeed"
check : :
":"
### normal_type
### ord_type
check TEditorSpeed ident
"TEditorSpeed"
### portability_directive
";"
";"
check FTopCol ident
"FTopCol"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FTopRow ident
"FTopRow"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FView ident
"FView"
check : :
":"
### normal_type
### ord_type
check TEditorViewInfo ident
"TEditorViewInfo"
### portability_directive
";"
";"
check FWantReturns ident
"FWantReturns"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FWantTabs ident
"FWantTabs"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FSelDraw ident
"FSelDraw"
check : :
":"
### normal_type
### ord_type
check TSelectedPosition ident
"TSelectedPosition"
### portability_directive
";"
";"
check FSelectionMode ident
"FSelectionMode"
check : :
":"
### normal_type
### ord_type
check TEditorSelectionMode ident
"TEditorSelectionMode"
### portability_directive
";"
";"
check FSelStr ident
"FSelStr"
check : :
":"
### normal_type
### ord_type
check TSelectedPosition ident
"TSelectedPosition"
### portability_directive
";"
";"
check FOnCaretMoved ident
"FOnCaretMoved"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
";"
";"
check FOnChange ident
"FOnChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
";"
";"
check FOnDrawLine ident
"FOnDrawLine"
check : :
":"
### normal_type
### ord_type
check TDrawLineEvent ident
"TDrawLineEvent"
### portability_directive
";"
";"
check FOnSelectionChange ident
"FOnSelectionChange"
check : :
":"
### normal_type
### ord_type
check TSelectionChangeEvent ident
"TSelectionChangeEvent"
### portability_directive
";"
";"
check FOnSelectionModeChange ident
"FOnSelectionModeChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
";"
";"
check FOnTopColChange ident
"FOnTopColChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
";"
";"
check FOnTopRowChange ident
"FOnTopRowChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
";"
";"
check function ident
### class_method_list
### method_list
### method_header
check function function
"function"
check GetHitSelected ident
"GetHitSelected"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListBracket ident
"GetListBracket"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListCount ident
"GetListCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListData ident
"GetListData"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TRowAttributeData ident
"TRowAttributeData"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListDataString ident
"GetListDataString"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListElement ident
"GetListElement"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListRemain ident
"GetListRemain"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListRowMarks ident
"GetListRowMarks"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListPrevRow ident
"GetListPrevRow"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TRowAttribute ident
"TRowAttribute"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListPrevToken ident
"GetListPrevToken"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListRow ident
"GetListRow"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TEditorRowAttribute ident
"TEditorRowAttribute"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListString ident
"GetListString"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListToken ident
"GetListToken"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetListWrappedByte ident
"GetListWrappedByte"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetReserveWordList ident
"GetReserveWordList"
check : :
":"
### normal_type
### ord_type
check TStringList ident
"TStringList"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetRowHeight ident
"GetRowHeight"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelected ident
"GetSelected"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelectedData ident
"GetSelectedData"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelectedDraw ident
"GetSelectedDraw"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelDragging ident
"GetSelDragging"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelLength ident
"GetSelLength"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelStart ident
"GetSelStart"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelText ident
"GetSelText"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetUndoListMax ident
"GetUndoListMax"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetUndoObj ident
"GetUndoObj"
check : :
":"
### normal_type
### ord_type
check TEditorUndoObj ident
"TEditorUndoObj"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetWordWrap ident
"GetWordWrap"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetWrapOption ident
"GetWrapOption"
check : :
":"
### normal_type
### ord_type
check TEditorWrapOption ident
"TEditorWrapOption"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetBorderStyle ident
"SetBorderStyle"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TBorderStyle ident
"TBorderStyle"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetCaret ident
"SetCaret"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorCaret ident
"TEditorCaret"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetCol ident
"SetCol"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetCursorState ident
"SetCursorState"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMouseCursorState ident
"TEditorMouseCursorState"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetFountain ident
"SetFountain"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TFountain ident
"TFountain"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetHitSelLength ident
"SetHitSelLength"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetHitStyle ident
"SetHitStyle"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorHitStyle ident
"TEditorHitStyle"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetImagebar ident
"SetImagebar"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorImagebar ident
"TEditorImagebar"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetImageDigits ident
"SetImageDigits"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TImageList ident
"TImageList"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetImageMarks ident
"SetImageMarks"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TImageList ident
"TImageList"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLines ident
"SetLines"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TStrings ident
"TStrings"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetListRowMarks ident
"SetListRowMarks"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Value ident
"Value"
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetMarks ident
"SetMarks"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMarks ident
"TEditorMarks"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetMargin ident
"SetMargin"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorMargin ident
"TEditorMargin"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetLeftbar ident
"SetLeftbar"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorLeftbar ident
"TEditorLeftbar"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetOverWrite ident
"SetOverWrite"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetReadOnly ident
"SetReadOnly"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetReserveWordList ident
"SetReserveWordList"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TStringList ident
"TStringList"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetRow ident
"SetRow"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetRuler ident
"SetRuler"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorRuler ident
"TEditorRuler"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetScrollBars ident
"SetScrollBars"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TScrollStyle ident
"TScrollStyle"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelectionMode ident
"SetSelectionMode"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorSelectionMode ident
"TEditorSelectionMode"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelLength ident
"SetSelLength"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelStart ident
"SetSelStart"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelText ident
"SetSelText"
check ( (
"("
"const"
check Value ident
"Value"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSpeed ident
"SetSpeed"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorSpeed ident
"TEditorSpeed"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetTopCol ident
"SetTopCol"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetTopRow ident
"SetTopRow"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetUndoListMax ident
"SetUndoListMax"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetView ident
"SetView"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorViewInfo ident
"TEditorViewInfo"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetWordWrap ident
"SetWordWrap"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetWrapOption ident
"SetWrapOption"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check TEditorWrapOption ident
"TEditorWrapOption"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CMColorChanged ident
"CMColorChanged"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check CM_COLORCHANGED ident
"CM_COLORCHANGED"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CMCtl3DChanged ident
"CMCtl3DChanged"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check CM_CTL3DCHANGED ident
"CM_CTL3DCHANGED"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CMFontChanged ident
"CMFontChanged"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check CM_FONTCHANGED ident
"CM_FONTCHANGED"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMCanUndo ident
"EMCanUndo"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_CANUNDO ident
"EM_CANUNDO"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMCharFromPos ident
"EMCharFromPos"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_CHARFROMPOS ident
"EM_CHARFROMPOS"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMEmptyUndoBuffer ident
"EMEmptyUndoBuffer"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_EMPTYUNDOBUFFER ident
"EM_EMPTYUNDOBUFFER"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMGetFirstVisibleLine ident
"EMGetFirstVisibleLine"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_GETFIRSTVISIBLELINE ident
"EM_GETFIRSTVISIBLELINE"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMGetLine ident
"EMGetLine"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_GETLINE ident
"EM_GETLINE"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMGetLineCount ident
"EMGetLineCount"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_GETLINECOUNT ident
"EM_GETLINECOUNT"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMGetModify ident
"EMGetModify"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_GETMODIFY ident
"EM_GETMODIFY"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMGetSel ident
"EMGetSel"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_GETSEL ident
"EM_GETSEL"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMLineFromChar ident
"EMLineFromChar"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_LINEFROMCHAR ident
"EM_LINEFROMCHAR"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMLineIndex ident
"EMLineIndex"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_LINEINDEX ident
"EM_LINEINDEX"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMLineLength ident
"EMLineLength"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_LINELENGTH ident
"EM_LINELENGTH"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMPosFromChar ident
"EMPosFromChar"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_POSFROMCHAR ident
"EM_POSFROMCHAR"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMReplaceSel ident
"EMReplaceSel"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_REPLACESEL ident
"EM_REPLACESEL"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMScrollCaret ident
"EMScrollCaret"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_SCROLLCARET ident
"EM_SCROLLCARET"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMSetModiry ident
"EMSetModiry"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_SETMODIFY ident
"EM_SETMODIFY"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMSetReadOnly ident
"EMSetReadOnly"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_SETREADONLY ident
"EM_SETREADONLY"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMUndo ident
"EMUndo"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_UNDO ident
"EM_UNDO"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EMSetSel ident
"EMSetSel"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check EM_SETSEL ident
"EM_SETSEL"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMChar ident
"WMChar"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMChar ident
"TWMChar"
### portability_directive
check ) )
")"
";"
"message"
check WM_CHAR ident
"WM_CHAR"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMClear ident
"WMClear"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_CLEAR ident
"WM_CLEAR"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMCopy ident
"WMCopy"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_COPY ident
"WM_COPY"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMCut ident
"WMCut"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_CUT ident
"WM_CUT"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMPaste ident
"WMPaste"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_Paste ident
"WM_Paste"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMGetDlgCode ident
"WMGetDlgCode"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMGetDlgCode ident
"TWMGetDlgCode"
### portability_directive
check ) )
")"
";"
"message"
check WM_GETDLGCODE ident
"WM_GETDLGCODE"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMGetText ident
"WMGetText"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_GETTEXT ident
"WM_GETTEXT"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMGetTextLength ident
"WMGetTextLength"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_GETTEXTLENGTH ident
"WM_GETTEXTLENGTH"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMHScroll ident
"WMHScroll"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMHScroll ident
"TWMHScroll"
### portability_directive
check ) )
")"
";"
"message"
check WM_HSCROLL ident
"WM_HSCROLL"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMImeComposition ident
"WMImeComposition"
check ( (
"("
"var"
check Msg ident
"Msg"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_IME_COMPOSITION ident
"WM_IME_COMPOSITION"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMImeNotify ident
"WMImeNotify"
check ( (
"("
"var"
check Msg ident
"Msg"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_IME_NOTIFY ident
"WM_IME_NOTIFY"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMKeyDown ident
"WMKeyDown"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMKeyDown ident
"TWMKeyDown"
### portability_directive
check ) )
")"
";"
"message"
check WM_KEYDOWN ident
"WM_KEYDOWN"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMKeyUp ident
"WMKeyUp"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMKeyUp ident
"TWMKeyUp"
### portability_directive
check ) )
")"
";"
"message"
check WM_KEYUP ident
"WM_KEYUP"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMKillFocus ident
"WMKillFocus"
check ( (
"("
"var"
check Msg ident
"Msg"
":"
### normal_type
### ord_type
check TWMKillFocus ident
"TWMKillFocus"
### portability_directive
check ) )
")"
";"
"message"
check WM_KILLFOCUS ident
"WM_KILLFOCUS"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMLButtonDown ident
"WMLButtonDown"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMLButtonDown ident
"TWMLButtonDown"
### portability_directive
check ) )
")"
";"
"message"
check WM_LBUTTONDOWN ident
"WM_LBUTTONDOWN"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMLButtonUp ident
"WMLButtonUp"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMLButtonUp ident
"TWMLButtonUp"
### portability_directive
check ) )
")"
";"
"message"
check WM_LBUTTONUP ident
"WM_LBUTTONUP"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMMouseMove ident
"WMMouseMove"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMMouseMove ident
"TWMMouseMove"
### portability_directive
check ) )
")"
";"
"message"
check WM_MOUSEMOVE ident
"WM_MOUSEMOVE"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMSetFocus ident
"WMSetFocus"
check ( (
"("
"var"
check Msg ident
"Msg"
":"
### normal_type
### ord_type
check TWMSetFocus ident
"TWMSetFocus"
### portability_directive
check ) )
")"
";"
"message"
check WM_SETFOCUS ident
"WM_SETFOCUS"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMSetText ident
"WMSetText"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
"message"
check WM_SETTEXT ident
"WM_SETTEXT"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMSize ident
"WMSize"
check ( (
"("
"var"
check Msg ident
"Msg"
":"
### normal_type
### ord_type
check TWMSize ident
"TWMSize"
### portability_directive
check ) )
")"
";"
"message"
check WM_SIZE ident
"WM_SIZE"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WMVScroll ident
"WMVScroll"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TWMVScroll ident
"TWMVScroll"
### portability_directive
check ) )
")"
";"
"message"
check WM_VSCROLL ident
"WM_VSCROLL"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
"protected"
### class_field_list
### obj_field_list
check FCaretNoMove ident
"FCaretNoMove"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FCaretUpdateCount ident
"FCaretUpdateCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FCaretShowing ident
"FCaretShowing"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FColBuf ident
"FColBuf"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FColKeeping ident
"FColKeeping"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FCompositionCanceled ident
"FCompositionCanceled"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FDxArray ident
"FDxArray"
check : :
":"
### normal_type
"array"
"["
### ord_type
check 0 ident
"0"
".."
check MaxLineCharacter ident
"MaxLineCharacter"
check ] ]
"]"
check of of
"of"
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FHScrollMax ident
"FHScrollMax"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FImeCount ident
"FImeCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FItalicFontStyle ident
"FItalicFontStyle"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FKeyRepeat ident
"FKeyRepeat"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FLeftScrollWidth ident
"FLeftScrollWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FList ident
"FList"
check : :
":"
### normal_type
### ord_type
check TEditorScreenStrings ident
"TEditorScreenStrings"
### portability_directive
";"
";"
check FMouseSelStartPos ident
"FMouseSelStartPos"
check : :
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
";"
";"
check FScreen ident
"FScreen"
check : :
":"
### normal_type
### ord_type
check TEditorScreen ident
"TEditorScreen"
### portability_directive
";"
";"
check FUnderlineUpdateCount ident
"FUnderlineUpdateCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FVScrollMax ident
"FVScrollMax"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FClearingSelection ident
"FClearingSelection"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FRowSelecting ident
"FRowSelecting"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FSelDragState ident
"FSelDragState"
check : :
":"
### normal_type
### ord_type
check TEditorSelDragState ident
"TEditorSelDragState"
### portability_directive
";"
";"
check FSelectionState ident
"FSelectionState"
check : :
":"
### normal_type
### ord_type
check TEditorSelectionState ident
"TEditorSelectionState"
### portability_directive
";"
";"
check FSelStartCol ident
"FSelStartCol"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FSelStartSi ident
"FSelStartSi"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FSelStartRow ident
"FSelStartRow"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FSelOld ident
"FSelOld"
check : :
":"
### normal_type
### ord_type
check TSelectedPosition ident
"TSelectedPosition"
### portability_directive
";"
";"
check FSelRow ident
"FSelRow"
check : :
":"
### normal_type
### ord_type
check TSelectedPosition ident
"TSelectedPosition"
### portability_directive
";"
";"
check FHitSelecting ident
"FHitSelecting"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check FImagebarWidth ident
"FImagebarWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FLeftbarColumn ident
"FLeftbarColumn"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FLeftbarEdge ident
"FLeftbarEdge"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FLeftbarWidth ident
"FLeftbarWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FOriginBase ident
"FOriginBase"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FRulerBase ident
"FRulerBase"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FRulerDigit ident
"FRulerDigit"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FRulerDigitHeight ident
"FRulerDigitHeight"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRulerDigitMask ident
"FRulerDigitMask"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FRulerDigitWidth ident
"FRulerDigitWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRulerEdge ident
"FRulerEdge"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FRulerGauge ident
"FRulerGauge"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FRulerHeight ident
"FRulerHeight"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check FRulerMarkBase ident
"FRulerMarkBase"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check FRulerMarkDigit ident
"FRulerMarkDigit"
check : :
":"
### normal_type
### ord_type
check TBitmap ident
"TBitmap"
### portability_directive
";"
";"
check procedure ident
### class_method_list
### method_list
### method_header
check procedure procedure
"procedure"
check AdjustImagebarWidth ident
"AdjustImagebarWidth"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CreateMarginBitmaps ident
"CreateMarginBitmaps"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DestroyMarginBitmaps ident
"DestroyMarginBitmaps"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check AdjustLeftbarColumn ident
"AdjustLeftbarColumn"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check AdjustLeftbarWidth ident
"AdjustLeftbarWidth"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check AdjustRulerHeight ident
"AdjustRulerHeight"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawRulerBases ident
"DrawRulerBases"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawRulerMark ident
"DrawRulerMark"
check ( (
"("
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check HideRulerMark ident
"HideRulerMark"
check ( (
"("
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitLeftbarEdge ident
"InitLeftbarEdge"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitOriginBase ident
"InitOriginBase"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitRulerBases ident
"InitRulerBases"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitRulerBitmaps ident
"InitRulerBitmaps"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitRulerDigitMask ident
"InitRulerDigitMask"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitRulerDigits ident
"InitRulerDigits"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitRulerEdge ident
"InitRulerEdge"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitRulerGauge ident
"InitRulerGauge"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InvalidateLeftbar ident
"InvalidateLeftbar"
check ( (
"("
check StartRow ident
"StartRow"
","
check EndRow ident
"EndRow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PaintLeftbar ident
"PaintLeftbar"
check ( (
"("
check Sr ident
"Sr"
","
check Er ident
"Er"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PaintRuler ident
"PaintRuler"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PaintImagebar ident
"PaintImagebar"
check ( (
"("
check Sr ident
"Sr"
","
check Er ident
"Er"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check RulerWidth ident
"RulerWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UpdateLeftBarWidth ident
"UpdateLeftBarWidth"
check ( (
"("
check OldWidth ident
"OldWidth"
","
check NewWidth ident
"NewWidth"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ExpandListLength ident
"ExpandListLength"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ExpandListStr ident
"ExpandListStr"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ListInfoFromPos ident
"ListInfoFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
";"
";"
"var"
check Info ident
"Info"
":"
### normal_type
### ord_type
check TEditorStrInfo ident
"TEditorStrInfo"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ListRows ident
"ListRows"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TEditorRowAttribute ident
"TEditorRowAttribute"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ListStr ident
"ListStr"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ListToStr ident
"ListToStr"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TEditorStringList ident
"TEditorStringList"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check PosTokenString ident
"PosTokenString"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
";"
";"
check Editor ident
"Editor"
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
";"
";"
"var"
check C ident
"C"
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
";"
check Bracket ident
"Bracket"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check PrevTopSpace ident
"PrevTopSpace"
check ( (
"("
check ARow ident
"ARow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PutStringToLine ident
"PutStringToLine"
check ( (
"("
check Source ident
"Source"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectPosToken ident
"SelectPosToken"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
";"
";"
check Editor ident
"Editor"
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
";"
";"
check Bracket ident
"Bracket"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check StrToAttributes ident
"StrToAttributes"
check ( (
"("
"const"
check S ident
"S"
":"
"String"
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TabbedTopSpace ident
"TabbedTopSpace"
check ( (
"("
"const"
check S ident
"S"
":"
"String"
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check AdjustColCount ident
"AdjustColCount"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoScroll ident
"DoScroll"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Rect ident
"Rect"
","
check ClipRect ident
"ClipRect"
":"
### normal_type
### ord_type
check PRect ident
"PRect"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawEof ident
"DrawEof"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawRetMark ident
"DrawRetMark"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawRetMarkSelected ident
"DrawRetMarkSelected"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawWrapMark ident
"DrawWrapMark"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawWrapMarkSelected ident
"DrawWrapMarkSelected"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawHideMark ident
"DrawHideMark"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawHideMarkSelected ident
"DrawHideMarkSelected"
check ( (
"("
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawUnderline ident
"DrawUnderline"
check ( (
"("
check ARow ident
"ARow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check HideUnderline ident
"HideUnderline"
check ( (
"("
check ARow ident
"ARow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitDrawInfo ident
"InitDrawInfo"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitScroll ident
"InitScroll"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitView ident
"InitView"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InvalidateLine ident
"InvalidateLine"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InvalidateRow ident
"InvalidateRow"
check ( (
"("
check StartRow ident
"StartRow"
","
check EndRow ident
"EndRow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ImagebarScroll ident
"ImagebarScroll"
check ( (
"("
check Line ident
"Line"
","
check Count ident
"Count"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check LineScroll ident
"LineScroll"
check ( (
"("
check Line ident
"Line"
","
check Count ident
"Count"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PageVScroll ident
"PageVScroll"
check ( (
"("
check Value ident
"Value"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PaintLine ident
"PaintLine"
check ( (
"("
check R ident
"R"
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
";"
";"
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check S ident
"S"
":"
"String"
";"
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Parser ident
"Parser"
":"
### normal_type
### ord_type
check TFountainParser ident
"TFountainParser"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PaintLineSelected ident
"PaintLineSelected"
check ( (
"("
check R ident
"R"
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
";"
";"
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check S ident
"S"
":"
"String"
";"
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Parser ident
"Parser"
":"
### normal_type
### ord_type
check TFountainParser ident
"TFountainParser"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PaintRect ident
"PaintRect"
check ( (
"("
check R ident
"R"
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PaintRectSelected ident
"PaintRectSelected"
check ( (
"("
check R ident
"R"
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
";"
";"
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check S ident
"S"
":"
"String"
";"
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Parser ident
"Parser"
":"
### normal_type
### ord_type
check TFountainParser ident
"TFountainParser"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UnderlineBeginUpdate ident
"UnderlineBeginUpdate"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UnderlineEndUpdate ident
"UnderlineEndUpdate"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check UnderlinePos ident
"UnderlinePos"
check ( (
"("
check ARow ident
"ARow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check AdjustCol ident
"AdjustCol"
check ( (
"("
check RowChanged ident
"RowChanged"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
";"
check Direction ident
"Direction"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CaretBeginUpdate ident
"CaretBeginUpdate"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CaretEndUpdate ident
"CaretEndUpdate"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CaretHide ident
"CaretHide"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CaretShow ident
"CaretShow"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check FindNextWordStart ident
"FindNextWordStart"
check ( (
"("
"var"
check R ident
"R"
","
check C ident
"C"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Direction ident
"Direction"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelIndex ident
"GetSelIndex"
check ( (
"("
check StartRow ident
"StartRow"
","
check ARow ident
"ARow"
","
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check IsCaretNoClient ident
"IsCaretNoClient"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check MoveCaret ident
"MoveCaret"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check RecreateCaret ident
"RecreateCaret"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ScrollCaret ident
"ScrollCaret"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetCaretPosition ident
"SetCaretPosition"
check ( (
"("
"var"
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetImeComposition ident
"SetImeComposition"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelIndex ident
"SetSelIndex"
check ( (
"("
check StartRow ident
"StartRow"
","
check SelIndex ident
"SelIndex"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UpdateCaret ident
"UpdateCaret"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check BoxLeftIndex ident
"BoxLeftIndex"
check ( (
"("
"const"
check Attr ident
"Attr"
":"
"String"
";"
check I ident
"I"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check BoxRightIndex ident
"BoxRightIndex"
check ( (
"("
"const"
check Attr ident
"Attr"
":"
"String"
";"
check I ident
"I"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check BoxSelRect ident
"BoxSelRect"
check ( (
"("
"const"
check S ident
"S"
":"
"String"
";"
check Index ident
"Index"
","
check StartCol ident
"StartCol"
","
check EndCol ident
"EndCol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DeleteSelection ident
"DeleteSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawSelection ident
"DrawSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawSelectionBox ident
"DrawSelectionBox"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawSelectionLine ident
"DrawSelectionLine"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitSelection ident
"InitSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelDeletedList ident
"SelDeletedList"
check ( (
"("
check Dest ident
"Dest"
":"
### normal_type
### ord_type
check TEditorStringList ident
"TEditorStringList"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelection ident
"SetSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check StartSelection ident
"StartSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UpdateSelection ident
"UpdateSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check StartRowSelection ident
"StartRowSelection"
check ( (
"("
check ARow ident
"ARow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check UpdateRowSelection ident
"UpdateRowSelection"
check ( (
"("
check ARow ident
"ARow"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check EndSelDrag ident
"EndSelDrag"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check InitSelDrag ident
"InitSelDrag"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check StartSelDrag ident
"StartSelDrag"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetActiveFountain ident
"GetActiveFountain"
check : :
":"
### normal_type
### ord_type
check TFountain ident
"TFountain"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CreateParams ident
"CreateParams"
check ( (
"("
"var"
check Params ident
"Params"
":"
### normal_type
### ord_type
check TCreateParams ident
"TCreateParams"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CreateHandle ident
"CreateHandle"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DefaultHandler ident
"DefaultHandler"
check ( (
"("
"var"
check Message ident
"Message"
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Loaded ident
"Loaded"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Notification ident
"Notification"
check ( (
"("
check AComponent ident
"AComponent"
":"
### normal_type
### ord_type
check TComponent ident
"TComponent"
### portability_directive
";"
";"
check Operation ident
"Operation"
":"
### normal_type
### ord_type
check TOperation ident
"TOperation"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Paint ident
"Paint"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check WndProc ident
"WndProc"
check ( (
"("
"var"
check Message ident
"Message"
":"
### normal_type
### ord_type
check TMessage ident
"TMessage"
### portability_directive
check ) )
")"
";"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateDelimiters ident
"CreateDelimiters"
check : :
":"
### normal_type
### ord_type
check TCharSet ident
"TCharSet"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateEditorCaret ident
"CreateEditorCaret"
check : :
":"
### normal_type
### ord_type
check TEditorCaret ident
"TEditorCaret"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateEditorImagebar ident
"CreateEditorImagebar"
check : :
":"
### normal_type
### ord_type
check TEditorImagebar ident
"TEditorImagebar"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateEditorLeftbar ident
"CreateEditorLeftbar"
check : :
":"
### normal_type
### ord_type
check TEditorLeftbar ident
"TEditorLeftbar"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateEditorMarks ident
"CreateEditorMarks"
check : :
":"
### normal_type
### ord_type
check TEditorMarks ident
"TEditorMarks"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateEditorMargin ident
"CreateEditorMargin"
check : :
":"
### normal_type
### ord_type
check TEditorMargin ident
"TEditorMargin"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateEditorRuler ident
"CreateEditorRuler"
check : :
":"
### normal_type
### ord_type
check TEditorRuler ident
"TEditorRuler"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateEditorSpeed ident
"CreateEditorSpeed"
check : :
":"
### normal_type
### ord_type
check TEditorSpeed ident
"TEditorSpeed"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreatePopupMenu ident
"CreatePopupMenu"
check : :
":"
### normal_type
### ord_type
check TPopupMenu ident
"TPopupMenu"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateScreen ident
"CreateScreen"
check : :
":"
### normal_type
### ord_type
check TEditorScreen ident
"TEditorScreen"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateScreenStrings ident
"CreateScreenStrings"
check : :
":"
### normal_type
### ord_type
check TEditorScreenStrings ident
"TEditorScreenStrings"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateStrings ident
"CreateStrings"
check : :
":"
### normal_type
### ord_type
check TStrings ident
"TStrings"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CreateViewInfo ident
"CreateViewInfo"
check : :
":"
### normal_type
### ord_type
check TEditorViewInfo ident
"TEditorViewInfo"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoCaretMoved ident
"DoCaretMoved"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoChange ident
"DoChange"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoDrawLine ident
"DoDrawLine"
check ( (
"("
check ARect ident
"ARect"
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
";"
";"
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check LineStr ident
"LineStr"
":"
"String"
";"
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check SelectedArea ident
"SelectedArea"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoSelectionChange ident
"DoSelectionChange"
check ( (
"("
check Selection ident
"Selection"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoSelectionModeChange ident
"DoSelectionModeChange"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoTopColChange ident
"DoTopColChange"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DoTopRowChange ident
"DoTopRowChange"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ViewChanged ident
"ViewChanged"
check ( (
"("
check Sender ident
"Sender"
":"
### normal_type
### ord_type
check TObject ident
"TObject"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
### class_prop_list
### prop_list
check property property
"property"
check SelDragging ident
"SelDragging"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetSelDragging ident
"GetSelDragging"
";"
";"
### prop_list
check public property
"public"
### class_method_list
### method_list
### method_header
check constructor constructor
"constructor"
check Create ident
"Create"
check ( (
"("
check AOwner ident
"AOwner"
":"
### normal_type
### ord_type
check TComponent ident
"TComponent"
### portability_directive
check ) )
")"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check destructor destructor
"destructor"
check Destroy ident
"Destroy"
### directive
";"
"override"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CanSelDrag ident
"CanSelDrag"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CancelSelDrag ident
"CancelSelDrag"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CleanSelection ident
"CleanSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CopySelection ident
"CopySelection"
check ( (
"("
check ARow ident
"ARow"
","
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check IsSelectedArea ident
"IsSelectedArea"
check ( (
"("
check ARow ident
"ARow"
","
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check MoveSelection ident
"MoveSelection"
check ( (
"("
check ARow ident
"ARow"
","
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PosToRowCol ident
"PosToRowCol"
check ( (
"("
check XPos ident
"XPos"
","
check YPos ident
"YPos"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"var"
check ARow ident
"ARow"
","
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Split ident
"Split"
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetRowCol ident
"SetRowCol"
check ( (
"("
check ARow ident
"ARow"
","
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PutRowMark ident
"PutRowMark"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Mark ident
"Mark"
":"
### normal_type
### ord_type
check TRowMark ident
"TRowMark"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DeleteRowMark ident
"DeleteRowMark"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
check Mark ident
"Mark"
":"
### normal_type
### ord_type
check TRowMark ident
"TRowMark"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check GotoRowMark ident
"GotoRowMark"
check ( (
"("
check Mark ident
"Mark"
":"
### normal_type
### ord_type
check TRowMark ident
"TRowMark"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CanRedo ident
"CanRedo"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CanUndo ident
"CanUndo"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check CharFromPos ident
"CharFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Clear ident
"Clear"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ClearSelection ident
"ClearSelection"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ColToChar ident
"ColToChar"
check ( (
"("
check ARow ident
"ARow"
","
check ACol ident
"ACol"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CopyToClipboard ident
"CopyToClipboard"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check CutToClipboard ident
"CutToClipboard"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DeleteRow ident
"DeleteRow"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check DrawTextRect ident
"DrawTextRect"
check ( (
"("
check Rect ident
"Rect"
":"
### normal_type
### ord_type
check TRect ident
"TRect"
### portability_directive
";"
";"
check X ident
"X"
","
check Y ident
"Y"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
";"
"const"
check S ident
"S"
":"
"String"
";"
check Options ident
"Options"
":"
### normal_type
### ord_type
check Word ident
"Word"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ExchangeList ident
"ExchangeList"
check ( (
"("
check Source ident
"Source"
":"
### normal_type
### ord_type
check TEditor ident
"TEditor"
### portability_directive
check ) )
")"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ExpandTab ident
"ExpandTab"
check ( (
"("
"const"
check S ident
"S"
":"
"String"
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check ExpandTabLength ident
"ExpandTabLength"
check ( (
"("
"const"
check S ident
"S"
":"
"String"
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetSelTextBuf ident
"GetSelTextBuf"
check ( (
"("
check Buffer ident
"Buffer"
":"
### normal_type
### ord_type
check PChar ident
"PChar"
### portability_directive
";"
";"
check BufSize ident
"BufSize"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check GetTextLen ident
"GetTextLen"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check HitToSelected ident
"HitToSelected"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check LeftMargin ident
"LeftMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check LinesToRow ident
"LinesToRow"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ListToFile ident
"ListToFile"
check ( (
"("
"const"
check FileName ident
"FileName"
":"
"String"
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check ListToStream ident
"ListToStream"
check ( (
"("
check Stream ident
"Stream"
":"
### normal_type
### ord_type
check TStream ident
"TStream"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check PasteFromClipboard ident
"PasteFromClipboard"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Redo ident
"Redo"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check RowToLines ident
"RowToLines"
check ( (
"("
check Index ident
"Index"
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check Search ident
"Search"
check ( (
"("
"const"
check SearchValue ident
"SearchValue"
":"
"String"
";"
check SearchOptions ident
"SearchOptions"
":"
### normal_type
### ord_type
check TSearchOptions ident
"TSearchOptions"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectAll ident
"SelectAll"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectTokenBracketFromCaret ident
"SelectTokenBracketFromCaret"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectTokenBracketFromPos ident
"SelectTokenBracketFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectTokenFromCaret ident
"SelectTokenFromCaret"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectTokenFromPos ident
"SelectTokenFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectWordFromCaret ident
"SelectWordFromCaret"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelectWordFromPos ident
"SelectWordFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelIndent ident
"SelIndent"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelUnIndent ident
"SelUnIndent"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelTabIndent ident
"SelTabIndent"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SelTabUnIndent ident
"SelTabUnIndent"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelTextBox ident
"SetSelTextBox"
check ( (
"("
check Buffer ident
"Buffer"
":"
### normal_type
### ord_type
check PChar ident
"PChar"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check SetSelTextBuf ident
"SetSelTextBuf"
check ( (
"("
check Buffer ident
"Buffer"
":"
### normal_type
### ord_type
check PChar ident
"PChar"
### portability_directive
check ) )
")"
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check StrInfoFromPos ident
"StrInfoFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check TEditorStrInfo ident
"TEditorStrInfo"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenBracketFromCaret ident
"TokenBracketFromCaret"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenBracketFromPos ident
"TokenBracketFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenFromCaret ident
"TokenFromCaret"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenFromPos ident
"TokenFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenStringBracketFromCaret ident
"TokenStringBracketFromCaret"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenStringBracketFromPos ident
"TokenStringBracketFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenStringFromCaret ident
"TokenStringFromCaret"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TokenStringFromPos ident
"TokenStringFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check TopMargin ident
"TopMargin"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check procedure procedure
"procedure"
check Undo ident
"Undo"
";"
### directive
";"
"virtual"
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check WordFromCaret ident
"WordFromCaret"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
check function function
"function"
check WordFromPos ident
"WordFromPos"
check ( (
"("
check Pos ident
"Pos"
":"
### normal_type
### ord_type
check TPoint ident
"TPoint"
### portability_directive
check ) )
")"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
### method_list
### method_header
### class_prop_list
### prop_list
check property property
"property"
check ActiveFountain ident
"ActiveFountain"
check : :
":"
### normal_type
### ord_type
check TFountain ident
"TFountain"
### portability_directive
"read"
### type_ident
check GetActiveFountain ident
"GetActiveFountain"
";"
";"
### prop_list
check property property
"property"
check Canvas ident
"Canvas"
";"
";"
### prop_list
check property property
"property"
check Col ident
"Col"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FCol ident
"FCol"
"write"
### type_ident
check SetCol ident
"SetCol"
";"
";"
### prop_list
check property property
"property"
check ColCount ident
"ColCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FColCount ident
"FColCount"
";"
";"
### prop_list
check property property
"property"
check ColWidth ident
"ColWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FFontWidth ident
"FFontWidth"
";"
";"
### prop_list
check property property
"property"
check CursorState ident
"CursorState"
check : :
":"
### normal_type
### ord_type
check TEditorMouseCursorState ident
"TEditorMouseCursorState"
### portability_directive
"read"
### type_ident
check FCursorState ident
"FCursorState"
"write"
### type_ident
check SetCursorState ident
"SetCursorState"
";"
";"
### prop_list
check property property
"property"
check Delimiters ident
"Delimiters"
check : :
":"
### normal_type
### ord_type
check TCharSet ident
"TCharSet"
### portability_directive
"read"
### type_ident
check FDelimiters ident
"FDelimiters"
"write"
### type_ident
check FDelimiters ident
"FDelimiters"
";"
";"
### prop_list
check property property
"property"
check EditorUndoObj ident
"EditorUndoObj"
check : :
":"
### normal_type
### ord_type
check TEditorUndoObj ident
"TEditorUndoObj"
### portability_directive
"read"
### type_ident
check GetUndoObj ident
"GetUndoObj"
";"
";"
### prop_list
check property property
"property"
check FontHeight ident
"FontHeight"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FFontHeight ident
"FFontHeight"
";"
";"
### prop_list
check property property
"property"
check HitSelected ident
"HitSelected"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetHitSelected ident
"GetHitSelected"
";"
";"
### prop_list
check property property
"property"
check HitSelLength ident
"HitSelLength"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FHitSelLength ident
"FHitSelLength"
"write"
### type_ident
check SetHitSelLength ident
"SetHitSelLength"
";"
";"
### prop_list
check property property
"property"
check ListBracket ident
"ListBracket"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetListBracket ident
"GetListBracket"
";"
";"
### prop_list
check property property
"property"
check ListCount ident
"ListCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetListCount ident
"GetListCount"
";"
";"
### prop_list
check property property
"property"
check ListData ident
"ListData"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check TRowAttributeData ident
"TRowAttributeData"
### portability_directive
"read"
### type_ident
check GetListData ident
"GetListData"
";"
";"
### prop_list
check property property
"property"
check ListDataString ident
"ListDataString"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check GetListDataString ident
"GetListDataString"
";"
";"
### prop_list
check property property
"property"
check ListElement ident
"ListElement"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetListElement ident
"GetListElement"
";"
";"
### prop_list
check property property
"property"
check ListPrevToken ident
"ListPrevToken"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
"read"
### type_ident
check GetListPrevToken ident
"GetListPrevToken"
";"
";"
### prop_list
check property property
"property"
check ListPrevRow ident
"ListPrevRow"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check TRowAttribute ident
"TRowAttribute"
### portability_directive
"read"
### type_ident
check GetListPrevRow ident
"GetListPrevRow"
";"
";"
### prop_list
check property property
"property"
check ListRemain ident
"ListRemain"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetListRemain ident
"GetListRemain"
";"
";"
### prop_list
check property property
"property"
check ListRow ident
"ListRow"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check TEditorRowAttribute ident
"TEditorRowAttribute"
### portability_directive
"read"
### type_ident
check GetListRow ident
"GetListRow"
";"
";"
### prop_list
check property property
"property"
check ListString ident
"ListString"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check GetListString ident
"GetListString"
";"
";"
### prop_list
check property property
"property"
check ListToken ident
"ListToken"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check Char ident
"Char"
### portability_directive
"read"
### type_ident
check GetListToken ident
"GetListToken"
";"
";"
### prop_list
check property property
"property"
check ListWrappedByte ident
"ListWrappedByte"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetListWrappedByte ident
"GetListWrappedByte"
";"
";"
### prop_list
check property property
"property"
check ListRowMarks ident
"ListRowMarks"
check [ [
"["
check Index ident
"Index"
check : :
":"
### type_ident
check Integer ident
"Integer"
check ] ]
"]"
check : :
":"
### normal_type
### ord_type
check TRowMarks ident
"TRowMarks"
### portability_directive
"read"
### type_ident
check GetListRowMarks ident
"GetListRowMarks"
"write"
### type_ident
check SetListRowMarks ident
"SetListRowMarks"
";"
";"
### prop_list
check property property
"property"
check LeftScrollWidth ident
"LeftScrollWidth"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FLeftScrollWidth ident
"FLeftScrollWidth"
";"
";"
### prop_list
check property property
"property"
check Modified ident
"Modified"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FModified ident
"FModified"
"write"
### type_ident
check FModified ident
"FModified"
";"
";"
### prop_list
check property property
"property"
check OverWrite ident
"OverWrite"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FOverWrite ident
"FOverWrite"
"write"
### type_ident
check SetOverWrite ident
"SetOverWrite"
";"
";"
### prop_list
check property property
"property"
check Row ident
"Row"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FRow ident
"FRow"
"write"
### type_ident
check SetRow ident
"SetRow"
";"
";"
### prop_list
check property property
"property"
check RowCount ident
"RowCount"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FRowCount ident
"FRowCount"
";"
";"
### prop_list
check property property
"property"
check RowHeight ident
"RowHeight"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetRowHeight ident
"GetRowHeight"
";"
";"
### prop_list
check property property
"property"
check SelDrawPosition ident
"SelDrawPosition"
check : :
":"
### normal_type
### ord_type
check TSelectedPosition ident
"TSelectedPosition"
### portability_directive
"read"
### type_ident
check FSelDraw ident
"FSelDraw"
";"
";"
### prop_list
check property property
"property"
check Selected ident
"Selected"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetSelected ident
"GetSelected"
";"
";"
### prop_list
check property property
"property"
check SelectedData ident
"SelectedData"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetSelectedData ident
"GetSelectedData"
";"
";"
### prop_list
check property property
"property"
check SelectedDraw ident
"SelectedDraw"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetSelectedDraw ident
"GetSelectedDraw"
";"
";"
### prop_list
check property property
"property"
check SelectionMode ident
"SelectionMode"
check : :
":"
### normal_type
### ord_type
check TEditorSelectionMode ident
"TEditorSelectionMode"
### portability_directive
"read"
### type_ident
check FSelectionMode ident
"FSelectionMode"
"write"
### type_ident
check SetSelectionMode ident
"SetSelectionMode"
";"
";"
### prop_list
check property property
"property"
check SelLength ident
"SelLength"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetSelLength ident
"GetSelLength"
"write"
### type_ident
check SetSelLength ident
"SetSelLength"
";"
";"
### prop_list
check property property
"property"
check SelStart ident
"SelStart"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetSelStart ident
"GetSelStart"
"write"
### type_ident
check SetSelStart ident
"SetSelStart"
";"
";"
### prop_list
check property property
"property"
check SelStrPosition ident
"SelStrPosition"
check : :
":"
### normal_type
### ord_type
check TSelectedPosition ident
"TSelectedPosition"
### portability_directive
"read"
### type_ident
check FSelStr ident
"FSelStr"
";"
";"
### prop_list
check property property
"property"
check SelText ident
"SelText"
check : :
":"
### normal_type
check String string
"String"
### portability_directive
"read"
### type_ident
check GetSelText ident
"GetSelText"
"write"
### type_ident
check SetSelText ident
"SetSelText"
";"
";"
### prop_list
check property property
"property"
check TopCol ident
"TopCol"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FTopCol ident
"FTopCol"
"write"
### type_ident
check SetTopCol ident
"SetTopCol"
";"
";"
### prop_list
check property property
"property"
check TopRow ident
"TopRow"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check FTopRow ident
"FTopRow"
"write"
### type_ident
check SetTopRow ident
"SetTopRow"
";"
";"
### prop_list
check published property
"published"
### class_prop_list
### prop_list
check property property
"property"
check Align ident
"Align"
";"
";"
### prop_list
check property property
"property"
check BorderStyle ident
"BorderStyle"
check : :
":"
### normal_type
### ord_type
check TBorderStyle ident
"TBorderStyle"
### portability_directive
"read"
### type_ident
check FBorderStyle ident
"FBorderStyle"
"write"
### type_ident
check SetBorderStyle ident
"SetBorderStyle"
"default"
check bsSingle ident
"bsSingle"
";"
";"
### prop_list
check property property
"property"
check Caret ident
"Caret"
check : :
":"
### normal_type
### ord_type
check TEditorCaret ident
"TEditorCaret"
### portability_directive
"read"
### type_ident
check FCaret ident
"FCaret"
"write"
### type_ident
check SetCaret ident
"SetCaret"
";"
";"
### prop_list
check property property
"property"
check Color ident
"Color"
"default"
check clWhite ident
"clWhite"
";"
";"
### prop_list
check property property
"property"
check Ctl3D ident
"Ctl3D"
";"
";"
### prop_list
check property property
"property"
check DragCursor ident
"DragCursor"
";"
";"
### prop_list
check property property
"property"
check DragMode ident
"DragMode"
";"
";"
### prop_list
check property property
"property"
check Enabled ident
"Enabled"
";"
";"
### prop_list
check property property
"property"
check Fountain ident
"Fountain"
check : :
":"
### normal_type
### ord_type
check TFountain ident
"TFountain"
### portability_directive
"read"
### type_ident
check FFountain ident
"FFountain"
"write"
### type_ident
check SetFountain ident
"SetFountain"
";"
";"
### prop_list
check property property
"property"
check Font ident
"Font"
comment debug property HideSelection: Boolean read FHideSelection write FHideSelection;
";"
";"
### prop_list
check property property
"property"
check HitStyle ident
"HitStyle"
check : :
":"
### normal_type
### ord_type
check TEditorHitStyle ident
"TEditorHitStyle"
### portability_directive
"read"
### type_ident
check FHitStyle ident
"FHitStyle"
"write"
### type_ident
check SetHitStyle ident
"SetHitStyle"
";"
";"
### prop_list
check property property
"property"
check Imagebar ident
"Imagebar"
check : :
":"
### normal_type
### ord_type
check TEditorImagebar ident
"TEditorImagebar"
### portability_directive
"read"
### type_ident
check FImagebar ident
"FImagebar"
"write"
### type_ident
check SetImagebar ident
"SetImagebar"
";"
";"
### prop_list
check property property
"property"
check ImageDigits ident
"ImageDigits"
check : :
":"
### normal_type
### ord_type
check TImageList ident
"TImageList"
### portability_directive
"read"
### type_ident
check FImageDigits ident
"FImageDigits"
"write"
### type_ident
check SetImageDigits ident
"SetImageDigits"
";"
";"
### prop_list
check property property
"property"
check ImageMarks ident
"ImageMarks"
check : :
":"
### normal_type
### ord_type
check TImageList ident
"TImageList"
### portability_directive
"read"
### type_ident
check FImageMarks ident
"FImageMarks"
"write"
### type_ident
check SetImageMarks ident
"SetImageMarks"
";"
";"
### prop_list
check property property
"property"
check ImeMode ident
"ImeMode"
";"
";"
### prop_list
check property property
"property"
check Lines ident
"Lines"
check : :
":"
### normal_type
### ord_type
check TStrings ident
"TStrings"
### portability_directive
"read"
### type_ident
check FLines ident
"FLines"
"write"
### type_ident
check SetLines ident
"SetLines"
";"
";"
### prop_list
check property property
"property"
check Marks ident
"Marks"
check : :
":"
### normal_type
### ord_type
check TEditorMarks ident
"TEditorMarks"
### portability_directive
"read"
### type_ident
check FMarks ident
"FMarks"
"write"
### type_ident
check SetMarks ident
"SetMarks"
";"
";"
### prop_list
check property property
"property"
check Margin ident
"Margin"
check : :
":"
### normal_type
### ord_type
check TEditorMargin ident
"TEditorMargin"
### portability_directive
"read"
### type_ident
check FMargin ident
"FMargin"
"write"
### type_ident
check SetMargin ident
"SetMargin"
";"
";"
### prop_list
check property property
"property"
check Leftbar ident
"Leftbar"
check : :
":"
### normal_type
### ord_type
check TEditorLeftbar ident
"TEditorLeftbar"
### portability_directive
"read"
### type_ident
check FLeftbar ident
"FLeftbar"
"write"
### type_ident
check SetLeftbar ident
"SetLeftbar"
";"
";"
### prop_list
check property property
"property"
check ParentColor ident
"ParentColor"
"default"
check False ident
"False"
";"
";"
### prop_list
check property property
"property"
check ParentCtl3D ident
"ParentCtl3D"
";"
";"
### prop_list
check property property
"property"
check ParentFont ident
"ParentFont"
"default"
check False ident
"False"
";"
";"
### prop_list
check property property
"property"
check ParentShowHint ident
"ParentShowHint"
";"
";"
### prop_list
check property property
"property"
check PopupMenu ident
"PopupMenu"
";"
";"
### prop_list
check property property
"property"
check ReadOnly ident
"ReadOnly"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FReadOnly ident
"FReadOnly"
"write"
### type_ident
check SetReadOnly ident
"SetReadOnly"
";"
";"
### prop_list
check property property
"property"
check ReserveWordList ident
"ReserveWordList"
check : :
":"
### normal_type
### ord_type
check TStringList ident
"TStringList"
### portability_directive
"read"
### type_ident
check GetReserveWordList ident
"GetReserveWordList"
"write"
### type_ident
check SetReserveWordList ident
"SetReserveWordList"
";"
";"
### prop_list
check property property
"property"
check Ruler ident
"Ruler"
check : :
":"
### normal_type
### ord_type
check TEditorRuler ident
"TEditorRuler"
### portability_directive
"read"
### type_ident
check FRuler ident
"FRuler"
"write"
### type_ident
check SetRuler ident
"SetRuler"
";"
";"
### prop_list
check property property
"property"
check ScrollBars ident
"ScrollBars"
check : :
":"
### normal_type
### ord_type
check TScrollStyle ident
"TScrollStyle"
### portability_directive
"read"
### type_ident
check FScrollBars ident
"FScrollBars"
"write"
### type_ident
check SetScrollBars ident
"SetScrollBars"
";"
";"
### prop_list
check property property
"property"
check ShowHint ident
"ShowHint"
";"
";"
### prop_list
check property property
"property"
check Speed ident
"Speed"
check : :
":"
### normal_type
### ord_type
check TEditorSpeed ident
"TEditorSpeed"
### portability_directive
"read"
### type_ident
check FSpeed ident
"FSpeed"
"write"
### type_ident
check SetSpeed ident
"SetSpeed"
";"
";"
### prop_list
check property property
"property"
check TabOrder ident
"TabOrder"
";"
";"
### prop_list
check property property
"property"
check TabStop ident
"TabStop"
"default"
check True ident
"True"
";"
";"
### prop_list
check property property
"property"
check UndoListMax ident
"UndoListMax"
check : :
":"
### normal_type
### ord_type
check Integer ident
"Integer"
### portability_directive
"read"
### type_ident
check GetUndoListMax ident
"GetUndoListMax"
"write"
### type_ident
check SetUndoListMax ident
"SetUndoListMax"
";"
";"
### prop_list
check property property
"property"
check View ident
"View"
check : :
":"
### normal_type
### ord_type
check TEditorViewInfo ident
"TEditorViewInfo"
### portability_directive
"read"
### type_ident
check FView ident
"FView"
"write"
### type_ident
check SetView ident
"SetView"
";"
";"
### prop_list
check property property
"property"
check Visible ident
"Visible"
";"
";"
### prop_list
check property property
"property"
check WantReturns ident
"WantReturns"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FWantReturns ident
"FWantReturns"
"write"
### type_ident
check FWantReturns ident
"FWantReturns"
";"
";"
### prop_list
check property property
"property"
check WantTabs ident
"WantTabs"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check FWantTabs ident
"FWantTabs"
"write"
### type_ident
check FWantTabs ident
"FWantTabs"
";"
";"
### prop_list
check property property
"property"
check WordWrap ident
"WordWrap"
check : :
":"
### normal_type
### ord_type
check Boolean ident
"Boolean"
### portability_directive
"read"
### type_ident
check GetWordWrap ident
"GetWordWrap"
"write"
### type_ident
check SetWordWrap ident
"SetWordWrap"
";"
";"
### prop_list
check property property
"property"
check WrapOption ident
"WrapOption"
check : :
":"
### normal_type
### ord_type
check TEditorWrapOption ident
"TEditorWrapOption"
### portability_directive
"read"
### type_ident
check GetWrapOption ident
"GetWrapOption"
"write"
### type_ident
check SetWrapOption ident
"SetWrapOption"
";"
";"
### prop_list
check property property
"property"
check OnCaretMoved ident
"OnCaretMoved"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
"read"
### type_ident
check FOnCaretMoved ident
"FOnCaretMoved"
"write"
### type_ident
check FOnCaretMoved ident
"FOnCaretMoved"
";"
";"
### prop_list
check property property
"property"
check OnChange ident
"OnChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
"read"
### type_ident
check FOnChange ident
"FOnChange"
"write"
### type_ident
check FOnChange ident
"FOnChange"
";"
";"
### prop_list
check property property
"property"
check OnClick ident
"OnClick"
";"
";"
### prop_list
check property property
"property"
check OnDblClick ident
"OnDblClick"
";"
";"
### prop_list
check property property
"property"
check OnDrawLine ident
"OnDrawLine"
check : :
":"
### normal_type
### ord_type
check TDrawLineEvent ident
"TDrawLineEvent"
### portability_directive
"read"
### type_ident
check FOnDrawLine ident
"FOnDrawLine"
"write"
### type_ident
check FOnDrawLine ident
"FOnDrawLine"
";"
";"
### prop_list
check property property
"property"
check OnDragDrop ident
"OnDragDrop"
";"
";"
### prop_list
check property property
"property"
check OnDragOver ident
"OnDragOver"
";"
";"
### prop_list
check property property
"property"
check OnEndDrag ident
"OnEndDrag"
";"
";"
### prop_list
check property property
"property"
check OnEnter ident
"OnEnter"
";"
";"
### prop_list
check property property
"property"
check OnExit ident
"OnExit"
";"
";"
### prop_list
check property property
"property"
check OnKeyDown ident
"OnKeyDown"
";"
";"
### prop_list
check property property
"property"
check OnKeyPress ident
"OnKeyPress"
";"
";"
### prop_list
check property property
"property"
check OnKeyUp ident
"OnKeyUp"
";"
";"
### prop_list
check property property
"property"
check OnMouseDown ident
"OnMouseDown"
";"
";"
### prop_list
check property property
"property"
check OnMouseMove ident
"OnMouseMove"
";"
";"
### prop_list
check property property
"property"
check OnMouseUp ident
"OnMouseUp"
";"
";"
### prop_list
check property property
"property"
check OnSelectionChange ident
"OnSelectionChange"
check : :
":"
### normal_type
### ord_type
check TSelectionChangeEvent ident
"TSelectionChangeEvent"
### portability_directive
"read"
### type_ident
check FOnSelectionChange ident
"FOnSelectionChange"
"write"
### type_ident
check FOnSelectionChange ident
"FOnSelectionChange"
";"
";"
### prop_list
check property property
"property"
check OnSelectionModeChange ident
"OnSelectionModeChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
"read"
### type_ident
check FOnSelectionModeChange ident
"FOnSelectionModeChange"
"write"
### type_ident
check FOnSelectionModeChange ident
"FOnSelectionModeChange"
";"
";"
### prop_list
check property property
"property"
check OnTopColChange ident
"OnTopColChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
"read"
### type_ident
check FOnTopColChange ident
"FOnTopColChange"
"write"
### type_ident
check FOnTopColChange ident
"FOnTopColChange"
";"
";"
### prop_list
check property property
"property"
check OnTopRowChange ident
"OnTopRowChange"
check : :
":"
### normal_type
### ord_type
check TNotifyEvent ident
"TNotifyEvent"
### portability_directive
"read"
### type_ident
check FOnTopRowChange ident
"FOnTopRowChange"
"write"
### type_ident
check FOnTopRowChange ident
"FOnTopRowChange"
";"
";"
### prop_list
check property property
"property"
check OnStartDrag ident
"OnStartDrag"
";"
";"
### prop_list
check end property
check end end
"end"
### leave class_type ;
### portability_directive
";"
### directive
";"
### portability_directive
";"
";"
check implementation ident
check implementation implementation
"implementation"
#<Delphi::Unit:0x653e46
 @ident="HEditor",
 @interface=
  #<Delphi::Interface:0x64b086
   @consts=
    [#<Delphi::Const:0x6261ce @ident="DefaultCaretWidth", @value=[["2"]]>,
     #<Delphi::Const:0x624e66 @ident="BriefCaretHeight", @value=[["2"]]>,
     #<Delphi::Const:0x623b16 @ident="MaxLineCharacter", @value=[["1000"]]>,
     #<Delphi::Const:0x621ef6 @ident="MarginLimit", @value=[["100"]]>,
     #<Delphi::Const:0x620b52 @ident="UndoListMin", @value=[["64"]]>,
     #<Delphi::Const:0x612fce @ident="MaxWrapByte", @value=[["250"]]>,
     #<Delphi::Const:0x60e612 @ident="MinWrapByte", @value=[["20"]]>,
     #<Delphi::Const:0x6085ca @ident="caEof", @value=[[["#", "$30"]]]>,
     #<Delphi::Const:0x603a22 @ident="caAnk", @value=[[["#", "$31"]]]>,
     #<Delphi::Const:0x65a7a6 @ident="caDelimiter", @value=[[["#", "$32"]]]>,
     #<Delphi::Const:0x65716a @ident="caTabSpace", @value=[[["#", "$33"]]]>,
     #<Delphi::Const:0x654752 @ident="caDBCS1", @value=[[["#", "$34"]]]>,
     #<Delphi::Const:0x635e6a @ident="caDBCS2", @value=[[["#", "$35"]]]>],
   @procedures=[],
   @resourcestrings=[],
   @threadvars=[],
   @types=
    [#<Delphi::Type:0x62dd2e
      @directive=[],
      @ident="TEditorCursors",
      @value=
       #<Delphi::Class:0x62c3d2
        @attrs=
         [#<Delphi::ClassAttr:0x608d02
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x620cea @directive=[], @ident="Create">,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x608cf6
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6140ba
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x611666
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x60e23a @expr=[["TPersistent"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x608cea
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x621482
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60798e
             @ident="DefaultCursor",
             @interface=#<Delphi::OrdType:0x601fa6 @expr=[["TCursor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x621476
           @spec=:prop,
           @value=
            #<Delphi::Property:0x659606
             @ident="DragSelCursor",
             @interface=#<Delphi::OrdType:0x6558aa @expr=[["TCursor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62146a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x651a22
             @ident="DragSelCopyCursor",
             @interface=#<Delphi::OrdType:0x63313a @expr=[["TCursor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62145e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62ac02
             @ident="InSelCursor",
             @interface=#<Delphi::OrdType:0x62950a @expr=[["TCursor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x621452
           @spec=:prop,
           @value=
            #<Delphi::Property:0x627c4a
             @ident="LeftMarginCursor",
             @interface=#<Delphi::OrdType:0x626672 @expr=[["TCursor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x621446
           @spec=:prop,
           @value=
            #<Delphi::Property:0x624bde
             @ident="TopMarginCursor",
             @interface=#<Delphi::OrdType:0x622f8e @expr=[["TCursor"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x615f6e
      @directive=[],
      @ident="TEditorCaretStyle",
      @value=
       #<Delphi::EnumType:0x6143c6
        @items=
         [#<Delphi::EnumTypeItem:0x613286 @ident="csDefault">,
          #<Delphi::EnumTypeItem:0x6117b6 @ident="csBrief">]>>,
     #<Delphi::Type:0x60d772
      @directive=[],
      @ident="TEditorCaret",
      @value=
       #<Delphi::Class:0x60b2ee
        @attrs=
         [#<Delphi::ClassAttr:0x6285aa
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x635d4a
             @directive=[],
             @ident="SetStyle",
             @param_list=
              [#<Delphi::Param:0x633a2e
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0x62dd6a @expr=[["TEditorCaretStyle"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62859e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62b68e
             @directive=[],
             @ident="SetTabSpaceCount",
             @param_list=
              [#<Delphi::Param:0x62a1e2
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x629456 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x628592
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x621bde
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x627ede @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x621bd2
           @spec=:method,
           @value=
            #<Delphi::Destructor:0x626be2
             @directive=["override"],
             @ident="Destroy">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x621bc6
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x625352
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x624872
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x623a3e @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x621bba
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65a6aa
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6215ae
             @ident="AutoCursor",
             @interface=#<Delphi::OrdType:0x6155ae @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a69e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60f716
             @ident="AutoIndent",
             @interface=#<Delphi::OrdType:0x6090c2 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a692
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60202a
             @ident="BackSpaceUnIndent",
             @interface=#<Delphi::OrdType:0x659ae6 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a686
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65562e
             @ident="Cursors",
             @interface=
              #<Delphi::OrdType:0x65299a @expr=[["TEditorCursors"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a66e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x632db6
             @ident="FreeCaret",
             @interface=#<Delphi::OrdType:0x62c942 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a662
           @spec=:prop,
           @value=
            #<Delphi::Property:0x629c5a
             @ident="FreeRow",
             @interface=#<Delphi::OrdType:0x6288e6 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a656
           @spec=:prop,
           @value=
            #<Delphi::Property:0x626fc6
             @ident="InTab",
             @interface=#<Delphi::OrdType:0x625c0a @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a63e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62443a
             @ident="KeepCaret",
             @interface=#<Delphi::OrdType:0x62281a @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a60e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x620bee
             @ident="LockScroll",
             @interface=#<Delphi::OrdType:0x612ed2 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a5ba
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60c55a
             @ident="NextLine",
             @interface=#<Delphi::OrdType:0x606ef6 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a5a2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65b20e
             @ident="PrevSpaceIndent",
             @interface=#<Delphi::OrdType:0x6597e6 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a596
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65524a
             @ident="RowSelect",
             @interface=#<Delphi::OrdType:0x651c32 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a58a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6324da
             @ident="SelDragMode",
             @interface=#<Delphi::OrdType:0x62c102 @expr=[["TDragMode"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a57e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x629816
             @ident="SelMove",
             @interface=#<Delphi::OrdType:0x62847e @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a572
           @spec=:prop,
           @value=
            #<Delphi::Property:0x626ada
             @ident="SoftTab",
             @interface=#<Delphi::OrdType:0x6256fa @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a566
           @spec=:prop,
           @value=
            #<Delphi::Property:0x623e52
             @ident="Style",
             @interface=
              #<Delphi::OrdType:0x622142 @expr=[["TEditorCaretStyle"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a55a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x616226
             @ident="TabIndent",
             @interface=#<Delphi::OrdType:0x6116f6 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a542
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60a406
             @ident="TabSpaceCount",
             @interface=#<Delphi::OrdType:0x605306 @expr=[["Integer"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x65905a
      @directive=[],
      @ident="TEditorMargin",
      @value=
       #<Delphi::Class:0x65614a
        @attrs=
         [#<Delphi::ClassAttr:0x65473a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62664e
             @directive=[],
             @ident="SetCharacter",
             @param_list=
              [#<Delphi::Param:0x6259fa
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x624c7a @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x65472e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x623c7e
             @directive=[],
             @ident="SetLeft",
             @param_list=
              [#<Delphi::Param:0x6228ce
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x621a6a @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654722
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6166ee
             @directive=[],
             @ident="SetLine",
             @param_list=
              [#<Delphi::Param:0x61426a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x610922 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654716
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60cbc6
             @directive=[],
             @ident="SetTop",
             @param_list=
              [#<Delphi::Param:0x608f8a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x604cca @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6546fe
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65b016
             @directive=[],
             @ident="SetUnderline",
             @param_list=
              [#<Delphi::Param:0x659e5e
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x657176 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654686
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62ca7a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6536ba
             @ident="Underline",
             @interface=#<Delphi::OrdType:0x635072 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x626a1a
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x62b886 @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626a0e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x629d6e
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x6291e6
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x628346 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626a02
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65a236
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6262ee
             @ident="Character",
             @interface=#<Delphi::OrdType:0x624e42 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a22a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x622bda
             @ident="Left",
             @interface=#<Delphi::OrdType:0x621836 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a212
           @spec=:prop,
           @value=
            #<Delphi::Property:0x614cae
             @ident="Line",
             @interface=#<Delphi::OrdType:0x610076 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x65a1ee
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60975e
             @ident="Top",
             @interface=#<Delphi::OrdType:0x60571a @expr=[["Integer"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x6572ae
      @directive=[],
      @ident="TEditorMark",
      @value=
       #<Delphi::Class:0x6557c6
        @attrs=
         [#<Delphi::ClassAttr:0x625112
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a96e
             @directive=[],
             @ident="SetColor",
             @param_list=
              [#<Delphi::Param:0x629df2
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x628fa6 @expr=[["TColor"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x625106
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627fce
             @directive=[],
             @ident="SetVisible",
             @param_list=
              [#<Delphi::Param:0x627386
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x626102 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6250fa
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6142be
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x6249f2 @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x614276
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x622f5e
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x6223a6
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x6214d6 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61425e
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65950a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x612632
             @ident="Color",
             @interface=#<Delphi::OrdType:0x60dd12 @expr=[["TColor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6594fe
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60768e
             @ident="Visible",
             @interface=#<Delphi::OrdType:0x601f76 @expr=[["Boolean"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x65577e
      @directive=[],
      @ident="TEditorMarks",
      @value=
       #<Delphi::Class:0x654392
        @attrs=
         [#<Delphi::ClassAttr:0x635d6e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x624e4e
             @directive=[],
             @ident="SetEofMark",
             @param_list=
              [#<Delphi::Param:0x62425a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x622aea @expr=[["TEditorMark"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x635b22
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x621a2e
             @directive=[],
             @ident="SetRetMark",
             @param_list=
              [#<Delphi::Param:0x620df2
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x6149ea @expr=[["TEditorMark"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x63597e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60ff32
             @directive=[],
             @ident="SetWrapMark",
             @param_list=
              [#<Delphi::Param:0x60d0ee
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x609812 @expr=[["TEditorMark"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x635936
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x605ea6
             @directive=[],
             @ident="SetHideMark",
             @param_list=
              [#<Delphi::Param:0x602ab6
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x65ac92 @expr=[["TEditorMark"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6358ee
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6595fa
             @directive=[],
             @ident="SetUnderline",
             @param_list=
              [#<Delphi::Param:0x6568fa
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x654122 @expr=[["TEditorMark"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6358a6
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x626f5a
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x63438e @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626f42
           @spec=:method,
           @value=
            #<Delphi::Destructor:0x62d662
             @directive=["override"],
             @ident="Destroy">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626f36
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a2ea
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x6296ea
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x6287c6 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626f2a
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x635606
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6267fe
             @ident="EofMark",
             @interface=#<Delphi::OrdType:0x6250ee @expr=[["TEditorMark"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6355fa
           @spec=:prop,
           @value=
            #<Delphi::Property:0x622dde
             @ident="RetMark",
             @interface=#<Delphi::OrdType:0x621812 @expr=[["TEditorMark"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6355e2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x614516
             @ident="WrapMark",
             @interface=#<Delphi::OrdType:0x60f146 @expr=[["TEditorMark"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6355d6
           @spec=:prop,
           @value=
            #<Delphi::Property:0x608f2a
             @ident="HideMark",
             @interface=#<Delphi::OrdType:0x602132 @expr=[["TEditorMark"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6355ca
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65976e
             @ident="Underline",
             @interface=#<Delphi::OrdType:0x6556fa @expr=[["TEditorMark"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x6311d2
      @directive=[],
      @ident="TEditorViewInfo",
      @value=
       #<Delphi::Class:0x62d2f6
        @attrs=
         [#<Delphi::ClassAttr:0x654fda
           @spec=:method,
           @value=
            #<Delphi::Function:0x628796
             @directive=[],
             @ident="GetBrackets",
             @type=
              #<Delphi::OrdType:0x6270c2
               @expr=[["TEditorBracketCollection"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654fce
           @spec=:method,
           @value=
            #<Delphi::Function:0x625f2e
             @directive=[],
             @ident="GetColors",
             @type=#<Delphi::OrdType:0x624abe @expr=[["TEditorColors"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654fc2
           @spec=:method,
           @value=
            #<Delphi::Function:0x623d32
             @directive=[],
             @ident="GetCommenter",
             @type=#<Delphi::StringType:0x62262e>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654fb6
           @spec=:method,
           @value=
            #<Delphi::Function:0x6215c6
             @directive=[],
             @ident="GetControlCode",
             @type=#<Delphi::OrdType:0x6153c2 @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654faa
           @spec=:method,
           @value=
            #<Delphi::Function:0x611bfa
             @directive=[],
             @ident="GetHexPrefix",
             @type=#<Delphi::StringType:0x60e6f6>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f9e
           @spec=:method,
           @value=
            #<Delphi::Function:0x60ac16
             @directive=[],
             @ident="GetMail",
             @type=#<Delphi::OrdType:0x605c1e @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f92
           @spec=:method,
           @value=
            #<Delphi::Function:0x6021e6
             @directive=[],
             @ident="GetQuotation",
             @type=#<Delphi::StringType:0x65a78e>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f86
           @spec=:method,
           @value=
            #<Delphi::Function:0x65904e
             @directive=[],
             @ident="GetUrl",
             @type=#<Delphi::OrdType:0x65553e @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f7a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x653a9e
             @directive=[],
             @ident="SetBrackets",
             @param_list=
              [#<Delphi::Param:0x6367ca
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0x632fea
                  @expr=[["TEditorBracketCollection"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f6e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62c28e
             @directive=[],
             @ident="SetColors",
             @param_list=
              [#<Delphi::Param:0x62a296
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x629216 @expr=[["TEditorColors"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f62
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62808e
             @directive=[],
             @ident="SetCommenter",
             @param_list=
              [#<Delphi::Param:0x627356
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f56
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62571e
             @directive=[],
             @ident="SetControlCode",
             @param_list=
              [#<Delphi::Param:0x624a16
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x623b2e @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f32
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6221ae
             @directive=[],
             @ident="SetHexPrefix",
             @param_list=
              [#<Delphi::Param:0x6214b2
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f26
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x61338e
             @directive=[],
             @ident="SetMail",
             @param_list=
              [#<Delphi::Param:0x6103fa
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x60cf26 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f0e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6090ce
             @directive=[],
             @ident="SetQuotation",
             @param_list=
              [#<Delphi::Param:0x606476
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654f02
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65ad52
             @directive=[],
             @ident="SetUrl",
             @param_list=
              [#<Delphi::Param:0x659bca
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x6570ce @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x654ef6
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6266c6
           @spec=:method,
           @value=
            #<Delphi::Function:0x633bea
             @directive=["virtual"],
             @ident="CreateEditorFountain",
             @type=#<Delphi::OrdType:0x62b7de @expr=[["TEditorFountain"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6266ba
           @spec=:method,
           @value=
            #<Delphi::Function:0x62955e
             @directive=[],
             @ident="GetOwner",
             @type=#<Delphi::OrdType:0x62803a @expr=[["TPersistent"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6266ae
           @spec=:method,
           @value=nil,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6111aa
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x625ef2 @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61117a
           @spec=:method,
           @value=
            #<Delphi::Destructor:0x624b36
             @directive=["override"],
             @ident="Destroy">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61114a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6226be
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x621a82
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x620a62 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61110e
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6065ae
           @spec=:prop,
           @value=
            #<Delphi::Property:0x610c82
             @ident="EditorFountain",
             @interface=
              #<Delphi::OrdType:0x60b8d6 @expr=[["TEditorFountain"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x659006
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60507e
             @ident="Brackets",
             @interface=
              #<Delphi::OrdType:0x65ac0e
               @expr=[["TEditorBracketCollection"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x658ffa
           @spec=:prop,
           @value=
            #<Delphi::Property:0x656a02
             @ident="Colors",
             @interface=#<Delphi::OrdType:0x653ebe @expr=[["TEditorColors"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x658fee
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6341ae
             @ident="Commenter",
             @interface=#<Delphi::StringType:0x62ead2>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x658fe2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x629846
             @ident="ControlCode",
             @interface=#<Delphi::OrdType:0x62820e @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x658fd6
           @spec=:prop,
           @value=
            #<Delphi::Property:0x626372
             @ident="HexPrefix",
             @interface=#<Delphi::StringType:0x6254d2>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x658fca
           @spec=:prop,
           @value=
            #<Delphi::Property:0x622b0e
             @ident="Mail",
             @interface=#<Delphi::OrdType:0x62152a @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x658fbe
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6134d2
             @ident="Quotation",
             @interface=#<Delphi::StringType:0x60fcaa>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x658fb2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x608102
             @ident="Url",
             @interface=#<Delphi::OrdType:0x6013e2 @expr=[["Boolean"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x65565e
      @directive=[],
      @ident="TEditorRuler",
      @value=
       #<Delphi::Class:0x653f72
        @attrs=
         [#<Delphi::ClassAttr:0x627392
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x621cce
             @directive=[],
             @ident="SetBkColor",
             @param_list=
              [#<Delphi::Param:0x620f42
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x614ea6 @expr=[["TColor"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62737a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6105fe
             @directive=[],
             @ident="SetColor",
             @param_list=
              [#<Delphi::Param:0x60d92e
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x60a11e @expr=[["TColor"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x627362
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x604e1a
             @directive=[],
             @ident="SetEdge",
             @param_list=
              [#<Delphi::Param:0x602036
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x65a932 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62733e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x659036
             @directive=[],
             @ident="SetGaugeRange",
             @param_list=
              [#<Delphi::Param:0x655a2a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x652c52 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62731a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x633e66
             @directive=[],
             @ident="SetMarkColor",
             @param_list=
              [#<Delphi::Param:0x62f3ae
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62c006 @expr=[["TColor"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62730e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a10a
             @directive=[],
             @ident="SetVisible",
             @param_list=
              [#<Delphi::Param:0x6293c6
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62848a @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x627302
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6214e2
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x626a9e @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6214ca
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62565e
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x6249da
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x6230f6 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6214be
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x624476
           @spec=:prop,
           @value=
            #<Delphi::Property:0x620d32
             @ident="BkColor",
             @interface=#<Delphi::OrdType:0x612aa6 @expr=[["TColor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62446a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60c122
             @ident="Color",
             @interface=#<Delphi::OrdType:0x606dca @expr=[["TColor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62445e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65a8ba
             @ident="Edge",
             @interface=#<Delphi::OrdType:0x6570da @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x624452
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6528e6
             @ident="GaugeRange",
             @interface=#<Delphi::OrdType:0x632c12 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x624446
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62b226
             @ident="MarkColor",
             @interface=#<Delphi::OrdType:0x62967e @expr=[["TColor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62442e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6279f2
             @ident="Visible",
             @interface=#<Delphi::OrdType:0x6261fe @expr=[["Boolean"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x62283e
      @directive=[],
      @ident="TEditorShowNumberMode",
      @value=
       #<Delphi::EnumType:0x621f62
        @items=
         [#<Delphi::EnumTypeItem:0x621abe @ident="nmRow">,
          #<Delphi::EnumTypeItem:0x62115e @ident="nmLine">]>>,
     #<Delphi::Type:0x6135b6
      @directive=[],
      @ident="TEditorLeftbar",
      @value=
       #<Delphi::Class:0x6105aa
        @attrs=
         [#<Delphi::ClassAttr:0x62b9e2
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6157a6
             @directive=[],
             @ident="SetBkColor",
             @param_list=
              [#<Delphi::Param:0x6103b2
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x60bd7a @expr=[["TColor"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b9d6
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x606dfa
             @directive=[],
             @ident="SetColor",
             @param_list=
              [#<Delphi::Param:0x602c2a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x65a8c6 @expr=[["TColor"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b9ca
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6588e6
             @directive=[],
             @ident="SetColumn",
             @param_list=
              [#<Delphi::Param:0x65599a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x653e82 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b9b2
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x636002
             @directive=[],
             @ident="SetEdge",
             @param_list=
              [#<Delphi::Param:0x633656
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62d60e @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b99a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62adb2
             @directive=[],
             @ident="SetLeftMargin",
             @param_list=
              [#<Delphi::Param:0x629d9e
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x628d7e @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b976
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627c62
             @directive=[],
             @ident="SetRightMargin",
             @param_list=
              [#<Delphi::Param:0x626d02
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x625c9a @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b952
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x624aee
             @directive=[],
             @ident="SetShowNumber",
             @param_list=
              [#<Delphi::Param:0x623c72
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62242a @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b946
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x621092
             @directive=[],
             @ident="SetShowNumberMode",
             @param_list=
              [#<Delphi::Param:0x614cde
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0x60e5ee
                  @expr=[["TEditorShowNumberMode"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b93a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6093ce
             @directive=[],
             @ident="SetVisible",
             @param_list=
              [#<Delphi::Param:0x604616
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x65aff2 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b92e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x659846
             @directive=[],
             @ident="SetZeroBase",
             @param_list=
              [#<Delphi::Param:0x656a26
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x654aca @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b916
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x64f1a2
             @directive=[],
             @ident="SetZeroLead",
             @param_list=
              [#<Delphi::Param:0x634b26
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62f546 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62b90a
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x6258aa
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x62a7be @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x625892
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62928e
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x6285da
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x627566 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62587a
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62b4ea
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6251c6
             @ident="BkColor",
             @interface=#<Delphi::OrdType:0x623a56 @expr=[["TColor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b4de
           @spec=:prop,
           @value=
            #<Delphi::Property:0x621206
             @ident="Color",
             @interface=#<Delphi::OrdType:0x6125d2 @expr=[["TColor"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b4d2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60883a
             @ident="Column",
             @interface=#<Delphi::OrdType:0x65b196 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b4c6
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6572a2
             @ident="Edge",
             @interface=#<Delphi::OrdType:0x654566 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b4ba
           @spec=:prop,
           @value=
            #<Delphi::Property:0x63510e
             @ident="LeftMargin",
             @interface=#<Delphi::OrdType:0x62d43a @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b4a2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x629c7e
             @ident="RightMargin",
             @interface=#<Delphi::OrdType:0x62841e @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b48a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6263f6
             @ident="ShowNumber",
             @interface=#<Delphi::OrdType:0x6248ae @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b3e2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x622136
             @ident="ShowNumberMode",
             @interface=
              #<Delphi::OrdType:0x6160be @expr=[["TEditorShowNumberMode"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b39a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60c7d6
             @ident="Visible",
             @interface=#<Delphi::OrdType:0x60624e @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b376
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65a91a
             @ident="ZeroBase",
             @interface=#<Delphi::OrdType:0x656f96 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62b36a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x652c46
             @ident="ZeroLead",
             @interface=#<Delphi::OrdType:0x633866 @expr=[["Boolean"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x629a32
      @directive=[],
      @ident="TEditorImagebar",
      @value=
       #<Delphi::Class:0x628d96
        @attrs=
         [#<Delphi::ClassAttr:0x6245ba
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60c1fa
             @directive=[],
             @ident="SetDigitWidth",
             @param_list=
              [#<Delphi::Param:0x60790a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x603d52 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x624596
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65a9c2
             @directive=[],
             @ident="SetLeftMargin",
             @param_list=
              [#<Delphi::Param:0x65958e
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x655bb6 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62458a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x653a02
             @directive=[],
             @ident="SetMarkWidth",
             @param_list=
              [#<Delphi::Param:0x636266
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x632b8e @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62457e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62cc06
             @directive=[],
             @ident="SetRightMargin",
             @param_list=
              [#<Delphi::Param:0x62a81e
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62947a @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x624572
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627a82
             @directive=[],
             @ident="SetVisible",
             @param_list=
              [#<Delphi::Param:0x62689a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x6257d2 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x624566
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x60d676
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x623c96 @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x60d646
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x621f1a
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x621116
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x6149c6 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x60d5fe
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x622166
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60b912
             @ident="DigitWidth",
             @interface=#<Delphi::OrdType:0x6056f6 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62215a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x659e2e
             @ident="LeftMargin",
             @interface=#<Delphi::OrdType:0x655bda @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62214e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x636806
             @ident="MarkWidth",
             @interface=#<Delphi::OrdType:0x630902 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62211e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62a482
             @ident="RightMargin",
             @interface=#<Delphi::OrdType:0x62854a @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x622112
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62616e
             @ident="Visible",
             @interface=#<Delphi::OrdType:0x624986 @expr=[["Boolean"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x620bca
      @directive=[],
      @ident="TEditorSpeedRange",
      @value=#<Delphi::OrdType:0x6118e2 @expr=[["1"], "..", ["4"]]>>,
     #<Delphi::Type:0x60dc82
      @directive=[],
      @ident="TEditorSpeed",
      @value=
       #<Delphi::Class:0x60a1ae
        @attrs=
         [#<Delphi::ClassAttr:0x625c3a
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x62ba1e @directive=[], @ident="Create">,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x625c2e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x629996
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x628b3e
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x627a76 @expr=[["TPersistent"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x625c22
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62cc2a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6254ea
             @ident="CaretVerticalAc",
             @interface=
              #<Delphi::OrdType:0x622f9a @expr=[["TEditorSpeedRange"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62cc1e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x620c06
             @ident="InitBracketsFull",
             @interface=#<Delphi::OrdType:0x610f82 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62cc12
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60742a
             @ident="PageVerticalRange",
             @interface=
              #<Delphi::OrdType:0x65a8a2 @expr=[["TEditorSpeedRange"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x62cbfa
           @spec=:prop,
           @value=
            #<Delphi::Property:0x655616
             @ident="PageVerticalRangeAc",
             @interface=
              #<Delphi::OrdType:0x636536 @expr=[["TEditorSpeedRange"]]>>,
           @visibility=:published>],
        @herit=["TPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x62a476
      @directive=[],
      @ident="TEditor",
      @value=#<Delphi::Class:0x629726 @attrs=[], @visibility="published">>,
     #<Delphi::Type:0x6284ae
      @directive=[],
      @ident="TEditorScreenStrings",
      @value=#<Delphi::Class:0x6278ae @attrs=[], @visibility="published">>,
     #<Delphi::Type:0x6264ce
      @directive=[],
      @ident="TEditorAttributeArray",
      @value=
       #<Delphi::Class:0x625442
        @attrs=
         [#<Delphi::ClassAttr:0x630962
           @spec=:method,
           @value=
            #<Delphi::Function:0x65abc6
             @directive=[],
             @ident="GetSize",
             @type=#<Delphi::OrdType:0x65739e @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630896
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x655592
             @directive=[],
             @ident="SetPosition",
             @param_list=
              [#<Delphi::Param:0x653852
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x63576e @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630866
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x65b0ee
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x62d4be
             @directive=[],
             @ident="Create",
             @param_list=
              [#<Delphi::Param:0x62a8a2
                @ident_list=["Source", "Attributes"],
                @type="String">]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65b09a
           @spec=:method,
           @value=#<Delphi::Procedure:0x62811e @directive=[], @ident="Next">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65b06a
           @spec=:method,
           @value=
            #<Delphi::Function:0x62677a
             @directive=[],
             @ident="NextPositionString",
             @type=#<Delphi::StringType:0x624c3e>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65b05e
           @spec=:method,
           @value=
            #<Delphi::Function:0x6229b2
             @directive=[],
             @ident="PositionString",
             @type=#<Delphi::StringType:0x62185a>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65b052
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x615e42
             @directive=[],
             @ident="NewData",
             @param_list=
              [#<Delphi::Param:0x6111ce
                @ident_list=["Source", "Attributes"],
                @type="String">]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65b03a
           @spec=:method,
           @value=#<Delphi::Procedure:0x6076be @directive=[], @ident="Prior">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x65b022
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x625412
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65aec6
             @ident="Attribute",
             @interface=#<Delphi::OrdType:0x658766 @expr=[["Char"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x625406
           @spec=:prop,
           @value=
            #<Delphi::Property:0x655046
             @ident="Position",
             @interface=#<Delphi::OrdType:0x63622a @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6253fa
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62cb6a
             @ident="SourcePos",
             @interface=#<Delphi::OrdType:0x629cf6 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6253ee
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6287de
             @ident="Size",
             @interface=#<Delphi::OrdType:0x626f1e @expr=[["Integer"]]>>,
           @visibility=:public>],
        @herit=["TObject"],
        @visibility="public">>,
     #<Delphi::Type:0x62326a
      @directive=[],
      @ident="TEditorRowAttribute",
      @value=#<Delphi::OrdType:0x621e42 @expr=[["TRowAttribute"]]>>,
     #<Delphi::Type:0x620cba
      @directive=[],
      @ident="TEditorStringList",
      @value=
       #<Delphi::Class:0x614b22
        @attrs=[],
        @herit=["TRowAttributeStringList"],
        @visibility="published">>,
     #<Delphi::Type:0x60cd76
      @directive=[],
      @ident="TEditorDrawInfo",
      @value=
       [#<Delphi::FieldList:0x609152
         @field_decl_list=
          [#<Delphi::Field:0x608e8e
            @ident_list=["Start", "Delete", "Insert", "Invalid"],
            @type=#<Delphi::OrdType:0x65a782 @expr=[["Integer"]]>>,
           #<Delphi::Field:0x65994e
            @ident_list=["NeedUpdate"],
            @type=#<Delphi::OrdType:0x655f16 @expr=[["Boolean"]]>>]>]>,
     #<Delphi::Type:0x6519da
      @directive=[],
      @ident="TEditorUndoObj",
      @value=#<Delphi::Class:0x63516e @attrs=[], @visibility="published">>,
     #<Delphi::Type:0x62f19e
      @directive=[],
      @ident="TEditorWrapOption",
      @value=#<Delphi::Class:0x62c4e6 @attrs=[], @visibility="published">>,
     #<Delphi::Type:0x62a122
      @directive=[],
      @ident="TEditorScreenStrings",
      @value=
       #<Delphi::Class:0x62931e
        @attrs=
         [#<Delphi::ClassAttr:0x653d56
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6032de
             @directive=[],
             @ident="ChangeLink",
             @param_list=
              [#<Delphi::Param:0x65ad5e
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0x659612 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653d4a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x655772
             @directive=[],
             @ident="ChangeList",
             @param_list=
              [#<Delphi::Param:0x653b6a
                @ident_list=["Index", "DeleteCount"],
                @type=#<Delphi::OrdType:0x633c92 @expr=[["Integer"]]>>,
               #<Delphi::Param:0x631a1e
                @ident_list=["List"],
                @type=
                 #<Delphi::OrdType:0x62c0f6 @expr=[["TEditorStringList"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653d3e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6298b2
             @directive=[],
             @ident="CheckCrlf",
             @param_list=
              [#<Delphi::Param:0x62838e
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x626c06 @expr=[["Integer"]]>>,
               #<Delphi::Param:0x626042 @ident_list=["S"], @type="String">]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653d32
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x623f66
             @directive=[],
             @ident="ClientsAdjustRow">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653d26
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x621c56
             @directive=[],
             @ident="ClientsCleanSelection">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653d0e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x614a32
             @directive=[],
             @ident="ClientsInitCol">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653c72
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60e102
             @directive=[],
             @ident="ClientsInitView">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653c5a
           @spec=:method,
           @value=
            #<Delphi::Function:0x6080d2
             @directive=[],
             @ident="GetActiveClient",
             @type=#<Delphi::OrdType:0x601e86 @expr=[["TEditor"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653ada
           @spec=:method,
           @value=
            #<Delphi::Function:0x659fd2
             @directive=[],
             @ident="GetClient",
             @type=#<Delphi::OrdType:0x655df6 @expr=[["TEditor"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653aaa
           @spec=:method,
           @value=
            #<Delphi::Function:0x65418e
             @directive=["virtual"],
             @ident="CreateUndoObj",
             @type=#<Delphi::OrdType:0x634f6a @expr=[["TEditorUndoObj"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a86
           @spec=:method,
           @value=
            #<Delphi::Function:0x62d206
             @directive=["virtual"],
             @ident="CreateWrapOption",
             @type=#<Delphi::OrdType:0x629732 @expr=[["TEditorWrapOption"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a7a
           @spec=:method,
           @value=
            #<Delphi::Function:0x6274ee
             @directive=[],
             @ident="DeleteList",
             @param_list=
              [#<Delphi::Param:0x62641a
                @ident_list=["Index", "DeleteCount"],
                @type=#<Delphi::OrdType:0x624806 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0x622d1e @expr=[["TRowMarks"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a56
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x621cc2 @directive=[], @ident="InitBrackets">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a4a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x615362
             @directive=[],
             @ident="InsertList",
             @param_list=
              [#<Delphi::Param:0x611342
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x60d0be @expr=[["Integer"]]>>,
               #<Delphi::Param:0x60b5ca
                @ident_list=["List"],
                @type=
                 #<Delphi::OrdType:0x606302 @expr=[["TEditorStringList"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a3e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65b292
             @directive=[],
             @ident="ListInfo",
             @param_list=
              [#<Delphi::Param:0x659d26
                @ident_list=["Index", "TargetCount"],
                @type=#<Delphi::OrdType:0x6555c2 @expr=[["Integer"]]>>,
               #<Delphi::Param:0x653e9a @ident_list=["S"], @type="String">,
               #<Delphi::Param:0x63468e
                @ident_list=["TakenRowCount"],
                @type=#<Delphi::OrdType:0x62dd8e @expr=[["Integer"]]>>,
               #<Delphi::Param:0x62b9fa
                @ident_list=["RowAttribute"],
                @type=
                 #<Delphi::OrdType:0x62914a
                  @expr=[["TEditorRowAttribute"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a32
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6276da
             @directive=[],
             @ident="Reference",
             @param_list=
              [#<Delphi::Param:0x626582
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x625346 @expr=[["TEditor"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a26
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x623db6
             @directive=[],
             @ident="Release",
             @param_list=
              [#<Delphi::Param:0x622706
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62143a @expr=[["TEditor"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a1a
           @spec=:method,
           @value=
            #<Delphi::Function:0x6146ae
             @directive=[],
             @ident="RowEnd",
             @param_list=
              [#<Delphi::Param:0x61065e
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x60c542 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0x60835a @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653a0e
           @spec=:method,
           @value=
            #<Delphi::Function:0x604772
             @directive=[],
             @ident="RowStart",
             @param_list=
              [#<Delphi::Param:0x65af02
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x65967e @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0x655922 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6539f6
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x653a62
             @directive=["override"],
             @ident="SetUpdateState",
             @param_list=
              [#<Delphi::Param:0x6359de
                @ident_list=["Updating"],
                @type=#<Delphi::OrdType:0x6312b6 @expr=[["Boolean"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6539ea
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a596
             @directive=[],
             @ident="SetWordWrap",
             @param_list=
              [#<Delphi::Param:0x628c6a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62748e @expr=[["Boolean"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6539d2
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x625d12 @directive=[], @ident="StretchLines">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6539c6
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62418e
             @directive=["virtual"],
             @ident="StrToWrapList",
             @param_list=
              [#<Delphi::Param:0x62254a @ident_list=["S"], @type="String">,
               #<Delphi::Param:0x62119a
                @ident_list=["List"],
                @type=
                 #<Delphi::OrdType:0x613fca @expr=[["TEditorStringList"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6538b2
           @spec=:method,
           @value=
            #<Delphi::Function:0x60be0a
             @directive=[],
             @ident="UpdateBrackets",
             @param_list=
              [#<Delphi::Param:0x607fee
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x603032 @expr=[["Integer"]]>>,
               #<Delphi::Param:0x60130a
                @ident_list=["InvalidateFlag"],
                @type=#<Delphi::OrdType:0x659936 @expr=[["Boolean"]]>>],
             @type=#<Delphi::OrdType:0x655c46 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653882
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x653f2a
             @directive=[],
             @ident="UpdateDrawInfo",
             @param_list=
              [#<Delphi::Param:0x6361ee
                @ident_list=
                 ["Index", "DeleteCount", "InsertCount", "InvalidCount"],
                @type=#<Delphi::OrdType:0x62a752 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x65386a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6287ea
             @directive=[],
             @ident="UpdateList",
             @param_list=
              [#<Delphi::Param:0x62727e
                @ident_list=["Index", "DeleteCount"],
                @type=#<Delphi::OrdType:0x625496 @expr=[["Integer"]]>>,
               #<Delphi::Param:0x6247ca @ident_list=["S"], @type="String">]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x65383a
           @spec=:method,
           @value=
            #<Delphi::Function:0x621d22
             @directive=["virtual"],
             @ident="WrapCount",
             @param_list=
              [#<Delphi::Param:0x620d56 @ident_list=["S"], @type="String">],
             @type=#<Delphi::OrdType:0x61006a @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653822
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6077f6 @directive=[], @ident="WrapLines">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x653816
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x601cca
             @directive=[],
             @ident="WrapOptionChanged",
             @param_list=
              [#<Delphi::Param:0x659cc6
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0x65625e @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6537fe
           @spec=:method,
           @value=nil,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6227f6
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6535a6
             @ident="ActiveClient",
             @interface=#<Delphi::OrdType:0x6328ca @expr=[["TEditor"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6227de
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62c1e6
             @ident="Client",
             @interface=#<Delphi::OrdType:0x628e02 @expr=[["TEditor"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6227c6
           @spec=:prop,
           @value=
            #<Delphi::Property:0x627182
             @ident="WordWrap",
             @interface=#<Delphi::OrdType:0x625526 @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x6168b6
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x621e36 @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x616862
           @spec=:method,
           @value=
            #<Delphi::Destructor:0x615e96
             @directive=["override"],
             @ident="Destroy">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x616856
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60d2fe
             @directive=["override"],
             @ident="Clear">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61683e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60516e
             @directive=["virtual"],
             @ident="ExcludeRowMarks",
             @param_list=
              [#<Delphi::Param:0x65aea2
                @ident_list=["Marks"],
                @type=#<Delphi::OrdType:0x659456 @expr=[["TRowMarks"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x616826
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x653f96
             @directive=["virtual"],
             @ident="IncludeRowMarks",
             @param_list=
              [#<Delphi::Param:0x6357ce
                @ident_list=["Marks"],
                @type=#<Delphi::OrdType:0x62fdaa @expr=[["TRowMarks"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61681a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a266
             @directive=["virtual"],
             @ident="Redo">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61680e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6274e2
             @directive=["virtual"],
             @ident="Undo">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6167f6
           @spec=:method,
           @value=
            #<Delphi::Function:0x624d52
             @directive=["virtual"],
             @ident="ValidRowMarks",
             @type=#<Delphi::OrdType:0x62272a @expr=[["TRowMarks"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6167ea
           @spec=:method,
           @value=nil,
           @visibility=:public>],
        @herit=["TEditorStringList"],
        @visibility="public">>,
     #<Delphi::Type:0x610e6e
      @directive=[],
      @ident="TEditorStrings",
      @value=
       #<Delphi::Class:0x60daba
        @attrs=
         [#<Delphi::ClassAttr:0x62fd32
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x607bf2
             @directive=[],
             @ident="ReadData",
             @param_list=
              [#<Delphi::Param:0x6038ea
                @ident_list=["Reader"],
                @type=#<Delphi::OrdType:0x65a512 @expr=[["TReader"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62fcf6
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65665a
             @directive=[],
             @ident="WriteData",
             @param_list=
              [#<Delphi::Param:0x654a0a
                @ident_list=["Writer"],
                @type=#<Delphi::OrdType:0x6361fa @expr=[["TWriter"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x62fc42
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x64e4ee
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627992
             @directive=["override"],
             @ident="DefineProperties",
             @param_list=
              [#<Delphi::Param:0x6265fa
                @ident_list=["Filer"],
                @type=#<Delphi::OrdType:0x62523e @expr=[["TFiler"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64e3c2
           @spec=:method,
           @value=
            #<Delphi::Function:0x6229d6
             @directive=["override"],
             @ident="Get",
             @param_list=
              [#<Delphi::Param:0x621a16
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x616196 @expr=[["Integer"]]>>],
             @type=#<Delphi::StringType:0x612d82>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64e36e
           @spec=:method,
           @value=
            #<Delphi::Function:0x60795e
             @directive=["override"],
             @ident="GetCount",
             @type=#<Delphi::OrdType:0x65ae96 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64e2c6
           @spec=:method,
           @value=
            #<Delphi::Function:0x656cea
             @directive=["override"],
             @ident="GetTextStr",
             @type=#<Delphi::StringType:0x65460e>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64d432
           @spec=:method,
           @value=
            #<Delphi::Function:0x632f12
             @directive=[],
             @ident="LinesToRow",
             @param_list=
              [#<Delphi::Param:0x62cb2e
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x62a302 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0x628dea @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64d3de
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627bba
             @directive=["override"],
             @ident="Put",
             @param_list=
              [#<Delphi::Param:0x626a32
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x62557a @expr=[["Integer"]]>>,
               #<Delphi::Param:0x62482a @ident_list=["S"], @type="String">]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64cf16
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x620fae
             @directive=["override"],
             @ident="SetTextStr",
             @param_list=
              [#<Delphi::Param:0x612bc6
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64ccb2
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60391a
             @directive=["override"],
             @ident="SetUpdateState",
             @param_list=
              [#<Delphi::Param:0x65a0da
                @ident_list=["Updating"],
                @type=#<Delphi::OrdType:0x656c5a @expr=[["Boolean"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x64cc3a
           @spec=:method,
           @value=nil,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x626ba6
           @spec=:method,
           @value=
            #<Delphi::Function:0x635492
             @directive=["override"],
             @ident="Add",
             @param_list=
              [#<Delphi::Param:0x62eb56 @ident_list=["S"], @type="String">],
             @type=#<Delphi::OrdType:0x62991e @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626b9a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627b66
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x62683a
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x625286 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626b8e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x622976
             @directive=["override"],
             @ident="Clear">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626b76
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x614c96
             @directive=["override"],
             @ident="Delete",
             @param_list=
              [#<Delphi::Param:0x60fff2
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x60a0be @expr=[["Integer"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626b6a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65b106
             @directive=["override"],
             @ident="Insert",
             @param_list=
              [#<Delphi::Param:0x6598b2
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x65596a @expr=[["Integer"]]>>,
               #<Delphi::Param:0x6541ee @ident_list=["S"], @type="String">]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626b3a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62c6f6
             @directive=["override"],
             @ident="LoadFromFile",
             @param_list=
              [#<Delphi::Param:0x629c06
                @ident_list=["FileName"],
                @type="String">]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626b2e
           @spec=:method,
           @value=nil,
           @visibility=:public>],
        @herit=["TStrings"],
        @visibility="public">>,
     #<Delphi::Type:0x625382
      @directive=[],
      @ident="PUndoData",
      @value="TUndoData">,
     #<Delphi::Type:0x62248a
      @directive=[],
      @ident="TUndoData",
      @value=
       [#<Delphi::FieldList:0x620fa2
         @field_decl_list=
          [#<Delphi::Field:0x620efa
            @ident_list=["Row", "Col", "DataRow", "DeleteCount"],
            @type=#<Delphi::OrdType:0x60949a @expr=[["Integer"]]>>,
           #<Delphi::Field:0x6063b6
            @ident_list=["RowAttribute"],
            @type=#<Delphi::OrdType:0x65b2ce @expr=[["TEditorRowAttribute"]]>>,
           #<Delphi::Field:0x65a37a
            @ident_list=["InsertStr"],
            @type=#<Delphi::StringType:0x6592ee>>]>]>,
     #<Delphi::Type:0x65046e
      @directive=[],
      @ident="TUndoDataList",
      @value=
       #<Delphi::Class:0x63405e
        @attrs=
         [#<Delphi::ClassAttr:0x6163a6
           @spec=:method,
           @value=
            #<Delphi::Destructor:0x62c1f2
             @directive=["override"],
             @ident="Destroy">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x61639a
           @spec=:method,
           @value=#<Delphi::Procedure:0x628b4a @directive=[], @ident="Clear">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x616382
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x625a1e
             @directive=[],
             @ident="Delete",
             @param_list=
              [#<Delphi::Param:0x624a82
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x622b6e @expr=[["Integer"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x616376
           @spec=:method,
           @value=nil,
           @visibility=:public>],
        @herit=["TList"],
        @visibility="public">>,
     #<Delphi::Type:0x61027a
      @directive=[],
      @ident="TEditorUndoObj",
      @value=
       #<Delphi::Class:0x60ccaa
        @attrs=
         [#<Delphi::ClassAttr:0x62a16a
           @spec=:method,
           @value=
            #<Delphi::Function:0x628bf2
             @directive=["virtual"],
             @ident="Add",
             @type=#<Delphi::OrdType:0x6271d6 @expr=[["PUndoData"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x62a15e
           @spec=:method,
           @value=
            #<Delphi::Function:0x625202
             @directive=["virtual"],
             @ident="CanRedo",
             @type=#<Delphi::OrdType:0x622e1a @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x62a152
           @spec=:method,
           @value=
            #<Delphi::Function:0x621032
             @directive=["virtual"],
             @ident="CanUndo",
             @type=#<Delphi::OrdType:0x61185e @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x62a12e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x607d36
             @directive=["virtual"],
             @ident="Redo">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x62a116
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65a3f2
             @directive=["virtual"],
             @ident="Undo">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x62a0f2
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6545d2
             @directive=["virtual"],
             @ident="UndoToRedo",
             @param_list=
              [#<Delphi::Param:0x6361be
                @ident_list=["Data"],
                @type=#<Delphi::OrdType:0x63064a @expr=[["PUndoData"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x62a0e6
           @spec=:method,
           @value=nil,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0x62208e
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x6295ca @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x622082
           @spec=:method,
           @value=
            #<Delphi::Destructor:0x627a16
             @directive=["override"],
             @ident="Destroy">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x622076
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x624fc2
             @directive=["virtual"],
             @ident="Clear">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62206a
           @spec=:method,
           @value=nil,
           @visibility=:public>],
        @herit=["TObject"],
        @visibility="public">>,
     #<Delphi::Type:0x6161f6
      @directive=[],
      @ident="TEditorWrapOption",
      @value=
       #<Delphi::Class:0x611efa
        @attrs=
         [#<Delphi::ClassAttr:0x6314a2
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6116a2
             @directive=[],
             @ident="SetFollowPunctuation",
             @param_list=
              [#<Delphi::Param:0x60c512
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x6063f2 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x63111e
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65af26
             @directive=[],
             @ident="SetFollowRetMark",
             @param_list=
              [#<Delphi::Param:0x659486
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x65550e @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x631082
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6363c2
             @directive=[],
             @ident="SetFollowStr",
             @param_list=
              [#<Delphi::Param:0x6321f2
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630fe6
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a03e
             @directive=[],
             @ident="SetLeading",
             @param_list=
              [#<Delphi::Param:0x628e4a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x627a46 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630f02
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x625eb6
             @directive=[],
             @ident="SetLeadStr",
             @param_list=
              [#<Delphi::Param:0x624c9e
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630e12
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x621caa
             @directive=[],
             @ident="SetPunctuationStr",
             @param_list=
              [#<Delphi::Param:0x615ff2
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630db2
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x609d6a
             @directive=[],
             @ident="SetWordBreak",
             @param_list=
              [#<Delphi::Param:0x605a32
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x6017ae @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630c4a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6592a6
             @directive=[],
             @ident="SetWrapByte",
             @param_list=
              [#<Delphi::Param:0x6555aa
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x64e63e @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x630bea
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0x624e72
           @spec=:method,
           @value=
            #<Delphi::Constructor:0x62d36e @directive=[], @ident="Create">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x624e5a
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x629d02
             @directive=["override"],
             @ident="Assign",
             @param_list=
              [#<Delphi::Param:0x628aa2
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0x627602 @expr=[["TPersistent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x624e36
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x629f4e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6243e6
             @ident="FollowRetMark",
             @interface=#<Delphi::OrdType:0x621a9a @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x629f42
           @spec=:prop,
           @value=
            #<Delphi::Property:0x60da7e
             @ident="FollowPunctuation",
             @interface=#<Delphi::OrdType:0x601fbe @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x629f36
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6559be
             @ident="FollowStr",
             @interface=#<Delphi::StringType:0x652bc2>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x629f2a
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62c222
             @ident="Leading",
             @interface=#<Delphi::OrdType:0x62922e @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x629f1e
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6268ee
             @ident="LeadStr",
             @interface=#<Delphi::StringType:0x62535e>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x629f12
           @spec=:prop,
           @value=
            #<Delphi::Property:0x62173a
             @ident="PunctuationStr",
             @interface=#<Delphi::StringType:0x613f0a>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x629f06
           @spec=:prop,
           @value=
            #<Delphi::Property:0x605eb2
             @ident="WordBreak",
             @interface=#<Delphi::OrdType:0x65a6ce @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x629efa
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6543f2
             @ident="WrapByte",
             @interface=#<Delphi::OrdType:0x632ada @expr=[["Integer"]]>>,
           @visibility=:published>],
        @herit=["TNotifyPersistent"],
        @visibility="published">>,
     #<Delphi::Type:0x6283fa
      @directive=[],
      @ident="TEditorPopupMenu",
      @value=
       #<Delphi::Class:0x627506
        @attrs=
         [#<Delphi::ClassAttr:0xac32cc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6525f2
             @directive=["virtual"],
             @ident="SetMarkClick",
             @param_list=
              [#<Delphi::Param:0x633c56
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0x62cbe2 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac32c0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6290ae
             @directive=["virtual"],
             @ident="GotoMarkClick",
             @param_list=
              [#<Delphi::Param:0x62722a
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0x624f4a @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac32b4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6222da
             @directive=["virtual"],
             @ident="UndoClick",
             @param_list=
              [#<Delphi::Param:0x620f1e
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0x612cb6 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac32a8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60ad06
             @directive=["virtual"],
             @ident="RedoClick",
             @param_list=
              [#<Delphi::Param:0x60687e
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xadcf04 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac329c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xadb9b0
             @directive=["virtual"],
             @ident="CutClick",
             @param_list=
              [#<Delphi::Param:0xadaec4
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xada1b0 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac3290
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad8c5c
             @directive=["virtual"],
             @ident="CopyClick",
             @param_list=
              [#<Delphi::Param:0xad814c
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xad7438 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac3284
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad5ee4
             @directive=["virtual"],
             @ident="PasteClick",
             @param_list=
              [#<Delphi::Param:0xad53b0
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xad469c @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac3278
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad3148
             @directive=["virtual"],
             @ident="BoxPasteClick",
             @param_list=
              [#<Delphi::Param:0xad25a8
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xad1894 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac326c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad0340
             @directive=["virtual"],
             @ident="DeleteClick",
             @param_list=
              [#<Delphi::Param:0xacf7e8
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xacead4 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac3260
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacd580
             @directive=["virtual"],
             @ident="SelAllClick",
             @param_list=
              [#<Delphi::Param:0xacca28
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xacbd14 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac3254
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaca7c0
             @directive=["virtual"],
             @ident="SelModeClick",
             @param_list=
              [#<Delphi::Param:0xac9c44
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xac8f30 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac3248
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac79dc
             @directive=["virtual"],
             @ident="SetMenu",
             @param_list=
              [#<Delphi::Param:0xac6f14
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xac6200 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac323c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac4cac
             @directive=["virtual"],
             @ident="CreateMenuItem">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac3230
           @spec=:method,
           @value=nil,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xac0038
           @spec=:method,
           @value=
            #<Delphi::Constructor:0xac2b94
             @directive=["override"],
             @ident="Create",
             @param_list=
              [#<Delphi::Param:0xac20fc
                @ident_list=["AOwner"],
                @type=#<Delphi::OrdType:0xac137c @expr=[["TComponent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xac002c
           @spec=:method,
           @value=nil,
           @visibility=:public>],
        @herit=["TPopupMenu"],
        @visibility="public">>,
     #<Delphi::Type:0xabf138
      @directive=[],
      @ident="TEditorScreen",
      @value=
       #<Delphi::Class:0xabe778
        @attrs=
         [#<Delphi::ClassAttr:0xaba5fc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabbe50
             @directive=["virtual"],
             @ident="Update">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xaba5f0
           @spec=:method,
           @value=nil,
           @visibility=:protected>],
        @herit=["TObject"],
        @visibility="protected">>,
     #<Delphi::Type:0xab96d8
      @directive=[],
      @ident="TEditorStrInfo",
      @value=
       [#<Delphi::FieldList:0xab8a00
         @field_decl_list=
          [#<Delphi::Field:0xab8994
            @ident_list=["Line", "CharIndex"],
            @type=#<Delphi::OrdType:0xab759c @expr=[["Integer"]]>>]>]>,
     #<Delphi::Type:0xab5ec8
      @directive=[],
      @ident="TSelectedPosition",
      @value=
       [#<Delphi::FieldList:0xab5238
         @field_decl_list=
          [#<Delphi::Field:0xab51cc
            @ident_list=["Sr", "Er", "Sc", "Ec"],
            @type=#<Delphi::OrdType:0xab3318 @expr=[["Integer"]]>>]>]>,
     #<Delphi::Type:0xab1c8c
      @directive=[],
      @ident="TEditorHitStyle",
      @value=
       #<Delphi::EnumType:0xab1554
        @items=
         [#<Delphi::EnumTypeItem:0xab114c @ident="hsSelect">,
          #<Delphi::EnumTypeItem:0xab0ab0 @ident="hsDraw">,
          #<Delphi::EnumTypeItem:0xab03f0 @ident="hsCaret">]>>,
     #<Delphi::Type:0xaaf1b4
      @directive=[],
      @ident="TEditorSelectionState",
      @value=
       #<Delphi::EnumType:0xaaea7c
        @items=
         [#<Delphi::EnumTypeItem:0xaae698 @ident="sstNone">,
          #<Delphi::EnumTypeItem:0xaadfd8 @ident="sstInit">,
          #<Delphi::EnumTypeItem:0xaad888 @ident="sstSelected">,
          #<Delphi::EnumTypeItem:0xaad0cc @ident="sstHitSelected">]>>,
     #<Delphi::Type:0xaabeb4
      @directive=[],
      @ident="TEditorSelectionMode",
      @value=
       #<Delphi::EnumType:0xaab77c
        @items=
         [#<Delphi::EnumTypeItem:0xaab3bc @ident="smLine">,
          #<Delphi::EnumTypeItem:0xaaad44 @ident="smBox">]>>,
     #<Delphi::Type:0xaa9b50
      @directive=[],
      @ident="TEditorSelDragState",
      @value=
       #<Delphi::EnumType:0xaa9418
        @items=
         [#<Delphi::EnumTypeItem:0xaa9058 @ident="sdNone">,
          #<Delphi::EnumTypeItem:0xaa89bc @ident="sdInit">,
          #<Delphi::EnumTypeItem:0xaa8290 @ident="sdDragging">]>>,
     #<Delphi::Type:0xaa700c
      @directive=[],
      @ident="TEditorMouseCursorState",
      @value=
       #<Delphi::EnumType:0xaa68d4
        @items=
         [#<Delphi::EnumTypeItem:0xaa64cc @ident="mcClient">,
          #<Delphi::EnumTypeItem:0xaa5d58 @ident="mcLeftMargin">,
          #<Delphi::EnumTypeItem:0xaa5608 @ident="mcTopMargin">,
          #<Delphi::EnumTypeItem:0xaa4ee8 @ident="mcInSel">,
          #<Delphi::EnumTypeItem:0xaa47bc @ident="mcDragging">,
          #<Delphi::EnumTypeItem:0xaa4000 @ident="mcDraggingCopy">]>>,
     #<Delphi::Type:0xaa2ec0
      @directive=[],
      @ident="TDrawLineEvent",
      @value=
       #<Delphi::ProcedureType:0xaa2644
        @directive=[],
        @param_list=
         [#<Delphi::Param:0xaa1f00
           @ident_list=["Sender"],
           @type=#<Delphi::OrdType:0xaa11ec @expr=[["TObject"]]>>,
          #<Delphi::Param:0xaa0b74 @ident_list=["LineStr"], @type="String">,
          #<Delphi::Param:0xa9fe60
           @ident_list=["X", "Y", "Index"],
           @type=#<Delphi::OrdType:0xa9e534 @expr=[["Integer"]]>>,
          #<Delphi::Param:0xa9df04
           @ident_list=["ARect"],
           @type=#<Delphi::OrdType:0xa9d244 @expr=[["TRect"]]>>,
          #<Delphi::Param:0xa9cba8
           @ident_list=["Selected"],
           @type=#<Delphi::OrdType:0xa9bea0 @expr=[["Boolean"]]>>]>>,
     #<Delphi::Type:0xa9a244
      @directive=[],
      @ident="TSelectionChangeEvent",
      @value=
       #<Delphi::ProcedureType:0xa999c8
        @directive=[],
        @param_list=
         [#<Delphi::Param:0xa99284
           @ident_list=["Sender"],
           @type=#<Delphi::OrdType:0xa98570 @expr=[["TObject"]]>>,
          #<Delphi::Param:0xa97ed4
           @ident_list=["Selected"],
           @type=#<Delphi::OrdType:0xa971cc @expr=[["Boolean"]]>>]>>,
     #<Delphi::Type:0xa95768
      @directive=[],
      @ident="TEditor",
      @value=
       #<Delphi::Class:0xa94da8
        @attrs=
         [#<Delphi::ClassAttr:0xab13e0
           @spec=:method,
           @value=
            #<Delphi::Function:0xad712c
             @directive=[],
             @ident="GetHitSelected",
             @type=#<Delphi::OrdType:0xad5ed8 @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab13d4
           @spec=:method,
           @value=
            #<Delphi::Function:0xad529c
             @directive=[],
             @ident="GetListBracket",
             @param_list=
              [#<Delphi::Param:0xad46cc
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xad3988 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xad2c2c @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab13c8
           @spec=:method,
           @value=
            #<Delphi::Function:0xad1ff0
             @directive=[],
             @ident="GetListCount",
             @type=#<Delphi::OrdType:0xad0dc0 @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab13bc
           @spec=:method,
           @value=
            #<Delphi::Function:0xad01cc
             @directive=[],
             @ident="GetListData",
             @param_list=
              [#<Delphi::Param:0xacf644
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xace8f4 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xacda24 @expr=[["TRowAttributeData"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab13b0
           @spec=:method,
           @value=
            #<Delphi::Function:0xacce0c
             @directive=[],
             @ident="GetListDataString",
             @param_list=
              [#<Delphi::Param:0xacc1a0
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xacb45c @expr=[["Integer"]]>>],
             @type=#<Delphi::StringType:0xacac34>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab13a4
           @spec=:method,
           @value=
            #<Delphi::Function:0xac9d70
             @directive=[],
             @ident="GetListElement",
             @param_list=
              [#<Delphi::Param:0xac917c
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xac8438 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xac76dc @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1398
           @spec=:method,
           @value=
            #<Delphi::Function:0xac6aac
             @directive=[],
             @ident="GetListRemain",
             @param_list=
              [#<Delphi::Param:0xac5ef4
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xac51bc @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xac4454 @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab138c
           @spec=:method,
           @value=
            #<Delphi::Function:0xac3830
             @directive=[],
             @ident="GetListRowMarks",
             @param_list=
              [#<Delphi::Param:0xac2bc4
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xac1e50 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xac1088 @expr=[["TRowMarks"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1380
           @spec=:method,
           @value=
            #<Delphi::Function:0xac047c
             @directive=[],
             @ident="GetListPrevRow",
             @param_list=
              [#<Delphi::Param:0xabf8b8
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xabeb80 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xabdd1c @expr=[["TRowAttribute"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1374
           @spec=:method,
           @value=
            #<Delphi::Function:0xabd128
             @directive=[],
             @ident="GetListPrevToken",
             @param_list=
              [#<Delphi::Param:0xabc540
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xabb808 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xabab0c @expr=[["Char"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1368
           @spec=:method,
           @value=
            #<Delphi::Function:0xab9f00
             @directive=[],
             @ident="GetListRow",
             @param_list=
              [#<Delphi::Param:0xab93cc
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xab8664 @expr=[["Integer"]]>>],
             @type=
              #<Delphi::OrdType:0xab7728 @expr=[["TEditorRowAttribute"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1350
           @spec=:method,
           @value=
            #<Delphi::Function:0xab6b34
             @directive=[],
             @ident="GetListString",
             @param_list=
              [#<Delphi::Param:0xab5f94
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xab525c @expr=[["Integer"]]>>],
             @type=#<Delphi::StringType:0xab49e0>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1344
           @spec=:method,
           @value=
            #<Delphi::Function:0xab3b28
             @directive=[],
             @ident="GetListToken",
             @param_list=
              [#<Delphi::Param:0xab2f94
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xab2268 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xab1578 @expr=[["Char"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab132c
           @spec=:method,
           @value=
            #<Delphi::Function:0xab0930
             @directive=[],
             @ident="GetListWrappedByte",
             @param_list=
              [#<Delphi::Param:0xaafcdc
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xaaef98 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xaae218 @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1320
           @spec=:method,
           @value=
            #<Delphi::Function:0xaad5e8
             @directive=[],
             @ident="GetReserveWordList",
             @type=#<Delphi::OrdType:0xaac25c @expr=[["TStringList"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1314
           @spec=:method,
           @value=
            #<Delphi::Function:0xaab650
             @directive=[],
             @ident="GetRowHeight",
             @type=#<Delphi::OrdType:0xaaa42c @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1308
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa9814
             @directive=[],
             @ident="GetSelected",
             @type=#<Delphi::OrdType:0xaa85fc @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12fc
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa79f0
             @directive=[],
             @ident="GetSelectedData",
             @type=#<Delphi::OrdType:0xaa6760 @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12f0
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa5b30
             @directive=[],
             @ident="GetSelectedDraw",
             @type=#<Delphi::OrdType:0xaa4894 @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12e4
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa3c70
             @directive=[],
             @ident="GetSelDragging",
             @type=#<Delphi::OrdType:0xaa2a1c @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12d8
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa1dec
             @directive=[],
             @ident="GetSelLength",
             @type=#<Delphi::OrdType:0xaa0bbc @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12cc
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9ff98
             @directive=[],
             @ident="GetSelStart",
             @type=#<Delphi::OrdType:0xa9ed8c @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12c0
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9e150
             @directive=[],
             @ident="GetSelText",
             @type=#<Delphi::StringType:0xa9d490>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12b4
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9c5c0
             @directive=[],
             @ident="GetUndoListMax",
             @type=#<Delphi::OrdType:0xa9b36c @expr=[["Integer"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab12a8
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9a760
             @directive=[],
             @ident="GetUndoObj",
             @type=#<Delphi::OrdType:0xa99488 @expr=[["TEditorUndoObj"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab129c
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9884c
             @directive=[],
             @ident="GetWordWrap",
             @type=#<Delphi::OrdType:0xa97628 @expr=[["Boolean"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1290
           @spec=:method,
           @value=
            #<Delphi::Function:0xa96a28
             @directive=[],
             @ident="GetWrapOption",
             @type=#<Delphi::OrdType:0xa954d4 @expr=[["TEditorWrapOption"]]>>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1284
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa9434c
             @directive=[],
             @ident="SetBorderStyle",
             @param_list=
              [#<Delphi::Param:0xa93320
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa92558 @expr=[["TBorderStyle"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1278
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa91688
             @directive=[],
             @ident="SetCaret",
             @param_list=
              [#<Delphi::Param:0xa90bc0
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa8fdf8 @expr=[["TEditorCaret"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab126c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8ef28
             @directive=[],
             @ident="SetCol",
             @param_list=
              [#<Delphi::Param:0xa8e4a8
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa8d794 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1260
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8c8c4
             @directive=[],
             @ident="SetCursorState",
             @param_list=
              [#<Delphi::Param:0xa8bd24
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0xa8add0
                  @expr=[["TEditorMouseCursorState"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1254
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa89f00
             @directive=[],
             @ident="SetFountain",
             @param_list=
              [#<Delphi::Param:0xa893cc
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa88670 @expr=[["TFountain"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1248
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa877a0
             @directive=[],
             @ident="SetHitSelLength",
             @param_list=
              [#<Delphi::Param:0xa86bdc
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa85ec8 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab123c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa84ff8
             @directive=[],
             @ident="SetHitStyle",
             @param_list=
              [#<Delphi::Param:0xa844c4
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0xa83690 @expr=[["TEditorHitStyle"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1230
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa827c0
             @directive=[],
             @ident="SetImagebar",
             @param_list=
              [#<Delphi::Param:0xa81c8c
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0xa80e58 @expr=[["TEditorImagebar"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1224
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7ff88
             @directive=[],
             @ident="SetImageDigits",
             @param_list=
              [#<Delphi::Param:0xa7f3e8
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa7e668 @expr=[["TImageList"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1218
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7d798
             @directive=[],
             @ident="SetImageMarks",
             @param_list=
              [#<Delphi::Param:0xa7cc1c
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa7be9c @expr=[["TImageList"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab120c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7afcc
             @directive=[],
             @ident="SetLines",
             @param_list=
              [#<Delphi::Param:0xa7a504
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa797cc @expr=[["TStrings"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1200
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa788fc
             @directive=[],
             @ident="SetListRowMarks",
             @param_list=
              [#<Delphi::Param:0xa77d38
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xa77024 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xa769f4
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa75ca4 @expr=[["TRowMarks"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab11f4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa74dd4
             @directive=[],
             @ident="SetMarks",
             @param_list=
              [#<Delphi::Param:0xa7430c
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa73544 @expr=[["TEditorMarks"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab11e8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa72674
             @directive=[],
             @ident="SetMargin",
             @param_list=
              [#<Delphi::Param:0xa71b88
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa70d9c @expr=[["TEditorMargin"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab11dc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6fecc
             @directive=[],
             @ident="SetLeftbar",
             @param_list=
              [#<Delphi::Param:0xa6f3bc
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0xa6e5ac @expr=[["TEditorLeftbar"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab11d0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6d6dc
             @directive=[],
             @ident="SetOverWrite",
             @param_list=
              [#<Delphi::Param:0xa6cb84
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa6be70 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab11c4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6afa0
             @directive=[],
             @ident="SetReadOnly",
             @param_list=
              [#<Delphi::Param:0xa6a46c
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xa69758 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab11b8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa68888
             @directive=[],
             @ident="SetReserveWordList",
             @param_list=
              [#<Delphi::Param:0x65ad0a
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x65730e @expr=[["TStringList"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab11ac
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6541d6
             @directive=[],
             @ident="SetRow",
             @param_list=
              [#<Delphi::Param:0x635756
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x62ebb6 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1194
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a5d2
             @directive=[],
             @ident="SetRuler",
             @param_list=
              [#<Delphi::Param:0x62919e
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x627aee @expr=[["TEditorRuler"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab117c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x625d2a
             @directive=[],
             @ident="SetScrollBars",
             @param_list=
              [#<Delphi::Param:0x62499e
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0x622a4e @expr=[["TScrollStyle"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1170
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x620f5a
             @directive=[],
             @ident="SetSelectionMode",
             @param_list=
              [#<Delphi::Param:0x613466
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0x60d082
                  @expr=[["TEditorSelectionMode"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1164
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x606776
             @directive=[],
             @ident="SetSelLength",
             @param_list=
              [#<Delphi::Param:0x601e92
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xadc6a0 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1158
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xadb7b8
             @directive=[],
             @ident="SetSelStart",
             @param_list=
              [#<Delphi::Param:0xadac30
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xad9ee0 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1140
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad8fec
             @directive=[],
             @ident="SetSelText",
             @param_list=
              [#<Delphi::Param:0xad80bc
                @ident_list=["Value"],
                @type="String">]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1134
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad6748
             @directive=[],
             @ident="SetSpeed",
             @param_list=
              [#<Delphi::Param:0xad5c38
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xad4dec @expr=[["TEditorSpeed"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1128
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad3e74
             @directive=[],
             @ident="SetTopCol",
             @param_list=
              [#<Delphi::Param:0xad334c
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xad25c0 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab111c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad166c
             @directive=[],
             @ident="SetTopRow",
             @param_list=
              [#<Delphi::Param:0xad0b20
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xacfdc4 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1110
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacee28
             @directive=[],
             @ident="SetUndoListMax",
             @param_list=
              [#<Delphi::Param:0xace240
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xacd4d8 @expr=[["Integer"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1104
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacc578
             @directive=[],
             @ident="SetView",
             @param_list=
              [#<Delphi::Param:0xacba50
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0xacabc8 @expr=[["TEditorViewInfo"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab10ec
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac9ca4
             @directive=[],
             @ident="SetWordWrap",
             @param_list=
              [#<Delphi::Param:0xac90c8
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xac8348 @expr=[["Boolean"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab10e0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac7418
             @directive=[],
             @ident="SetWrapOption",
             @param_list=
              [#<Delphi::Param:0xac6830
                @ident_list=["Value"],
                @type=
                 #<Delphi::OrdType:0xac590c @expr=[["TEditorWrapOption"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab10d4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac4760
             @directive=[],
             @ident="CMColorChanged",
             @param_list=
              [#<Delphi::Param:0xac3818
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xac2984 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab10c8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac0d58
             @directive=[],
             @ident="CMCtl3DChanged",
             @param_list=
              [#<Delphi::Param:0xabfe1c
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xabeff4 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab10bc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabd434
             @directive=[],
             @ident="CMFontChanged",
             @param_list=
              [#<Delphi::Param:0xabc51c
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xabb730 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab10b0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab9b7c
             @directive=[],
             @ident="EMCanUndo",
             @param_list=
              [#<Delphi::Param:0xab8ce8
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xab7ec0 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab10a4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab639c
             @directive=[],
             @ident="EMCharFromPos",
             @param_list=
              [#<Delphi::Param:0xab546c
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xab4650 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1098
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab2a90
             @directive=[],
             @ident="EMEmptyUndoBuffer",
             @param_list=
              [#<Delphi::Param:0xab1ac4
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xab0ccc @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab108c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaaf040
             @directive=[],
             @ident="EMGetFirstVisibleLine",
             @param_list=
              [#<Delphi::Param:0xaadfc0
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xaad1e0 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1080
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaab4f4
             @directive=[],
             @ident="EMGetLine",
             @param_list=
              [#<Delphi::Param:0xaaa648
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xaa9874 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1074
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa7d20
             @directive=[],
             @ident="EMGetLineCount",
             @param_list=
              [#<Delphi::Param:0xaa6de4
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xaa5fe0 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1068
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa43d8
             @directive=[],
             @ident="EMGetModify",
             @param_list=
              [#<Delphi::Param:0xaa34fc
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xaa271c @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab105c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa0b50
             @directive=[],
             @ident="EMGetSel",
             @param_list=
              [#<Delphi::Param:0xa9fcec
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa9eee8 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1050
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa9d3ac
             @directive=[],
             @ident="EMLineFromChar",
             @param_list=
              [#<Delphi::Param:0xa9c434
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa9b63c @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1044
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa99a94
             @directive=[],
             @ident="EMLineIndex",
             @param_list=
              [#<Delphi::Param:0xa98b88
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa97d78 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1038
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa961c4
             @directive=[],
             @ident="EMLineLength",
             @param_list=
              [#<Delphi::Param:0xa94d54
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa93ce0 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab102c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa91fb8
             @directive=[],
             @ident="EMPosFromChar",
             @param_list=
              [#<Delphi::Param:0xa910d0
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa902f0 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1020
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8e79c
             @directive=[],
             @ident="EMReplaceSel",
             @param_list=
              [#<Delphi::Param:0xa8d8a8
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa8cb04 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1014
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8afa4
             @directive=[],
             @ident="EMScrollCaret",
             @param_list=
              [#<Delphi::Param:0xa8a0d4
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa892e8 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab1008
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa877ac
             @directive=[],
             @ident="EMSetModiry",
             @param_list=
              [#<Delphi::Param:0xa868dc
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa85b14 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0ffc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa83ffc
             @directive=[],
             @ident="EMSetReadOnly",
             @param_list=
              [#<Delphi::Param:0xa83108
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa82358 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0ff0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa807e0
             @directive=[],
             @ident="EMUndo",
             @param_list=
              [#<Delphi::Param:0xa7fa00
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa7ec14 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0fe4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7d1c8
             @directive=[],
             @ident="EMSetSel",
             @param_list=
              [#<Delphi::Param:0xa7c370
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa7b5c0 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0fd8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa79ae4
             @directive=[],
             @ident="WMChar",
             @param_list=
              [#<Delphi::Param:0xa78d10
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa77f78 @expr=[["TWMChar"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0fcc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa763c4
             @directive=[],
             @ident="WMClear",
             @param_list=
              [#<Delphi::Param:0xa755b4
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa747f8 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0fc0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa72d64
             @directive=[],
             @ident="WMCopy",
             @param_list=
              [#<Delphi::Param:0xa71f6c
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa71180 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0fb4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6f740
             @directive=[],
             @ident="WMCut",
             @param_list=
              [#<Delphi::Param:0xa6e948
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa6dba4 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0fa8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6c140
             @directive=[],
             @ident="WMPaste",
             @param_list=
              [#<Delphi::Param:0xa6b348
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xa6a580 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f9c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa68af8
             @directive=[],
             @ident="WMGetDlgCode",
             @param_list=
              [#<Delphi::Param:0x65acb6
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0x657122 @expr=[["TWMGetDlgCode"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f90
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x634bb6
             @directive=[],
             @ident="WMGetText",
             @param_list=
              [#<Delphi::Param:0x62cd86
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0x629f96 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f84
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627002
             @directive=[],
             @ident="WMGetTextLength",
             @param_list=
              [#<Delphi::Param:0x62536a
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0x623ac2 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f78
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x615632
             @directive=[],
             @ident="WMHScroll",
             @param_list=
              [#<Delphi::Param:0x60dcee
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0x608492 @expr=[["TWMHScroll"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f6c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xadc244
             @directive=[],
             @ident="WMImeComposition",
             @param_list=
              [#<Delphi::Param:0xadb368
                @ident_list=["Msg"],
                @type=#<Delphi::OrdType:0xada510 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f60
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad88b4
             @directive=[],
             @ident="WMImeNotify",
             @param_list=
              [#<Delphi::Param:0xad79d8
                @ident_list=["Msg"],
                @type=#<Delphi::OrdType:0xad6ae4 @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f54
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad4ec4
             @directive=[],
             @ident="WMKeyDown",
             @param_list=
              [#<Delphi::Param:0xad3fdc
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xad3154 @expr=[["TWMKeyDown"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f48
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad15ac
             @directive=[],
             @ident="WMKeyUp",
             @param_list=
              [#<Delphi::Param:0xad070c
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xacf8d8 @expr=[["TWMKeyUp"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f3c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacdd30
             @directive=[],
             @ident="WMKillFocus",
             @param_list=
              [#<Delphi::Param:0xacced8
                @ident_list=["Msg"],
                @type=#<Delphi::OrdType:0xacbfc0 @expr=[["TWMKillFocus"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f30
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaca40c
             @directive=[],
             @ident="WMLButtonDown",
             @param_list=
              [#<Delphi::Param:0xac947c
                @ident_list=["Message"],
                @type=
                 #<Delphi::OrdType:0xac8510 @expr=[["TWMLButtonDown"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f24
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac68fc
             @directive=[],
             @ident="WMLButtonUp",
             @param_list=
              [#<Delphi::Param:0xac599c
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xac4b08 @expr=[["TWMLButtonUp"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f18
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac2e7c
             @directive=[],
             @ident="WMMouseMove",
             @param_list=
              [#<Delphi::Param:0xac1f28
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xac107c @expr=[["TWMMouseMove"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f0c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabf474
             @directive=[],
             @ident="WMSetFocus",
             @param_list=
              [#<Delphi::Param:0xabe64c
                @ident_list=["Msg"],
                @type=#<Delphi::OrdType:0xabd7d0 @expr=[["TWMSetFocus"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0f00
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabbc28
             @directive=[],
             @ident="WMSetText",
             @param_list=
              [#<Delphi::Param:0xabad64
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xab9f9c @expr=[["TMessage"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0ef4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab8394
             @directive=[],
             @ident="WMSize",
             @param_list=
              [#<Delphi::Param:0xab75cc
                @ident_list=["Msg"],
                @type=#<Delphi::OrdType:0xab6834 @expr=[["TWMSize"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0edc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab4ca4
             @directive=[],
             @ident="WMVScroll",
             @param_list=
              [#<Delphi::Param:0xab3e04
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xab2fa0 @expr=[["TWMVScroll"]]>>]>,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xab0ed0
           @spec=:method,
           @value=nil,
           @visibility=:private>,
          #<Delphi::ClassAttr:0xa8b1fc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62aa6a
             @directive=["virtual"],
             @ident="AdjustImagebarWidth">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b1f0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627a6a
             @directive=["virtual"],
             @ident="CreateMarginBitmaps">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b1e4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62467a
             @directive=["virtual"],
             @ident="DestroyMarginBitmaps">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b1d8
           @spec=:method,
           @value=
            #<Delphi::Function:0x620d1a
             @directive=["virtual"],
             @ident="AdjustLeftbarColumn",
             @type=#<Delphi::OrdType:0x60db0e @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b1cc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6064ee
             @directive=["virtual"],
             @ident="AdjustLeftbarWidth">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b1c0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xadc364
             @directive=["virtual"],
             @ident="AdjustRulerHeight">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b1b4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xada750
             @directive=["virtual"],
             @ident="DrawRulerBases">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b1a8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad8c50
             @directive=["virtual"],
             @ident="DrawRulerMark",
             @param_list=
              [#<Delphi::Param:0xad8038
                @ident_list=["ACol"],
                @type=#<Delphi::OrdType:0xad7288 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b19c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad5c08
             @directive=["virtual"],
             @ident="HideRulerMark",
             @param_list=
              [#<Delphi::Param:0xad5008
                @ident_list=["ACol"],
                @type=#<Delphi::OrdType:0xad421c @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b190
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad2b24
             @directive=["virtual"],
             @ident="InitLeftbarEdge">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b184
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad0f4c
             @directive=["virtual"],
             @ident="InitOriginBase">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b178
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacf344
             @directive=["virtual"],
             @ident="InitRulerBases">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b16c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacd778
             @directive=["virtual"],
             @ident="InitRulerBitmaps">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b160
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacbb1c
             @directive=["virtual"],
             @ident="InitRulerDigitMask">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b154
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac9f2c
             @directive=["virtual"],
             @ident="InitRulerDigits">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b148
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac8288
             @directive=["virtual"],
             @ident="InitRulerEdge">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b13c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac6728
             @directive=["virtual"],
             @ident="InitRulerGauge">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b130
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac4b38
             @directive=["virtual"],
             @ident="InvalidateLeftbar",
             @param_list=
              [#<Delphi::Param:0xac3e18
                @ident_list=["StartRow", "EndRow"],
                @type=#<Delphi::OrdType:0xac28b8 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b124
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac11fc
             @directive=["virtual"],
             @ident="PaintLeftbar",
             @param_list=
              [#<Delphi::Param:0xac06a4
                @ident_list=["Sr", "Er"],
                @type=#<Delphi::OrdType:0xabf288 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b118
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabdbd8
             @directive=["virtual"],
             @ident="PaintRuler">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b10c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabc144
             @directive=[],
             @ident="PaintImagebar",
             @param_list=
              [#<Delphi::Param:0xabb574
                @ident_list=["Sr", "Er"],
                @type=#<Delphi::OrdType:0xaba194 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b100
           @spec=:method,
           @value=
            #<Delphi::Function:0xab9204
             @directive=["virtual"],
             @ident="RulerWidth",
             @type=#<Delphi::OrdType:0xab7f44 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b0e8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab6bb8
             @directive=["virtual"],
             @ident="UpdateLeftBarWidth",
             @param_list=
              [#<Delphi::Param:0xab5e5c
                @ident_list=["OldWidth", "NewWidth"],
                @type=#<Delphi::OrdType:0xab4944 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b0dc
           @spec=:method,
           @value=
            #<Delphi::Function:0xab306c
             @directive=[],
             @ident="ExpandListLength",
             @param_list=
              [#<Delphi::Param:0xab23e8
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xab1614 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xab009c @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b0d0
           @spec=:method,
           @value=
            #<Delphi::Function:0xaaf424
             @directive=[],
             @ident="ExpandListStr",
             @param_list=
              [#<Delphi::Param:0xaae83c
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xaada74 @expr=[["Integer"]]>>],
             @type=#<Delphi::StringType:0xaad1d4>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b0c4
           @spec=:method,
           @value=
            #<Delphi::Function:0xaac2c8
             @directive=["virtual"],
             @ident="ListInfoFromPos",
             @param_list=
              [#<Delphi::Param:0xaab704
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xaaa960 @expr=[["TPoint"]]>>,
               #<Delphi::Param:0xaa9fe8
                @ident_list=["Info"],
                @type=#<Delphi::OrdType:0xaa90f4 @expr=[["TEditorStrInfo"]]>>],
             @type=#<Delphi::OrdType:0xaa832c @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b0b8
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa7018
             @directive=[],
             @ident="ListRows",
             @param_list=
              [#<Delphi::Param:0xaa646c
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xaa56ec @expr=[["Integer"]]>>],
             @type=
              #<Delphi::OrdType:0xaa4744 @expr=[["TEditorRowAttribute"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b0ac
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa3af0
             @directive=[],
             @ident="ListStr",
             @param_list=
              [#<Delphi::Param:0xaa2fc8
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xaa2224 @expr=[["Integer"]]>>],
             @type=#<Delphi::StringType:0xaa19b4>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b0a0
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa0a60
             @directive=[],
             @ident="ListToStr",
             @param_list=
              [#<Delphi::Param:0xa9fef0
                @ident_list=["Source"],
                @type=
                 #<Delphi::OrdType:0xa9ef78 @expr=[["TEditorStringList"]]>>],
             @type=#<Delphi::StringType:0xa9e6fc>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b094
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9d7f0
             @directive=["virtual"],
             @ident="PosTokenString",
             @param_list=
              [#<Delphi::Param:0xa9cc2c
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa9be7c @expr=[["TPoint"]]>>,
               #<Delphi::Param:0xa9b7c8
                @ident_list=["Editor"],
                @type=#<Delphi::OrdType:0xa9aa78 @expr=[["TEditor"]]>>,
               #<Delphi::Param:0xa9a1b4
                @ident_list=["C"],
                @type=#<Delphi::OrdType:0xa9941c @expr=[["Char"]]>>,
               #<Delphi::Param:0xa98d68
                @ident_list=["Bracket"],
                @type=#<Delphi::OrdType:0xa97f88 @expr=[["Boolean"]]>>],
             @type=#<Delphi::StringType:0xa976f4>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b088
           @spec=:method,
           @value=
            #<Delphi::Function:0xa96134
             @directive=[],
             @ident="PrevTopSpace",
             @param_list=
              [#<Delphi::Param:0xa9539c
                @ident_list=["ARow"],
                @type=#<Delphi::OrdType:0xa942f8 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa932a8 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b07c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa922c4
             @directive=[],
             @ident="PutStringToLine",
             @param_list=
              [#<Delphi::Param:0xa916a0
                @ident_list=["Source"],
                @type="String">]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b070
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8fab0
             @directive=["virtual"],
             @ident="SelectPosToken",
             @param_list=
              [#<Delphi::Param:0xa8ef4c
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa8e1cc @expr=[["TPoint"]]>>,
               #<Delphi::Param:0xa8db3c
                @ident_list=["Editor"],
                @type=#<Delphi::OrdType:0xa8cdbc @expr=[["TEditor"]]>>,
               #<Delphi::Param:0xa8c72c
                @ident_list=["Bracket"],
                @type=#<Delphi::OrdType:0xa8b9d0 @expr=[["Boolean"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b064
           @spec=:method,
           @value=
            #<Delphi::Function:0xa8a410
             @directive=[],
             @ident="StrToAttributes",
             @param_list=
              [#<Delphi::Param:0xa894f8 @ident_list=["S"], @type="String">],
             @type=#<Delphi::StringType:0xa88340>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b058
           @spec=:method,
           @value=
            #<Delphi::Function:0xa871dc
             @directive=[],
             @ident="TabbedTopSpace",
             @param_list=
              [#<Delphi::Param:0xa862c4 @ident_list=["S"], @type="String">],
             @type=#<Delphi::OrdType:0xa84bfc @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b040
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa839f0
             @directive=[],
             @ident="AdjustColCount">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b034
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa81fc8
             @directive=["virtual"],
             @ident="DoScroll",
             @param_list=
              [#<Delphi::Param:0xa81554
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa8021c @expr=[["Integer"]]>>,
               #<Delphi::Param:0xa7fbf8
                @ident_list=["Rect", "ClipRect"],
                @type=#<Delphi::OrdType:0xa7e794 @expr=[["PRect"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b028
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7d1f8
             @directive=["virtual"],
             @ident="DrawEof",
             @param_list=
              [#<Delphi::Param:0xa7c778
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa7b3f8 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b01c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa79e20
             @directive=["virtual"],
             @ident="DrawRetMark",
             @param_list=
              [#<Delphi::Param:0xa79328
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa77fc0 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b010
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa769c4
             @directive=["virtual"],
             @ident="DrawRetMarkSelected",
             @param_list=
              [#<Delphi::Param:0xa75da0
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa74a38 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8b004
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa73454
             @directive=["virtual"],
             @ident="DrawWrapMark",
             @param_list=
              [#<Delphi::Param:0xa7295c
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa715b8 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aff8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa70010
             @directive=["virtual"],
             @ident="DrawWrapMarkSelected",
             @param_list=
              [#<Delphi::Param:0xa6f3b0
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa6e024 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8afec
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6ca58
             @directive=["virtual"],
             @ident="DrawHideMark",
             @param_list=
              [#<Delphi::Param:0xa6bf48
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa6abe0 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8afe0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa695e4
             @directive=["virtual"],
             @ident="DrawHideMarkSelected",
             @param_list=
              [#<Delphi::Param:0xa689d8
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0x659d3e @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8afd4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6543c2
             @directive=["virtual"],
             @ident="DrawUnderline",
             @param_list=
              [#<Delphi::Param:0x635612
                @ident_list=["ARow"],
                @type=#<Delphi::OrdType:0x62d5d2 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8afc8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62934e
             @directive=["virtual"],
             @ident="HideUnderline",
             @param_list=
              [#<Delphi::Param:0x627f0e
                @ident_list=["ARow"],
                @type=#<Delphi::OrdType:0x626516 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8afbc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x623d3e @directive=[], @ident="InitDrawInfo">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8afb0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x620a32 @directive=[], @ident="InitScroll">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af98
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60caa6 @directive=[], @ident="InitView">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af8c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60183e
             @directive=[],
             @ident="InvalidateLine",
             @param_list=
              [#<Delphi::Param:0xadc6b8
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xadb920 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af80
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xada480
             @directive=[],
             @ident="InvalidateRow",
             @param_list=
              [#<Delphi::Param:0xad9808
                @ident_list=["StartRow", "EndRow"],
                @type=#<Delphi::OrdType:0xad83c8 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af74
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad7120
             @directive=[],
             @ident="ImagebarScroll",
             @param_list=
              [#<Delphi::Param:0xad64fc
                @ident_list=["Line", "Count"],
                @type=#<Delphi::OrdType:0xad5020 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af68
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad3af0
             @directive=[],
             @ident="LineScroll",
             @param_list=
              [#<Delphi::Param:0xad2f20
                @ident_list=["Line", "Count"],
                @type=#<Delphi::OrdType:0xad1a74 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af5c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad0580
             @directive=[],
             @ident="PageVScroll",
             @param_list=
              [#<Delphi::Param:0xacf95c
                @ident_list=["Value"],
                @type=#<Delphi::OrdType:0xaceb4c @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af50
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacd790
             @directive=[],
             @ident="PaintLine",
             @param_list=
              [#<Delphi::Param:0xaccc80
                @ident_list=["R"],
                @type=#<Delphi::OrdType:0xacbe64 @expr=[["TRect"]]>>,
               #<Delphi::Param:0xacb84c
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xaca4c0 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xac9ac4 @ident_list=["S"], @type="String">,
               #<Delphi::Param:0xac8c30
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xac7e14 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xac776c
                @ident_list=["Parser"],
                @type=
                 #<Delphi::OrdType:0xac683c @expr=[["TFountainParser"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af44
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac57c8
             @directive=[],
             @ident="PaintLineSelected",
             @param_list=
              [#<Delphi::Param:0xac4bd4
                @ident_list=["R"],
                @type=#<Delphi::OrdType:0xac3e0c @expr=[["TRect"]]>>,
               #<Delphi::Param:0xac380c
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xac1f04 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xac1928 @ident_list=["S"], @type="String">,
               #<Delphi::Param:0xac0ae8
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xabfccc @expr=[["Integer"]]>>,
               #<Delphi::Param:0xabf5c4
                @ident_list=["Parser"],
                @type=
                 #<Delphi::OrdType:0xabe6ac @expr=[["TFountainParser"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af38
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabd6e0
             @directive=[],
             @ident="PaintRect",
             @param_list=
              [#<Delphi::Param:0xabcc00
                @ident_list=["R"],
                @type=#<Delphi::OrdType:0xabbe80 @expr=[["TRect"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af2c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaba9c8
             @directive=[],
             @ident="PaintRectSelected",
             @param_list=
              [#<Delphi::Param:0xab9d80
                @ident_list=["R"],
                @type=#<Delphi::OrdType:0xab9000 @expr=[["TRect"]]>>,
               #<Delphi::Param:0xab89b8
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xab6f9c @expr=[["Integer"]]>>,
               #<Delphi::Param:0xab69c0 @ident_list=["S"], @type="String">,
               #<Delphi::Param:0xab5b5c
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xab4d04 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xab462c
                @ident_list=["Parser"],
                @type=
                 #<Delphi::OrdType:0xab3720 @expr=[["TFountainParser"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af20
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab276c
             @directive=["virtual"],
             @ident="UnderlineBeginUpdate">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af14
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xab02a0
             @directive=["virtual"],
             @ident="UnderlineEndUpdate">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8af08
           @spec=:method,
           @value=
            #<Delphi::Function:0xaae62c
             @directive=["virtual"],
             @ident="UnderlinePos",
             @param_list=
              [#<Delphi::Param:0xaada50
                @ident_list=["ARow"],
                @type=#<Delphi::OrdType:0xaacc88 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xaabec0 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aefc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaaa66c
             @directive=[],
             @ident="AdjustCol",
             @param_list=
              [#<Delphi::Param:0xaa9a00
                @ident_list=["RowChanged"],
                @type=#<Delphi::OrdType:0xaa8c38 @expr=[["Boolean"]]>>,
               #<Delphi::Param:0xaa84f4
                @ident_list=["Direction"],
                @type=#<Delphi::OrdType:0xaa7744 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aef0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa64d8
             @directive=["virtual"],
             @ident="CaretBeginUpdate">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aee4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa48a0
             @directive=["virtual"],
             @ident="CaretEndUpdate">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aed8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa2ca4
             @directive=["virtual"],
             @ident="CaretHide">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aecc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa11f8
             @directive=["virtual"],
             @ident="CaretShow">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aec0
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9f6a4
             @directive=[],
             @ident="FindNextWordStart",
             @param_list=
              [#<Delphi::Param:0xa9e750
                @ident_list=["R", "C"],
                @type=#<Delphi::OrdType:0xa9d340 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xa9cbfc
                @ident_list=["Direction"],
                @type=#<Delphi::OrdType:0xa9bdec @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa9aff4 @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aeb4
           @spec=:method,
           @value=
            #<Delphi::Function:0xa99f20
             @directive=[],
             @ident="GetSelIndex",
             @param_list=
              [#<Delphi::Param:0xa9929c
                @ident_list=["StartRow", "ARow", "ACol"],
                @type=#<Delphi::OrdType:0xa9776c @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa969a4 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aea8
           @spec=:method,
           @value=
            #<Delphi::Function:0xa95d20
             @directive=["virtual"],
             @ident="IsCaretNoClient",
             @type=#<Delphi::OrdType:0xa944b4 @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae9c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa92ec4
             @directive=["virtual"],
             @ident="MoveCaret">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae90
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa90f20
             @directive=["virtual"],
             @ident="RecreateCaret">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae84
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8f42c
             @directive=["virtual"],
             @ident="ScrollCaret">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae78
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8d350
             @directive=["virtual"],
             @ident="SetCaretPosition",
             @param_list=
              [#<Delphi::Param:0xa8c450
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa8b04c @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae6c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa89a2c
             @directive=[],
             @ident="SetImeComposition">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae60
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa88028
             @directive=[],
             @ident="SetSelIndex",
             @param_list=
              [#<Delphi::Param:0xa87440
                @ident_list=["StartRow", "SelIndex"],
                @type=#<Delphi::OrdType:0xa85f10 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae54
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa84fa4
             @directive=["virtual"],
             @ident="UpdateCaret">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae48
           @spec=:method,
           @value=
            #<Delphi::Function:0xa80aec
             @directive=[],
             @ident="BoxLeftIndex",
             @param_list=
              [#<Delphi::Param:0xa7fbb0 @ident_list=["Attr"], @type="String">,
               #<Delphi::Param:0xa7edb8
                @ident_list=["I"],
                @type=#<Delphi::OrdType:0xa7e014 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa7d294 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae3c
           @spec=:method,
           @value=
            #<Delphi::Function:0xa7c31c
             @directive=[],
             @ident="BoxRightIndex",
             @param_list=
              [#<Delphi::Param:0xa7b3bc @ident_list=["Attr"], @type="String">,
               #<Delphi::Param:0xa7a648
                @ident_list=["I"],
                @type=#<Delphi::OrdType:0xa7988c @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa78a88 @expr=[["Integer"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae30
           @spec=:method,
           @value=
            #<Delphi::Function:0xa77b58
             @directive=[],
             @ident="BoxSelRect",
             @param_list=
              [#<Delphi::Param:0xa76d24 @ident_list=["S"], @type="String">,
               #<Delphi::Param:0xa75ec0
                @ident_list=["Index", "StartCol", "EndCol"],
                @type=#<Delphi::OrdType:0xa74300 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa735bc @expr=[["TRect"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae24
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7271c
             @directive=[],
             @ident="DeleteSelection">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae18
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa70ef8
             @directive=[],
             @ident="DrawSelection">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae0c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6f884
             @directive=[],
             @ident="DrawSelectionBox">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ae00
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6e12c
             @directive=[],
             @ident="DrawSelectionLine">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8adf4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6ca64
             @directive=[],
             @ident="InitSelection">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ade8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa6b294
             @directive=[],
             @ident="SelDeletedList",
             @param_list=
              [#<Delphi::Param:0xa6a670
                @ident_list=["Dest"],
                @type=
                 #<Delphi::OrdType:0xa69770 @expr=[["TEditorStringList"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8addc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa68564 @directive=[], @ident="SetSelection">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8adc4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6569ea
             @directive=[],
             @ident="StartSelection">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8adb8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6355be
             @directive=[],
             @ident="UpdateSelection">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8adac
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x62a566
             @directive=[],
             @ident="StartRowSelection",
             @param_list=
              [#<Delphi::Param:0x628dc6
                @ident_list=["ARow"],
                @type=#<Delphi::OrdType:0x627746 @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ada0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x6254ba
             @directive=[],
             @ident="UpdateRowSelection",
             @param_list=
              [#<Delphi::Param:0x623d62
                @ident_list=["ARow"],
                @type=#<Delphi::OrdType:0x621eba @expr=[["Integer"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad94
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x612b1e @directive=[], @ident="EndSelDrag">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad88
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60ae62 @directive=[], @ident="InitSelDrag">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad7c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x60333e @directive=[], @ident="StartSelDrag">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad70
           @spec=:method,
           @value=
            #<Delphi::Function:0xadc01c
             @directive=["virtual"],
             @ident="GetActiveFountain",
             @type=#<Delphi::OrdType:0xadaba0 @expr=[["TFountain"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad64
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad9514
             @directive=["override"],
             @ident="CreateParams",
             @param_list=
              [#<Delphi::Param:0xad85cc
                @ident_list=["Params"],
                @type=#<Delphi::OrdType:0xad7600 @expr=[["TCreateParams"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad58
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad5e9c
             @directive=["override"],
             @ident="CreateHandle">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad4c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad3a30
             @directive=["override"],
             @ident="DefaultHandler",
             @param_list=[#<Delphi::Param:0xad29bc @ident_list=["Message"]>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad40
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad0c58
             @directive=["override"],
             @ident="Loaded">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad34
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacf038
             @directive=["override"],
             @ident="Notification",
             @param_list=
              [#<Delphi::Param:0xace33c
                @ident_list=["AComponent"],
                @type=#<Delphi::OrdType:0xacd4a8 @expr=[["TComponent"]]>>,
               #<Delphi::Param:0xaccd34
                @ident_list=["Operation"],
                @type=#<Delphi::OrdType:0xacbe10 @expr=[["TOperation"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad28
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaca6a0
             @directive=["override"],
             @ident="Paint">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad1c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac8a80
             @directive=["override"],
             @ident="WndProc",
             @param_list=
              [#<Delphi::Param:0xac7b74
                @ident_list=["Message"],
                @type=#<Delphi::OrdType:0xac6cb0 @expr=[["TMessage"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad10
           @spec=:method,
           @value=
            #<Delphi::Function:0xac5258
             @directive=["virtual"],
             @ident="CreateDelimiters",
             @type=#<Delphi::OrdType:0xac3de8 @expr=[["TCharSet"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ad04
           @spec=:method,
           @value=
            #<Delphi::Function:0xac2924
             @directive=["virtual"],
             @ident="CreateEditorCaret",
             @type=#<Delphi::OrdType:0xac13dc @expr=[["TEditorCaret"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8acf8
           @spec=:method,
           @value=
            #<Delphi::Function:0xabffc0
             @directive=["virtual"],
             @ident="CreateEditorImagebar",
             @type=#<Delphi::OrdType:0xabe988 @expr=[["TEditorImagebar"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8acec
           @spec=:method,
           @value=
            #<Delphi::Function:0xabd5b4
             @directive=["virtual"],
             @ident="CreateEditorLeftbar",
             @type=#<Delphi::OrdType:0xabc060 @expr=[["TEditorLeftbar"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ace0
           @spec=:method,
           @value=
            #<Delphi::Function:0xabac20
             @directive=["virtual"],
             @ident="CreateEditorMarks",
             @type=#<Delphi::OrdType:0xab9744 @expr=[["TEditorMarks"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8acd4
           @spec=:method,
           @value=
            #<Delphi::Function:0xab82a4
             @directive=["virtual"],
             @ident="CreateEditorMargin",
             @type=#<Delphi::OrdType:0xab6d98 @expr=[["TEditorMargin"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8acc8
           @spec=:method,
           @value=
            #<Delphi::Function:0xab5964
             @directive=["virtual"],
             @ident="CreateEditorRuler",
             @type=#<Delphi::OrdType:0xab43f8 @expr=[["TEditorRuler"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8acbc
           @spec=:method,
           @value=
            #<Delphi::Function:0xab3018
             @directive=["virtual"],
             @ident="CreateEditorSpeed",
             @type=#<Delphi::OrdType:0xab1b30 @expr=[["TEditorSpeed"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8acb0
           @spec=:method,
           @value=
            #<Delphi::Function:0xaaffb8
             @directive=["virtual"],
             @ident="CreatePopupMenu",
             @type=#<Delphi::OrdType:0xaaebd8 @expr=[["TPopupMenu"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8aca4
           @spec=:method,
           @value=
            #<Delphi::Function:0xaad768
             @directive=["virtual"],
             @ident="CreateScreen",
             @type=#<Delphi::OrdType:0xaac370 @expr=[["TEditorScreen"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac98
           @spec=:method,
           @value=
            #<Delphi::Function:0xaaafa8
             @directive=["virtual"],
             @ident="CreateScreenStrings",
             @type=
              #<Delphi::OrdType:0xaa9940 @expr=[["TEditorScreenStrings"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac8c
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa8548
             @directive=["virtual"],
             @ident="CreateStrings",
             @type=#<Delphi::OrdType:0xaa71ec @expr=[["TStrings"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac80
           @spec=:method,
           @value=
            #<Delphi::Function:0xaa5dd0
             @directive=["virtual"],
             @ident="CreateViewInfo",
             @type=#<Delphi::OrdType:0xaa493c @expr=[["TEditorViewInfo"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac74
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa32a4
             @directive=["virtual"],
             @ident="DoCaretMoved">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac68
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa16e4
             @directive=["virtual"],
             @ident="DoChange">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac5c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa9fb6c
             @directive=["virtual"],
             @ident="DoDrawLine",
             @param_list=
              [#<Delphi::Param:0xa9ef60
                @ident_list=["ARect"],
                @type=#<Delphi::OrdType:0xa9e1d4 @expr=[["TRect"]]>>,
               #<Delphi::Param:0xa9dbd4
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xa9c788 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xa9c038
                @ident_list=["LineStr"],
                @type="String">,
               #<Delphi::Param:0xa9b150
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xa9a388 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xa99be4
                @ident_list=["SelectedArea"],
                @type=#<Delphi::OrdType:0xa98d74 @expr=[["Boolean"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac50
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa975f8
             @directive=["virtual"],
             @ident="DoSelectionChange",
             @param_list=
              [#<Delphi::Param:0xa968cc
                @ident_list=["Selection"],
                @type=#<Delphi::OrdType:0xa95abc @expr=[["Boolean"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac44
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa93da0
             @directive=["virtual"],
             @ident="DoSelectionModeChange">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac38
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa91fd0
             @directive=["virtual"],
             @ident="DoTopColChange">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac2c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa903ec
             @directive=["virtual"],
             @ident="DoTopRowChange">,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac20
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8e568
             @directive=["virtual"],
             @ident="ViewChanged",
             @param_list=
              [#<Delphi::Param:0xa8d950
                @ident_list=["Sender"],
                @type=#<Delphi::OrdType:0xa8cb70 @expr=[["TObject"]]>>]>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa8ac14
           @spec=:method,
           @value=nil,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xa88508
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa8ab30
             @ident="SelDragging",
             @interface=#<Delphi::OrdType:0xa896d8 @expr=[["Boolean"]]>>,
           @visibility=:protected>,
          #<Delphi::ClassAttr:0xada558
           @spec=:method,
           @value=
            #<Delphi::Constructor:0xa87e54
             @directive=["override"],
             @ident="Create",
             @param_list=
              [#<Delphi::Param:0xa87314
                @ident_list=["AOwner"],
                @type=#<Delphi::OrdType:0xa8648c @expr=[["TComponent"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada540
           @spec=:method,
           @value=
            #<Delphi::Destructor:0xa84f14
             @directive=["override"],
             @ident="Destroy">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada534
           @spec=:method,
           @value=
            #<Delphi::Function:0xa81848
             @directive=["virtual"],
             @ident="CanSelDrag",
             @type=#<Delphi::OrdType:0xa805b8 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada528
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7ecec
             @directive=[],
             @ident="CancelSelDrag">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada51c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7d324
             @directive=[],
             @ident="CleanSelection">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada504
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7b860
             @directive=["virtual"],
             @ident="CopySelection",
             @param_list=
              [#<Delphi::Param:0xa7ac6c
                @ident_list=["ARow", "ACol"],
                @type=#<Delphi::OrdType:0xa797fc @expr=[["Integer"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4f8
           @spec=:method,
           @value=
            #<Delphi::Function:0xa77d5c
             @directive=[],
             @ident="IsSelectedArea",
             @param_list=
              [#<Delphi::Param:0xa77138
                @ident_list=["ARow", "ACol"],
                @type=#<Delphi::OrdType:0xa75c74 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa74e64 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4ec
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa73e68
             @directive=[],
             @ident="MoveSelection",
             @param_list=
              [#<Delphi::Param:0xa73244
                @ident_list=["ARow", "ACol"],
                @type=#<Delphi::OrdType:0xa71da4 @expr=[["Integer"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4e0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa70940
             @directive=[],
             @ident="PosToRowCol",
             @param_list=
              [#<Delphi::Param:0xa6fe00
                @ident_list=["XPos", "YPos"],
                @type=#<Delphi::OrdType:0xa6e96c @expr=[["Integer"]]>>,
               #<Delphi::Param:0xa6df34
                @ident_list=["ARow", "ACol"],
                @type=#<Delphi::OrdType:0xa6cae8 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xa6c44c
                @ident_list=["Split"],
                @type=#<Delphi::OrdType:0xa6b690 @expr=[["Boolean"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4d4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa69fd4
             @directive=[],
             @ident="SetRowCol",
             @param_list=
              [#<Delphi::Param:0xa69488
                @ident_list=["ARow", "ACol"],
                @type=#<Delphi::OrdType:0xa68048 @expr=[["Integer"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4c8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x65595e
             @directive=["virtual"],
             @ident="PutRowMark",
             @param_list=
              [#<Delphi::Param:0x652f6a
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x632a02 @expr=[["Integer"]]>>,
               #<Delphi::Param:0x62e03a
                @ident_list=["Mark"],
                @type=#<Delphi::OrdType:0x62a4ee @expr=[["TRowMark"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4bc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x627c6e
             @directive=["virtual"],
             @ident="DeleteRowMark",
             @param_list=
              [#<Delphi::Param:0x626402
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0x624b96 @expr=[["Integer"]]>>,
               #<Delphi::Param:0x623fd2
                @ident_list=["Mark"],
                @type=#<Delphi::OrdType:0x621f86 @expr=[["TRowMark"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4b0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x612392
             @directive=["virtual"],
             @ident="GotoRowMark",
             @param_list=
              [#<Delphi::Param:0x60da4e
                @ident_list=["Mark"],
                @type=#<Delphi::OrdType:0x6085ee @expr=[["TRowMark"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada4a4
           @spec=:method,
           @value=
            #<Delphi::Function:0xadc64c
             @directive=["virtual"],
             @ident="CanRedo",
             @type=#<Delphi::OrdType:0xadb3ec @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada498
           @spec=:method,
           @value=
            #<Delphi::Function:0xad9f88
             @directive=["virtual"],
             @ident="CanUndo",
             @type=#<Delphi::OrdType:0xad8d58 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada48c
           @spec=:method,
           @value=
            #<Delphi::Function:0xad787c
             @directive=[],
             @ident="CharFromPos",
             @param_list=
              [#<Delphi::Param:0xad6cac
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xad5e90 @expr=[["TPoint"]]>>],
             @type=#<Delphi::OrdType:0xad4f90 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada474
           @spec=:method,
           @value=#<Delphi::Procedure:0xad3d18 @directive=[], @ident="Clear">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada468
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xad2878
             @directive=[],
             @ident="ClearSelection">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada45c
           @spec=:method,
           @value=
            #<Delphi::Function:0xad133c
             @directive=[],
             @ident="ColToChar",
             @param_list=
              [#<Delphi::Param:0xad0754
                @ident_list=["ARow", "ACol"],
                @type=#<Delphi::OrdType:0xacf1dc @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xace30c @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada450
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacd130
             @directive=[],
             @ident="CopyToClipboard">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada444
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xacba8c
             @directive=[],
             @ident="CutToClipboard">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada438
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaca544
             @directive=[],
             @ident="DeleteRow",
             @param_list=
              [#<Delphi::Param:0xac98fc
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xac8a2c @expr=[["Integer"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada42c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xac74e4
             @directive=[],
             @ident="DrawTextRect",
             @param_list=
              [#<Delphi::Param:0xac6890
                @ident_list=["Rect"],
                @type=#<Delphi::OrdType:0xac5a2c @expr=[["TRect"]]>>,
               #<Delphi::Param:0xac5408
                @ident_list=["X", "Y"],
                @type=#<Delphi::OrdType:0xac3f38 @expr=[["Integer"]]>>,
               #<Delphi::Param:0xac34ac @ident_list=["S"], @type="String">,
               #<Delphi::Param:0xac2498
                @ident_list=["Options"],
                @type=#<Delphi::OrdType:0xac1634 @expr=[["Word"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada420
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xabffb4
             @directive=["virtual"],
             @ident="ExchangeList",
             @param_list=
              [#<Delphi::Param:0xabf2c4
                @ident_list=["Source"],
                @type=#<Delphi::OrdType:0xabe424 @expr=[["TEditor"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada414
           @spec=:method,
           @value=
            #<Delphi::Function:0xabc984
             @directive=[],
             @ident="ExpandTab",
             @param_list=
              [#<Delphi::Param:0xabba30 @ident_list=["S"], @type="String">],
             @type=#<Delphi::StringType:0xaba758>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada408
           @spec=:method,
           @value=
            #<Delphi::Function:0xab93d8
             @directive=[],
             @ident="ExpandTabLength",
             @param_list=
              [#<Delphi::Param:0xab83a0 @ident_list=["S"], @type="String">],
             @type=#<Delphi::OrdType:0xab6aec @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3fc
           @spec=:method,
           @value=
            #<Delphi::Function:0xab5ae4
             @directive=[],
             @ident="GetSelTextBuf",
             @param_list=
              [#<Delphi::Param:0xab4dd0
                @ident_list=["Buffer"],
                @type=#<Delphi::OrdType:0xab3f84 @expr=[["PChar"]]>>,
               #<Delphi::Param:0xab387c
                @ident_list=["BufSize"],
                @type=#<Delphi::OrdType:0xab2a60 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xab1bb4 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3f0
           @spec=:method,
           @value=
            #<Delphi::Function:0xab0960
             @directive=[],
             @ident="GetTextLen",
             @type=#<Delphi::OrdType:0xaaf67c @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3e4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaae968
             @directive=[],
             @ident="HitToSelected">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3d8
           @spec=:method,
           @value=
            #<Delphi::Function:0xaacd00
             @directive=[],
             @ident="LeftMargin",
             @type=#<Delphi::OrdType:0xaab9ec @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3cc
           @spec=:method,
           @value=
            #<Delphi::Function:0xaaacd8
             @directive=[],
             @ident="LinesToRow",
             @param_list=
              [#<Delphi::Param:0xaaa0e4
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xaa922c @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xaa83c8 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3c0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa7330
             @directive=[],
             @ident="ListToFile",
             @param_list=
              [#<Delphi::Param:0xaa62e0
                @ident_list=["FileName"],
                @type="String">]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3b4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa48e8
             @directive=[],
             @ident="ListToStream",
             @param_list=
              [#<Delphi::Param:0xaa3c88
                @ident_list=["Stream"],
                @type=#<Delphi::OrdType:0xaa2e18 @expr=[["TStream"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada3a8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa1e04
             @directive=[],
             @ident="PasteFromClipboard">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada390
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xaa0844
             @directive=["virtual"],
             @ident="Redo">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada378
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9ecd8
             @directive=[],
             @ident="RowToLines",
             @param_list=
              [#<Delphi::Param:0xa9e0e4
                @ident_list=["Index"],
                @type=#<Delphi::OrdType:0xa9d298 @expr=[["Integer"]]>>],
             @type=#<Delphi::OrdType:0xa9c3b0 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada36c
           @spec=:method,
           @value=
            #<Delphi::Function:0xa9b2dc
             @directive=["virtual"],
             @ident="Search",
             @param_list=
              [#<Delphi::Param:0xa9a334
                @ident_list=["SearchValue"],
                @type="String">,
               #<Delphi::Param:0xa992a8
                @ident_list=["SearchOptions"],
                @type=#<Delphi::OrdType:0xa982c4 @expr=[["TSearchOptions"]]>>],
             @type=#<Delphi::OrdType:0xa97460 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada360
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa96068 @directive=[], @ident="SelectAll">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada354
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa946f4
             @directive=[],
             @ident="SelectTokenBracketFromCaret">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada33c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa92de0
             @directive=[],
             @ident="SelectTokenBracketFromPos",
             @param_list=
              [#<Delphi::Param:0xa92054
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa91280 @expr=[["TPoint"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada330
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa90260
             @directive=[],
             @ident="SelectTokenFromCaret">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada324
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8ecd0
             @directive=[],
             @ident="SelectTokenFromPos",
             @param_list=
              [#<Delphi::Param:0xa8dfec
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa8d1b8 @expr=[["TPoint"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada318
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8c1a4
             @directive=[],
             @ident="SelectWordFromCaret">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada30c
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa8a590
             @directive=[],
             @ident="SelectWordFromPos",
             @param_list=
              [#<Delphi::Param:0xa898ac
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa88a84 @expr=[["TPoint"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada300
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa876a4 @directive=[], @ident="SelIndent">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2f4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa86174 @directive=[], @ident="SelUnIndent">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2e8
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa84d4c @directive=[], @ident="SelTabIndent">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2dc
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa83894
             @directive=[],
             @ident="SelTabUnIndent">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2d0
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa82424
             @directive=[],
             @ident="SetSelTextBox",
             @param_list=
              [#<Delphi::Param:0xa817f4
                @ident_list=["Buffer"],
                @type=#<Delphi::OrdType:0xa80a44 @expr=[["PChar"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2c4
           @spec=:method,
           @value=
            #<Delphi::Procedure:0xa7fa24
             @directive=[],
             @ident="SetSelTextBuf",
             @param_list=
              [#<Delphi::Param:0xa7ed64
                @ident_list=["Buffer"],
                @type=#<Delphi::OrdType:0xa7dfc0 @expr=[["PChar"]]>>]>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2b8
           @spec=:method,
           @value=
            #<Delphi::Function:0xa7d054
             @directive=[],
             @ident="StrInfoFromPos",
             @param_list=
              [#<Delphi::Param:0xa7c400
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa7b608 @expr=[["TPoint"]]>>],
             @type=#<Delphi::OrdType:0xa7a690 @expr=[["TEditorStrInfo"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2ac
           @spec=:method,
           @value=
            #<Delphi::Function:0xa793a0
             @directive=[],
             @ident="TokenBracketFromCaret",
             @type=#<Delphi::OrdType:0xa77f54 @expr=[["Char"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada2a0
           @spec=:method,
           @value=
            #<Delphi::Function:0xa76e20
             @directive=[],
             @ident="TokenBracketFromPos",
             @param_list=
              [#<Delphi::Param:0xa760dc
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa7529c @expr=[["TPoint"]]>>],
             @type=#<Delphi::OrdType:0xa744bc @expr=[["Char"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada294
           @spec=:method,
           @value=
            #<Delphi::Function:0xa734c0
             @directive=[],
             @ident="TokenFromCaret",
             @type=#<Delphi::OrdType:0xa72194 @expr=[["Char"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada288
           @spec=:method,
           @value=
            #<Delphi::Function:0xa70f58
             @directive=[],
             @ident="TokenFromPos",
             @param_list=
              [#<Delphi::Param:0xa703c4
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa6f5d8 @expr=[["TPoint"]]>>],
             @type=#<Delphi::OrdType:0xa6e7bc @expr=[["Char"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada27c
           @spec=:method,
           @value=
            #<Delphi::Function:0xa6d6b8
             @directive=[],
             @ident="TokenStringBracketFromCaret",
             @type=#<Delphi::StringType:0xa6c710>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada270
           @spec=:method,
           @value=
            #<Delphi::Function:0xa6b384
             @directive=[],
             @ident="TokenStringBracketFromPos",
             @param_list=
              [#<Delphi::Param:0xa6a55c
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xa697a0 @expr=[["TPoint"]]>>],
             @type=#<Delphi::StringType:0xa68ef4>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada264
           @spec=:method,
           @value=
            #<Delphi::Function:0x65ac6e
             @directive=[],
             @ident="TokenStringFromCaret",
             @type=#<Delphi::StringType:0x656fea>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada258
           @spec=:method,
           @value=
            #<Delphi::Function:0x64ec26
             @directive=[],
             @ident="TokenStringFromPos",
             @param_list=
              [#<Delphi::Param:0x631ce2
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0x62b65e @expr=[["TPoint"]]>>],
             @type=#<Delphi::StringType:0x629d62>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada24c
           @spec=:method,
           @value=
            #<Delphi::Function:0x627cc2
             @directive=[],
             @ident="TopMargin",
             @type=#<Delphi::OrdType:0x6257f6 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada240
           @spec=:method,
           @value=
            #<Delphi::Procedure:0x622ffa
             @directive=["virtual"],
             @ident="Undo">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada234
           @spec=:method,
           @value=
            #<Delphi::Function:0x6153fe
             @directive=[],
             @ident="WordFromCaret",
             @type=#<Delphi::StringType:0x60ddae>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada228
           @spec=:method,
           @value=
            #<Delphi::Function:0x606512
             @directive=[],
             @ident="WordFromPos",
             @param_list=
              [#<Delphi::Param:0x601baa
                @ident_list=["Pos"],
                @type=#<Delphi::OrdType:0xadc580 @expr=[["TPoint"]]>>],
             @type=#<Delphi::StringType:0xadbcbc>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0xada21c
           @spec=:method,
           @value=nil,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627476
           @spec=:prop,
           @value=
            #<Delphi::Property:0xada12c
             @ident="ActiveFountain",
             @interface=#<Delphi::OrdType:0xad8b90 @expr=[["TFountain"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627422
           @spec=:prop,
           @value=#<Delphi::Property:0xad7960 @ident="Canvas">,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627416
           @spec=:prop,
           @value=
            #<Delphi::Property:0xad6970
             @ident="Col",
             @interface=#<Delphi::OrdType:0xad5548 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6273fe
           @spec=:prop,
           @value=
            #<Delphi::Property:0xad3bf8
             @ident="ColCount",
             @interface=#<Delphi::OrdType:0xad26b0 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6273ce
           @spec=:prop,
           @value=
            #<Delphi::Property:0xad1654
             @ident="ColWidth",
             @interface=#<Delphi::OrdType:0xad0124 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6273c2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaceffc
             @ident="CursorState",
             @interface=
              #<Delphi::OrdType:0xacd808 @expr=[["TEditorMouseCursorState"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627272
           @spec=:prop,
           @value=
            #<Delphi::Property:0xacbbb8
             @ident="Delimiters",
             @interface=#<Delphi::OrdType:0xaca694 @expr=[["TCharSet"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62724e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xac8ad4
             @ident="EditorUndoObj",
             @interface=
              #<Delphi::OrdType:0xac73f4 @expr=[["TEditorUndoObj"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627242
           @spec=:prop,
           @value=
            #<Delphi::Property:0xac62c0
             @ident="FontHeight",
             @interface=#<Delphi::OrdType:0xac4d60 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62721e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xac3bfc
             @ident="HitSelected",
             @interface=#<Delphi::OrdType:0xac25a0 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6271fa
           @spec=:prop,
           @value=
            #<Delphi::Property:0xac13ac
             @ident="HitSelLength",
             @interface=#<Delphi::OrdType:0xabfe40 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6271ee
           @spec=:prop,
           @value=
            #<Delphi::Property:0xabe178
             @ident="ListBracket",
             @interface=#<Delphi::OrdType:0xabba18 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6271e2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaba8e4
             @ident="ListCount",
             @interface=#<Delphi::OrdType:0xab9384 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6271ca
           @spec=:prop,
           @value=
            #<Delphi::Property:0xab81f0
             @ident="ListData",
             @interface=
              #<Delphi::OrdType:0xab5928 @expr=[["TRowAttributeData"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6271be
           @spec=:prop,
           @value=
            #<Delphi::Property:0xab4770
             @ident="ListDataString",
             @interface=#<Delphi::StringType:0xab2688>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6271b2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xab0aec
             @ident="ListElement",
             @interface=#<Delphi::OrdType:0xaae38c @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6271a6
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaad240
             @ident="ListPrevToken",
             @interface=#<Delphi::OrdType:0xaaab28 @expr=[["Char"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62715e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaa991c
             @ident="ListPrevRow",
             @interface=#<Delphi::OrdType:0xaa70e4 @expr=[["TRowAttribute"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627152
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaa5f44
             @ident="ListRemain",
             @interface=#<Delphi::OrdType:0xaa3844 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627146
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaa26d4
             @ident="ListRow",
             @interface=
              #<Delphi::OrdType:0xa9fecc @expr=[["TEditorRowAttribute"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62713a
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa9edc8
             @ident="ListString",
             @interface=#<Delphi::StringType:0xa9cd64>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627122
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa9b72c
             @ident="ListToken",
             @interface=#<Delphi::OrdType:0xa9902c @expr=[["Char"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62710a
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa97eec
             @ident="ListWrappedByte",
             @interface=#<Delphi::OrdType:0xa955c4 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6270fe
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa93fd4
             @ident="ListRowMarks",
             @interface=#<Delphi::OrdType:0xa917c0 @expr=[["TRowMarks"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6270f2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa8fc48
             @ident="LeftScrollWidth",
             @interface=#<Delphi::OrdType:0xa8e724 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6270da
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa8d53c
             @ident="Modified",
             @interface=#<Delphi::OrdType:0xa8c0a8 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6270ce
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa8a0ec
             @ident="OverWrite",
             @interface=#<Delphi::OrdType:0xa88b80 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62709e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa86d14
             @ident="Row",
             @interface=#<Delphi::OrdType:0xa858f8 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627092
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa840f8
             @ident="RowCount",
             @interface=#<Delphi::OrdType:0xa82d24 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62707a
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa81d7c
             @ident="RowHeight",
             @interface=#<Delphi::OrdType:0xa808d0 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627056
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa7f7f0
             @ident="SelDrawPosition",
             @interface=
              #<Delphi::OrdType:0xa7e080 @expr=[["TSelectedPosition"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627032
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa7d0d8
             @ident="Selected",
             @interface=#<Delphi::OrdType:0xa7bbf0 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x627026
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa7ab10
             @ident="SelectedData",
             @interface=#<Delphi::OrdType:0xa795f8 @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x62700e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa784c4
             @ident="SelectedDraw",
             @interface=#<Delphi::OrdType:0xa76fac @expr=[["Boolean"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626ff6
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa75e00
             @ident="SelectionMode",
             @interface=
              #<Delphi::OrdType:0xa74660 @expr=[["TEditorSelectionMode"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626fd2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa72b0c
             @ident="SelLength",
             @interface=#<Delphi::OrdType:0xa71630 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626fba
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa6fbe4
             @ident="SelStart",
             @interface=#<Delphi::OrdType:0xa6e6d8 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626f7e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa6ccec
             @ident="SelStrPosition",
             @interface=
              #<Delphi::OrdType:0xa6b60c @expr=[["TSelectedPosition"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626f66
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa6a5e0
             @ident="SelText",
             @interface=#<Delphi::StringType:0xa69878>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626f12
           @spec=:prop,
           @value=
            #<Delphi::Property:0x65a9e6
             @ident="TopCol",
             @interface=#<Delphi::OrdType:0x655706 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x626f06
           @spec=:prop,
           @value=
            #<Delphi::Property:0x63226a
             @ident="TopRow",
             @interface=#<Delphi::OrdType:0x62a422 @expr=[["Integer"]]>>,
           @visibility=:public>,
          #<Delphi::ClassAttr:0x6127ca
           @spec=:prop,
           @value=#<Delphi::Property:0x6223b2 @ident="Align">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612782
           @spec=:prop,
           @value=
            #<Delphi::Property:0x6164de
             @ident="BorderStyle",
             @interface=#<Delphi::OrdType:0x60d4de @expr=[["TBorderStyle"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6126da
           @spec=:prop,
           @value=
            #<Delphi::Property:0xadc2e0
             @ident="Caret",
             @interface=#<Delphi::OrdType:0xadad8c @expr=[["TEditorCaret"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612686
           @spec=:prop,
           @value=#<Delphi::Property:0xad90a0 @ident="Color">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612602
           @spec=:prop,
           @value=#<Delphi::Property:0xad7510 @ident="Ctl3D">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6125ba
           @spec=:prop,
           @value=#<Delphi::Property:0xad6544 @ident="DragCursor">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6125a2
           @spec=:prop,
           @value=#<Delphi::Property:0xad5458 @ident="DragMode">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612596
           @spec=:prop,
           @value=#<Delphi::Property:0xad4438 @ident="Enabled">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612572
           @spec=:prop,
           @value=
            #<Delphi::Property:0xad3424
             @ident="Fountain",
             @interface=#<Delphi::OrdType:0xad1e4c @expr=[["TFountain"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612512
           @spec=:prop,
           @value=#<Delphi::Property:0xad037c @ident="Font">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6124a6
           @spec=:prop,
           @value=
            #<Delphi::Property:0xace4b0
             @ident="HitStyle",
             @interface=
              #<Delphi::OrdType:0xacce24 @expr=[["TEditorHitStyle"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61242e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xacb288
             @ident="Imagebar",
             @interface=
              #<Delphi::OrdType:0xac9c8c @expr=[["TEditorImagebar"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612356
           @spec=:prop,
           @value=
            #<Delphi::Property:0xac80d8
             @ident="ImageDigits",
             @interface=#<Delphi::OrdType:0xac6aa0 @expr=[["TImageList"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612302
           @spec=:prop,
           @value=
            #<Delphi::Property:0xac4e44
             @ident="ImageMarks",
             @interface=#<Delphi::OrdType:0xac37d0 @expr=[["TImageList"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6122d2
           @spec=:prop,
           @value=#<Delphi::Property:0xac1af0 @ident="ImeMode">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61228a
           @spec=:prop,
           @value=
            #<Delphi::Property:0xac0ad0
             @ident="Lines",
             @interface=#<Delphi::OrdType:0xabf594 @expr=[["TStrings"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61227e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xabdb6c
             @ident="Marks",
             @interface=#<Delphi::OrdType:0xabc6d8 @expr=[["TEditorMarks"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612272
           @spec=:prop,
           @value=
            #<Delphi::Property:0xabac74
             @ident="Margin",
             @interface=#<Delphi::OrdType:0xab9690 @expr=[["TEditorMargin"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612266
           @spec=:prop,
           @value=
            #<Delphi::Property:0xab7b9c
             @ident="Leftbar",
             @interface=
              #<Delphi::OrdType:0xab65dc @expr=[["TEditorLeftbar"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612242
           @spec=:prop,
           @value=#<Delphi::Property:0xab4a94 @ident="ParentColor">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612176
           @spec=:prop,
           @value=#<Delphi::Property:0xab2e50 @ident="ParentCtl3D">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6120da
           @spec=:prop,
           @value=#<Delphi::Property:0xab1dd0 @ident="ParentFont">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6120aa
           @spec=:prop,
           @value=#<Delphi::Property:0xaafd54 @ident="ParentShowHint">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x612026
           @spec=:prop,
           @value=#<Delphi::Property:0xaaec74 @ident="PopupMenu">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611fa2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaadbdc
             @ident="ReadOnly",
             @interface=#<Delphi::OrdType:0xaac700 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611f72
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaaac60
             @ident="ReserveWordList",
             @interface=#<Delphi::OrdType:0xaa9544 @expr=[["TStringList"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611f5a
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaa7834
             @ident="Ruler",
             @interface=#<Delphi::OrdType:0xaa62b0 @expr=[["TEditorRuler"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611f4e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaa4948
             @ident="ScrollBars",
             @interface=#<Delphi::OrdType:0xaa32f8 @expr=[["TScrollStyle"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611f42
           @spec=:prop,
           @value=#<Delphi::Property:0xaa1810 @ident="ShowHint">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611f36
           @spec=:prop,
           @value=
            #<Delphi::Property:0xaa0850
             @ident="Speed",
             @interface=#<Delphi::OrdType:0xa9f2b4 @expr=[["TEditorSpeed"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611f1e
           @spec=:prop,
           @value=#<Delphi::Property:0xa9d8d4 @ident="TabOrder">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611f12
           @spec=:prop,
           @value=#<Delphi::Property:0xa9c86c @ident="TabStop">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611dce
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa9ad0c
             @ident="UndoListMax",
             @interface=#<Delphi::OrdType:0xa997b8 @expr=[["Integer"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611d56
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa97afc
             @ident="View",
             @interface=
              #<Delphi::OrdType:0xa965c0 @expr=[["TEditorViewInfo"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611d02
           @spec=:prop,
           @value=#<Delphi::Property:0xa947a8 @ident="Visible">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611cd2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa935fc
             @ident="WantReturns",
             @interface=#<Delphi::OrdType:0xa92108 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611cae
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa90620
             @ident="WantTabs",
             @interface=#<Delphi::OrdType:0xa8f1f8 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611c5a
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa8d764
             @ident="WordWrap",
             @interface=#<Delphi::OrdType:0xa8c288 @expr=[["Boolean"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611bca
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa8a278
             @ident="WrapOption",
             @interface=
              #<Delphi::OrdType:0xa88b68 @expr=[["TEditorWrapOption"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611bbe
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa870d4
             @ident="OnCaretMoved",
             @interface=#<Delphi::OrdType:0xa85a30 @expr=[["TNotifyEvent"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611ba6
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa83d2c
             @ident="OnChange",
             @interface=#<Delphi::OrdType:0xa82868 @expr=[["TNotifyEvent"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611af2
           @spec=:prop,
           @value=#<Delphi::Property:0xa80e88 @ident="OnClick">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611ac2
           @spec=:prop,
           @value=#<Delphi::Property:0xa7feec @ident="OnDblClick">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6119ea
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa7ee90
             @ident="OnDrawLine",
             @interface=
              #<Delphi::OrdType:0xa7d894 @expr=[["TDrawLineEvent"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6119ae
           @spec=:prop,
           @value=#<Delphi::Property:0xa7bda0 @ident="OnDragDrop">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61194e
           @spec=:prop,
           @value=#<Delphi::Property:0xa7ad80 @ident="OnDragOver">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611882
           @spec=:prop,
           @value=#<Delphi::Property:0xa79d0c @ident="OnEndDrag">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611852
           @spec=:prop,
           @value=#<Delphi::Property:0xa78ce0 @ident="OnEnter">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611846
           @spec=:prop,
           @value=#<Delphi::Property:0xa77d14 @ident="OnExit">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61183a
           @spec=:prop,
           @value=#<Delphi::Property:0xa76da8 @ident="OnKeyDown">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611822
           @spec=:prop,
           @value=#<Delphi::Property:0xa75d28 @ident="OnKeyPress">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6116c6
           @spec=:prop,
           @value=#<Delphi::Property:0xa74c9c @ident="OnKeyUp">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6116ae
           @spec=:prop,
           @value=#<Delphi::Property:0xa73d30 @ident="OnMouseDown">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61167e
           @spec=:prop,
           @value=#<Delphi::Property:0xa72d34 @ident="OnMouseMove">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611672
           @spec=:prop,
           @value=#<Delphi::Property:0xa71c48 @ident="OnMouseUp">,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61164e
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa70c94
             @ident="OnSelectionChange",
             @interface=
              #<Delphi::OrdType:0xa6f488 @expr=[["TSelectionChangeEvent"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x61159a
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa6d790
             @ident="OnSelectionModeChange",
             @interface=#<Delphi::OrdType:0xa6c05c @expr=[["TNotifyEvent"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6114c2
           @spec=:prop,
           @value=
            #<Delphi::Property:0xa6a1fc
             @ident="OnTopColChange",
             @interface=#<Delphi::OrdType:0xa68c00 @expr=[["TNotifyEvent"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x6113a2
           @spec=:prop,
           @value=
            #<Delphi::Property:0x659096
             @ident="OnTopRowChange",
             @interface=#<Delphi::OrdType:0x651b66 @expr=[["TNotifyEvent"]]>>,
           @visibility=:published>,
          #<Delphi::ClassAttr:0x611306
           @spec=:prop,
           @value=#<Delphi::Property:0x62b256 @ident="OnStartDrag">,
           @visibility=:published>],
        @herit=["TCustomControl"],
        @visibility="published">>],
   @uses=
    ["Windows",
     "Messages",
     "SysUtils",
     "Classes",
     "Graphics",
     "Controls",
     "Forms",
     "StdCtrls",
     "Imm",
     "Clipbrd",
     "Menus",
     "heClasses",
     "heFountain",
     "heRaStrings",
     "EditorFountain",
     "htSearch"],
   @vars=[]>>
