TTextStrings

type TTextStrings = class(TStrings)

protected

  FArraysValid: Boolean;

FArraysValid - local boolean flag to indicate whether arrays are valid

  FLineCount: Integer;

FLineCount - local variable with number of lines

  FLineCapacity: Integer;

FLineCapacity - local variable with capacity of lines

  FLineRanges: ;

FLineRanges - local variable, a pointer to an array of TTextLineRange

  FText: String;

FText - local variable holding the test string under consideration

  FUpdateCount: Integer;

  FChangedWhileUpdate: Boolean;

FChangedWhileUpdate - local flag to indicate whether there were changes during the update

  function GetTextStr; override;

  procedure SetTextStr(); override;

  procedure BuildArrays; virtual;

BuildArrays - method for building arrays

  function GetCount; override;

  procedure Changed; virtual;

Changed - software emulation of OnChange event

  procedure Changing; virtual;

Changing - software emulation of OnChanging event

  function Get(); override;

  procedure ClearArrays;

ClearArrays - method for clearing arrays

  function GetObject(); override;

  procedure Put(); override;

  procedure PutObject(); override;

  function GetLineLen();

GetLineLen - returns length of indexed line (including new characters if boolean flag set True)

  function GetLineEnd();

  function HasObjects;

  function CountLineEndings();

public

  constructor Create;

  destructor Destroy; override;

  procedure Clear; override;

  procedure SetText(); override;

  procedure Insert(); override;

  procedure Delete(); override;

  procedure Exchange(); override;

  procedure Move(); override;

  procedure MakeTextBufferUnique;

MakeTextBufferUnique - makes the current text buffer unique

  procedure BeginUpdate;

  procedure EndUpdate;

  function GetText; override;

  function IndexOf(); override;

  function Add(); override;

  function AddObject(); override;

  procedure AddStrings(); override;

  property Text: String; [rw]

  property OnChange: TNotifyEvent; [rw]

OnChange - event handler for a change in the data or text

  property OnChanging: TNotifyEvent; [rw]

OnChanging - event handler for use while the data or text are changing

end;

TTextStrings

TTextStrings a TStrings descendant that is optimized for handling the complete text as whole (instead of line by line as in TStringList)

TStrings

TPersistent

TObject