TCustomSortedChartSource

type TCustomSortedChartSource = class(TCustomChartSource)

protected

  FData: TFPList;

  FSorted: Boolean;

  FSortedAutoDetected: Boolean;

  function DoCompare(); virtual;

  procedure DoSort; virtual;

  function GetCount; override;

  function GetItem(); override;

  function GetItemInternal();

  function ItemAdd();

  procedure ItemInsert();

  function ItemFind();

  function ItemModified();

  procedure ItemDeleted();

  procedure ResetSortedAutoDetection;

  procedure SetSortedAutoDetected;

  procedure SetSortBy(); override;

  procedure SetSortDir(); override;

  procedure SetSortIndex(); override;

  procedure SortNoNotify;

  property ItemInternal []: PChartDataItem; [r]

  property OnCompare: TChartSortCompare; [rw]

  property Sorted: Boolean; [rw]

  property UseSortedAutoDetection: Boolean; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  function IsSorted; override;

  procedure Sort;

end;

TCustomSortedChartSource

TCustomChartSource

TBasicChartSource

TObject