TRLRichParser

type TRLRichParser = class(TRLRichElement)

protected

  FormattedWidth: Integer;

  FormattedWrap: Boolean;

  function GetBookmark;

  procedure GotoBookmark();

  procedure SkipNulls;

  procedure SkipSpaces;

  function ReadCh();

  function ReadThisCh();

  function ReadThisText();

  function ReadAnyWord();

  function ReadThisWord();

  function ReadAnyNum();

  function ReadAnyLiteralCh();

  function ReadAnyTextualCh();

  function ReadAnyCtrlCh();

  function ReadAnyLiteral();

  function ReadAnyTextual();

  function ReadAnyCtrlWord();

  function ReadThisCtrlWord();

  function ReadFileHeader;

  function ReadFontItem;

  function ReadFontTable;

  function ReadColorItem;

  function ReadColorTable;

  function ReadAnyImage;

  function ReadAnyGroup;

  function ReadDocumentBody;

  function ReadDocument;

  function NewParagraph();

  procedure CopyStyleToCanvas();

public

  DefaultFontName: string;

  DefaultRedValue: Byte;

  DefaultGreenValue: Byte;

  DefaultBlueValue: Byte;

  WordWrap: Boolean;

  WrapMargin: Integer;

  TextCRC: Cardinal;

  TextLength: Integer;

  TextSize: TPoint;

  constructor Create(); override;

  destructor Destroy; override;

  procedure Clear;

  procedure LoadFromStream();

  procedure SetText();

  procedure PaintTo();

  procedure Format();

  property Paragraphs []: TRLRichParagraph; default; [r]

end;

TRLRichParser

TRLRichElement

TObject