TEarthLayerStore

type TEarthLayerStore = class(TEarthENVPersistent)

protected

  function GetLayer(); virtual;

  function GetLayerStoreMER; virtual;

  procedure SetCount(); virtual;

  function GetParentLayer;

public

  constructor Create(); virtual;

  destructor Destroy; override;

  procedure RedrawObject; override;

  procedure Assign(); override;

  procedure WriteProperties(); virtual;

  procedure ReadProperties(); virtual;

  procedure WriteToSteam();

  procedure ReadFromSteam();

  procedure LoadEnvironment(); override;

  function SaveEnvironment; override;

  procedure Clear; virtual;

  function IndexOf(); virtual;

  function IndexByName(); virtual;

  function ByName(); virtual;

  function AddNew;

  procedure Add(); virtual;

  procedure Remove(); virtual;

  procedure Delete(); virtual;

  procedure DeleteByName(); virtual;

  procedure Move(); virtual;

  function ObjectAtLL(); virtual;

  function ObjectAtXY(); virtual;

  function ObjectByTitle(); virtual;

  function ObjectByID(); virtual;

  procedure ObjectsUnSelectAll;

  procedure Render(); virtual;

  property Count: Integer; [rw]

  property Earth: TCustomEarth; [r]

  property Parent: TPersistent; [r]

  property GlobalPresenters: TEarthPresenterStore; [rw]

  property Layer []: TEarthLayer; default; [r]

  property LayerStoreMER: TMER; [r]

end;

TEarthLayerStore

TEarthENVPersistent

TEarthRoot

TObject