TWorldFloorAtZAxis

type TWorldFloorAtZAxis = class(TWorldHeightMap)

protected

  fPosition: Single;

  procedure Initialize; override;

  procedure Finalize; override;

  procedure WriteToFiler(); override;

  procedure ReadFromFiler(); override;

  procedure SetPosition();

public

  constructor Create(); override;

  destructor Destroy; override;

  class function FriendlyName; override;

  class function FriendlyDescription; override;

  class function UniqueItem; override;

published

  property Position: Single; [rw]

end;

TWorldFloorAtZAxis

TWorldHeightMap

TObject