-- Autogenerated by MSIL2Ada v. 2
-- By: Martin C. Carlisle
--     Department of Computer Science
--     US Air Force Academy
--     carlislem@acm.org
pragma Extensions_Allowed(On);
with MSSyst.Object;
with MSIL_Types;
use MSIL_Types;
with type MSSyst.ComponentModel.IComponent.Ref is access;
with type MSSyst.IDisposable.Ref is access;
with type MSSyst.ComponentModel.ISynchronizeInvoke.Ref is access;
with type MSSyst.Windows.Forms.IWin32Window.Ref is access;
with type MSSyst.EventHandler.Ref is access;
with type MSSyst.Windows.Forms.UICuesEventHandler.Ref is access;
with type MSSyst.Windows.Forms.ContentsResizedEventHandler.Ref is access;
with type MSSyst.Windows.Forms.ControlEventHandler.Ref is access;
with type MSSyst.Windows.Forms.DragEventHandler.Ref is access;
with type MSSyst.Windows.Forms.GiveFeedbackEventHandler.Ref is access;
with type MSSyst.Windows.Forms.HelpEventHandler.Ref is access;
with type MSSyst.Windows.Forms.InvalidateEventHandler.Ref is access;
with type MSSyst.Windows.Forms.KeyEventHandler.Ref is access;
with type MSSyst.Windows.Forms.KeyPressEventHandler.Ref is access;
with type MSSyst.Windows.Forms.LayoutEventHandler.Ref is access;
with type MSSyst.Windows.Forms.LinkClickedEventHandler.Ref is access;
with type MSSyst.Windows.Forms.MouseEventHandler.Ref is access;
with type MSSyst.Windows.Forms.PaintEventHandler.Ref is access;
with type MSSyst.Windows.Forms.QueryAccessibilityHelpEventHandler.Ref is access;
with type MSSyst.Windows.Forms.QueryContinueDragEventHandler.Ref is access;
with type MSSyst.ComponentModel.CancelEventHandler.Ref is access;
with type MSSyst.String.Ref is access;
with type MSSyst.IAsyncResult.Ref is access;
with type MSSyst.Delegate.Ref is access;
with type MSSyst.Object.Ref_array is access;
with type MSSyst.Windows.Forms.DataFormats.Format.Ref is access;
with type MSSyst.Windows.Forms.Control.Ref is access;
with type MSSyst.Drawing.Graphics.Ref is access;
with type MSSyst.Runtime.Remoting.ObjRef.Ref is access;
with type MSSyst.Type_k.Ref is access;
with MSSyst.Windows.Forms.DragDropEffects;
with type MSSyst.Object.Ref is access;
with MSSyst.Windows.Forms.RichTextBoxFinds;
with type MSSyst.Windows.Forms.Form.Ref is access;
with type MSSyst.Windows.Forms.AccessibleObject.Ref is access;
with MSSyst.Windows.Forms.AccessibleRole;
with MSSyst.Windows.Forms.AnchorStyles;
with type MSSyst.Drawing.Color.Valuetype is tagged;
with type MSSyst.Drawing.Image.Ref is access;
with type MSSyst.Windows.Forms.BindingContext.Ref is access;
with MSSyst.Windows.Forms.BorderStyle;
with type MSSyst.Drawing.Rectangle.Valuetype is tagged;
with type MSSyst.Drawing.Size.Valuetype is tagged;
with type MSSyst.ComponentModel.IContainer.Ref is access;
with type MSSyst.Windows.Forms.ContextMenu.Ref is access;
with type MSSyst.Windows.Forms.Control.ControlCollection.Ref is access;
with type MSSyst.Windows.Forms.Cursor.Ref is access;
with type MSSyst.Windows.Forms.ControlBindingsCollection.Ref is access;
with MSSyst.Windows.Forms.DockStyle;
with type MSSyst.Drawing.Font.Ref is access;
with MSSyst.Windows.Forms.ImeMode;
with type MSSyst.String.Ref_array is access;
with type MSSyst.Drawing.Point.Valuetype is tagged;
with type MSSyst.Drawing.Region.Ref is access;
with MSSyst.Windows.Forms.RightToLeft;
with MSSyst.Windows.Forms.RichTextBoxScrollBars;
with MSSyst.Windows.Forms.HorizontalAlignment;
with MSSyst.Windows.Forms.RichTextBoxSelectionTypes;
with type MSSyst.ComponentModel.ISite.Ref is access;
with type MSSyst.Windows.Forms.IWindowTarget.Ref is access;
with type MSSyst.Windows.Forms.IContainerControl.Ref is access;
with type MSSyst.IO.Stream.Ref is access;
with MSSyst.Windows.Forms.RichTextBoxStreamType;
with MSSyst.Windows.Forms.Message;
with MSSyst.Windows.Forms.BoundsSpecified;
with MSSyst.Windows.Forms.TextBoxBase;
package MSSyst.Windows.Forms.RichTextBox is
   type Typ;
   type Ref is access all Typ'Class;
   type Ref_addrof is access all Ref;
   type Ref_Arr is array(Natural range <>) of Ref;
   type Ref_Array is access all Ref_Arr;
   type Ref_Array_addrof is access all Ref_Array;
   type Typ(
         I_IComponent : MSSyst.ComponentModel.IComponent.Ref;
         I_IDisposable : MSSyst.IDisposable.Ref;
         I_ISynchronizeInvoke : MSSyst.ComponentModel.ISynchronizeInvoke.Ref;
         I_IWin32Window : MSSyst.Windows.Forms.IWin32Window.Ref
      ) is new MSSyst.Windows.Forms.TextBoxBase.Typ(
         I_IComponent => I_IComponent,
         I_IDisposable => I_IDisposable,
         I_ISynchronizeInvoke => I_ISynchronizeInvoke,
         I_IWin32Window => I_IWin32Window
      ) with record
      null;
   end record;
   function new_RichTextBox(
      This : Ref := null) return Ref;
   procedure add_ContentsResized(
      This : access Typ;
      value : MSSyst.Windows.Forms.ContentsResizedEventHandler.Ref);
   procedure add_DoubleClick(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure add_DragDrop(
      This : access Typ;
      value : MSSyst.Windows.Forms.DragEventHandler.Ref);
   procedure add_DragEnter(
      This : access Typ;
      value : MSSyst.Windows.Forms.DragEventHandler.Ref);
   procedure add_DragLeave(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure add_DragOver(
      This : access Typ;
      value : MSSyst.Windows.Forms.DragEventHandler.Ref);
   procedure add_GiveFeedback(
      This : access Typ;
      value : MSSyst.Windows.Forms.GiveFeedbackEventHandler.Ref);
   procedure add_HScroll(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure add_ImeChange(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure add_LinkClicked(
      This : access Typ;
      value : MSSyst.Windows.Forms.LinkClickedEventHandler.Ref);
   procedure add_Protected(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure add_QueryContinueDrag(
      This : access Typ;
      value : MSSyst.Windows.Forms.QueryContinueDragEventHandler.Ref);
   procedure add_SelectionChanged(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure add_VScroll(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   function CanPaste(
      This : access Typ;
      clipFormat : MSSyst.Windows.Forms.DataFormats.Format.Ref) return Standard.Boolean;
   function Find(
      This : access Typ;
      str : MSSyst.String.Ref) return Integer;
   function Find(
      This : access Typ;
      str : MSSyst.String.Ref;
      start : Integer;
      end_k : Integer;
      options : MSSyst.Windows.Forms.RichTextBoxFinds.Valuetype) return Integer;
   function Find(
      This : access Typ;
      characterSet : MSIL_Types.Char_Arr) return Integer;
   function Find(
      This : access Typ;
      str : MSSyst.String.Ref;
      options : MSSyst.Windows.Forms.RichTextBoxFinds.Valuetype) return Integer;
   function Find(
      This : access Typ;
      characterSet : MSIL_Types.Char_Arr;
      start : Integer;
      end_k : Integer) return Integer;
   function Find(
      This : access Typ;
      characterSet : MSIL_Types.Char_Arr;
      start : Integer) return Integer;
   function Find(
      This : access Typ;
      str : MSSyst.String.Ref;
      start : Integer;
      options : MSSyst.Windows.Forms.RichTextBoxFinds.Valuetype) return Integer;
   function get_AllowDrop(
      This : access Typ) return Standard.Boolean;
   function get_AutoSize(
      This : access Typ) return Standard.Boolean;
   function get_AutoWordSelection(
      This : access Typ) return Standard.Boolean;
   function get_BackgroundImage(
      This : access Typ) return MSSyst.Drawing.Image.Ref;
   function get_BulletIndent(
      This : access Typ) return Integer;
   function get_CanRedo(
      This : access Typ) return Standard.Boolean;
   function get_DetectUrls(
      This : access Typ) return Standard.Boolean;
   function get_Font(
      This : access Typ) return MSSyst.Drawing.Font.Ref;
   function get_ForeColor(
      This : access Typ) return MSSyst.Drawing.Color.Valuetype;
   function get_MaxLength(
      This : access Typ) return Integer;
   function get_Multiline(
      This : access Typ) return Standard.Boolean;
   function get_RedoActionName(
      This : access Typ) return MSSyst.String.Ref;
   function get_RightMargin(
      This : access Typ) return Integer;
   function get_Rtf(
      This : access Typ) return MSSyst.String.Ref;
   function get_ScrollBars(
      This : access Typ) return MSSyst.Windows.Forms.RichTextBoxScrollBars.Valuetype;
   function get_SelectedRtf(
      This : access Typ) return MSSyst.String.Ref;
   function get_SelectedText(
      This : access Typ) return MSSyst.String.Ref;
   function get_SelectionAlignment(
      This : access Typ) return MSSyst.Windows.Forms.HorizontalAlignment.Valuetype;
   function get_SelectionBullet(
      This : access Typ) return Standard.Boolean;
   function get_SelectionCharOffset(
      This : access Typ) return Integer;
   function get_SelectionColor(
      This : access Typ) return MSSyst.Drawing.Color.Valuetype;
   function get_SelectionFont(
      This : access Typ) return MSSyst.Drawing.Font.Ref;
   function get_SelectionHangingIndent(
      This : access Typ) return Integer;
   function get_SelectionIndent(
      This : access Typ) return Integer;
   function get_SelectionLength(
      This : access Typ) return Integer;
   function get_SelectionProtected(
      This : access Typ) return Standard.Boolean;
   function get_SelectionRightIndent(
      This : access Typ) return Integer;
   function get_SelectionTabs(
      This : access Typ) return MSIL_Types.Int32_Array;
   function get_SelectionType(
      This : access Typ) return MSSyst.Windows.Forms.RichTextBoxSelectionTypes.Valuetype;
   function get_ShowSelectionMargin(
      This : access Typ) return Standard.Boolean;
   function get_Text(
      This : access Typ) return MSSyst.String.Ref;
   function get_TextLength(
      This : access Typ) return Integer;
   function get_UndoActionName(
      This : access Typ) return MSSyst.String.Ref;
   function get_ZoomFactor(
      This : access Typ) return Float;
   function GetCharFromPosition(
      This : access Typ;
      pt : MSSyst.Drawing.Point.Valuetype) return Wide_Character;
   function GetCharIndexFromPosition(
      This : access Typ;
      pt : MSSyst.Drawing.Point.Valuetype) return Integer;
   function GetLineFromCharIndex(
      This : access Typ;
      index : Integer) return Integer;
   function GetPositionFromCharIndex(
      This : access Typ;
      index : Integer) return MSSyst.Drawing.Point.Valuetype;
   procedure LoadFile(
      This : access Typ;
      data : MSSyst.IO.Stream.Ref;
      fileType : MSSyst.Windows.Forms.RichTextBoxStreamType.Valuetype);
   procedure LoadFile(
      This : access Typ;
      path : MSSyst.String.Ref;
      fileType : MSSyst.Windows.Forms.RichTextBoxStreamType.Valuetype);
   procedure LoadFile(
      This : access Typ;
      path : MSSyst.String.Ref);
   procedure Paste(
      This : access Typ;
      clipFormat : MSSyst.Windows.Forms.DataFormats.Format.Ref);
   procedure Redo(
      This : access Typ);
   procedure remove_ContentsResized(
      This : access Typ;
      value : MSSyst.Windows.Forms.ContentsResizedEventHandler.Ref);
   procedure remove_DoubleClick(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure remove_DragDrop(
      This : access Typ;
      value : MSSyst.Windows.Forms.DragEventHandler.Ref);
   procedure remove_DragEnter(
      This : access Typ;
      value : MSSyst.Windows.Forms.DragEventHandler.Ref);
   procedure remove_DragLeave(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure remove_DragOver(
      This : access Typ;
      value : MSSyst.Windows.Forms.DragEventHandler.Ref);
   procedure remove_GiveFeedback(
      This : access Typ;
      value : MSSyst.Windows.Forms.GiveFeedbackEventHandler.Ref);
   procedure remove_HScroll(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure remove_ImeChange(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure remove_LinkClicked(
      This : access Typ;
      value : MSSyst.Windows.Forms.LinkClickedEventHandler.Ref);
   procedure remove_Protected(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure remove_QueryContinueDrag(
      This : access Typ;
      value : MSSyst.Windows.Forms.QueryContinueDragEventHandler.Ref);
   procedure remove_SelectionChanged(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure remove_VScroll(
      This : access Typ;
      value : MSSyst.EventHandler.Ref);
   procedure SaveFile(
      This : access Typ;
      path : MSSyst.String.Ref;
      fileType : MSSyst.Windows.Forms.RichTextBoxStreamType.Valuetype);
   procedure SaveFile(
      This : access Typ;
      data : MSSyst.IO.Stream.Ref;
      fileType : MSSyst.Windows.Forms.RichTextBoxStreamType.Valuetype);
   procedure SaveFile(
      This : access Typ;
      path : MSSyst.String.Ref);
   procedure set_AllowDrop(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_AutoSize(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_AutoWordSelection(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_BackgroundImage(
      This : access Typ;
      value : MSSyst.Drawing.Image.Ref);
   procedure set_BulletIndent(
      This : access Typ;
      value : Integer);
   procedure set_DetectUrls(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_Font(
      This : access Typ;
      value : MSSyst.Drawing.Font.Ref);
   procedure set_ForeColor(
      This : access Typ;
      value : MSSyst.Drawing.Color.Valuetype);
   procedure set_MaxLength(
      This : access Typ;
      value : Integer);
   procedure set_Multiline(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_RightMargin(
      This : access Typ;
      value : Integer);
   procedure set_Rtf(
      This : access Typ;
      value : MSSyst.String.Ref);
   procedure set_ScrollBars(
      This : access Typ;
      value : MSSyst.Windows.Forms.RichTextBoxScrollBars.Valuetype);
   procedure set_SelectedRtf(
      This : access Typ;
      value : MSSyst.String.Ref);
   procedure set_SelectedText(
      This : access Typ;
      value : MSSyst.String.Ref);
   procedure set_SelectionAlignment(
      This : access Typ;
      value : MSSyst.Windows.Forms.HorizontalAlignment.Valuetype);
   procedure set_SelectionBullet(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_SelectionCharOffset(
      This : access Typ;
      value : Integer);
   procedure set_SelectionColor(
      This : access Typ;
      value : MSSyst.Drawing.Color.Valuetype);
   procedure set_SelectionFont(
      This : access Typ;
      value : MSSyst.Drawing.Font.Ref);
   procedure set_SelectionHangingIndent(
      This : access Typ;
      value : Integer);
   procedure set_SelectionIndent(
      This : access Typ;
      value : Integer);
   procedure set_SelectionLength(
      This : access Typ;
      value : Integer);
   procedure set_SelectionProtected(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_SelectionRightIndent(
      This : access Typ;
      value : Integer);
   procedure set_SelectionTabs(
      This : access Typ;
      value : MSIL_Types.Int32_Arr);
   procedure set_ShowSelectionMargin(
      This : access Typ;
      value : Standard.Boolean);
   procedure set_Text(
      This : access Typ;
      value : MSSyst.String.Ref);
   procedure set_ZoomFactor(
      This : access Typ;
      value : Float);
private
   pragma Convention(MSIL,Typ);
   pragma MSIL_Constructor(new_RichTextBox);
   pragma Import(MSIL,add_ContentsResized,"add_ContentsResized");
   pragma Import(MSIL,add_DoubleClick,"add_DoubleClick");
   pragma Import(MSIL,add_DragDrop,"add_DragDrop");
   pragma Import(MSIL,add_DragEnter,"add_DragEnter");
   pragma Import(MSIL,add_DragLeave,"add_DragLeave");
   pragma Import(MSIL,add_DragOver,"add_DragOver");
   pragma Import(MSIL,add_GiveFeedback,"add_GiveFeedback");
   pragma Import(MSIL,add_HScroll,"add_HScroll");
   pragma Import(MSIL,add_ImeChange,"add_ImeChange");
   pragma Import(MSIL,add_LinkClicked,"add_LinkClicked");
   pragma Import(MSIL,add_Protected,"add_Protected");
   pragma Import(MSIL,add_QueryContinueDrag,"add_QueryContinueDrag");
   pragma Import(MSIL,add_SelectionChanged,"add_SelectionChanged");
   pragma Import(MSIL,add_VScroll,"add_VScroll");
   pragma Import(MSIL,CanPaste,"CanPaste");
   pragma Import(MSIL,Find,"Find");
   pragma Import(MSIL,get_AllowDrop,"get_AllowDrop");
   pragma Import(MSIL,get_AutoSize,"get_AutoSize");
   pragma Import(MSIL,get_AutoWordSelection,"get_AutoWordSelection");
   pragma Import(MSIL,get_BackgroundImage,"get_BackgroundImage");
   pragma Import(MSIL,get_BulletIndent,"get_BulletIndent");
   pragma Import(MSIL,get_CanRedo,"get_CanRedo");
   pragma Import(MSIL,get_DetectUrls,"get_DetectUrls");
   pragma Import(MSIL,get_Font,"get_Font");
   pragma Import(MSIL,get_ForeColor,"get_ForeColor");
   pragma Import(MSIL,get_MaxLength,"get_MaxLength");
   pragma Import(MSIL,get_Multiline,"get_Multiline");
   pragma Import(MSIL,get_RedoActionName,"get_RedoActionName");
   pragma Import(MSIL,get_RightMargin,"get_RightMargin");
   pragma Import(MSIL,get_Rtf,"get_Rtf");
   pragma Import(MSIL,get_ScrollBars,"get_ScrollBars");
   pragma Import(MSIL,get_SelectedRtf,"get_SelectedRtf");
   pragma Import(MSIL,get_SelectedText,"get_SelectedText");
   pragma Import(MSIL,get_SelectionAlignment,"get_SelectionAlignment");
   pragma Import(MSIL,get_SelectionBullet,"get_SelectionBullet");
   pragma Import(MSIL,get_SelectionCharOffset,"get_SelectionCharOffset");
   pragma Import(MSIL,get_SelectionColor,"get_SelectionColor");
   pragma Import(MSIL,get_SelectionFont,"get_SelectionFont");
   pragma Import(MSIL,get_SelectionHangingIndent,"get_SelectionHangingIndent");
   pragma Import(MSIL,get_SelectionIndent,"get_SelectionIndent");
   pragma Import(MSIL,get_SelectionLength,"get_SelectionLength");
   pragma Import(MSIL,get_SelectionProtected,"get_SelectionProtected");
   pragma Import(MSIL,get_SelectionRightIndent,"get_SelectionRightIndent");
   pragma Import(MSIL,get_SelectionTabs,"get_SelectionTabs");
   pragma Import(MSIL,get_SelectionType,"get_SelectionType");
   pragma Import(MSIL,get_ShowSelectionMargin,"get_ShowSelectionMargin");
   pragma Import(MSIL,get_Text,"get_Text");
   pragma Import(MSIL,get_TextLength,"get_TextLength");
   pragma Import(MSIL,get_UndoActionName,"get_UndoActionName");
   pragma Import(MSIL,get_ZoomFactor,"get_ZoomFactor");
   pragma Import(MSIL,GetCharFromPosition,"GetCharFromPosition");
   pragma Import(MSIL,GetCharIndexFromPosition,"GetCharIndexFromPosition");
   pragma Import(MSIL,GetLineFromCharIndex,"GetLineFromCharIndex");
   pragma Import(MSIL,GetPositionFromCharIndex,"GetPositionFromCharIndex");
   pragma Import(MSIL,LoadFile,"LoadFile");
   pragma Import(MSIL,Paste,"Paste");
   pragma Import(MSIL,Redo,"Redo");
   pragma Import(MSIL,remove_ContentsResized,"remove_ContentsResized");
   pragma Import(MSIL,remove_DoubleClick,"remove_DoubleClick");
   pragma Import(MSIL,remove_DragDrop,"remove_DragDrop");
   pragma Import(MSIL,remove_DragEnter,"remove_DragEnter");
   pragma Import(MSIL,remove_DragLeave,"remove_DragLeave");
   pragma Import(MSIL,remove_DragOver,"remove_DragOver");
   pragma Import(MSIL,remove_GiveFeedback,"remove_GiveFeedback");
   pragma Import(MSIL,remove_HScroll,"remove_HScroll");
   pragma Import(MSIL,remove_ImeChange,"remove_ImeChange");
   pragma Import(MSIL,remove_LinkClicked,"remove_LinkClicked");
   pragma Import(MSIL,remove_Protected,"remove_Protected");
   pragma Import(MSIL,remove_QueryContinueDrag,"remove_QueryContinueDrag");
   pragma Import(MSIL,remove_SelectionChanged,"remove_SelectionChanged");
   pragma Import(MSIL,remove_VScroll,"remove_VScroll");
   pragma Import(MSIL,SaveFile,"SaveFile");
   pragma Import(MSIL,set_AllowDrop,"set_AllowDrop");
   pragma Import(MSIL,set_AutoSize,"set_AutoSize");
   pragma Import(MSIL,set_AutoWordSelection,"set_AutoWordSelection");
   pragma Import(MSIL,set_BackgroundImage,"set_BackgroundImage");
   pragma Import(MSIL,set_BulletIndent,"set_BulletIndent");
   pragma Import(MSIL,set_DetectUrls,"set_DetectUrls");
   pragma Import(MSIL,set_Font,"set_Font");
   pragma Import(MSIL,set_ForeColor,"set_ForeColor");
   pragma Import(MSIL,set_MaxLength,"set_MaxLength");
   pragma Import(MSIL,set_Multiline,"set_Multiline");
   pragma Import(MSIL,set_RightMargin,"set_RightMargin");
   pragma Import(MSIL,set_Rtf,"set_Rtf");
   pragma Import(MSIL,set_ScrollBars,"set_ScrollBars");
   pragma Import(MSIL,set_SelectedRtf,"set_SelectedRtf");
   pragma Import(MSIL,set_SelectedText,"set_SelectedText");
   pragma Import(MSIL,set_SelectionAlignment,"set_SelectionAlignment");
   pragma Import(MSIL,set_SelectionBullet,"set_SelectionBullet");
   pragma Import(MSIL,set_SelectionCharOffset,"set_SelectionCharOffset");
   pragma Import(MSIL,set_SelectionColor,"set_SelectionColor");
   pragma Import(MSIL,set_SelectionFont,"set_SelectionFont");
   pragma Import(MSIL,set_SelectionHangingIndent,"set_SelectionHangingIndent");
   pragma Import(MSIL,set_SelectionIndent,"set_SelectionIndent");
   pragma Import(MSIL,set_SelectionLength,"set_SelectionLength");
   pragma Import(MSIL,set_SelectionProtected,"set_SelectionProtected");
   pragma Import(MSIL,set_SelectionRightIndent,"set_SelectionRightIndent");
   pragma Import(MSIL,set_SelectionTabs,"set_SelectionTabs");
   pragma Import(MSIL,set_ShowSelectionMargin,"set_ShowSelectionMargin");
   pragma Import(MSIL,set_Text,"set_Text");
   pragma Import(MSIL,set_ZoomFactor,"set_ZoomFactor");
end MSSyst.Windows.Forms.RichTextBox;
pragma Extensions_Allowed(Off);
pragma Import(MSIL,MSSyst.Windows.Forms.RichTextBox,
   ".ver 1:0:3300:0 .publickeytoken=( b7 7a 5c 56 19 34 e0 89 )",
   "[System.Windows.Forms]System.Windows.Forms.RichTextBox");
