TCharDefs

type TCharDefs = class(TPersistent)

protected

  procedure DefineProperties(); override;

public

  constructor Create();

  destructor Destroy; override;

  procedure Add();

  procedure Assign(); override;

  procedure Clear;

  procedure Delete();

  function DotRowsToString();

  function Find();

  procedure LoadFromFile();

  function SameDotRows();

  procedure SaveToFile();

  property Count: Integer; [r]

  property CharByIndex []: string; [r]

  property DotRows []: TDotRows; [rw]

  property DotRowsByIndex []: TDotRows; [r]

published

  property ColCount: Integer; [rw]

  property RowCount: Integer; [rw]

end;

TCharDefs

TObject