Class TDiagramModelMerger

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TDiagramModelMerger = class(TAbstractDiagramModel)

Description

This model merges several models together, so they can be drawn at the same time It can also hide certain rows

Hierarchy

Overview

Methods

Public procedure addModel(model: TAbstractDiagramModel; takeOwnership: boolean=false);
Public procedure replaceModel(oldModel, newModel: TAbstractDiagramModel; takeOwnership: boolean=false);
Public procedure removeModel(model:TAbstractDiagramModel);
Public procedure removeAllModels();
Public procedure deleteModel(i:longint);
Public procedure SetModel(i: longint; const AValue: TAbstractDiagramModel; takeOwnerShip: boolean=false);
Public constructor create;
Public constructor create(model: TAbstractDiagramModel; takeOwnership: boolean=false);
Public constructor create(model1, model2: TAbstractDiagramModel; takeOwnership1:boolean=false; takeOwnership2: boolean=false);
Public destructor destroy; override;
Public function dataRows: longint; override;
Public function dataTitle(i:longint):string; override;
Public procedure setupCanvasForData(i:longint; c: TCanvas); override;
Public function dataPoints(i:longint):longint; override;
Public procedure data(i,j:longint; out x,y:float); override;
Public function setData(i,j:longint; const x,y:float):integer; override;
Public function addData(i:longint; const x,y:float):integer; override;
Public procedure removeData(i,j:longint); override;
Public function minX(i:longint):float; override;
Public function maxX(i:longint):float; override;
Public function minY(i:longint):float; override;
Public function maxY(i:longint):float; override;
Public function getFlags: TModelFlags; override;
Public function getRowFlags(i:longint): TModelRowFlags; override;
Public function getRowLineStyle(i:longint):TLineStyle; override;
Public function getRowPointStyle(i:longint):TPointStyle; override;

Properties

Public property Models[i:longint]: TAbstractDiagramModel read GetModel write SetModel;
Public property HideCertainRows: boolean read FHideCertainRows write SetHideCertainRows;
Public property RowVisibleAt[i:integer]: boolean read GetRowVisible write SetRowVisible;
Public property BaseModel: integer read FBaseModel write SetBaseModel;

Description

Methods

Public procedure addModel(model: TAbstractDiagramModel; takeOwnership: boolean=false);

adds a model to the model list (if takeOwnership is true, this model is automatically freed in the destructor)

Public procedure replaceModel(oldModel, newModel: TAbstractDiagramModel; takeOwnership: boolean=false);

removes an model from the list and adds a new one at this position (or at the end if oldModel don't exist)

Public procedure removeModel(model:TAbstractDiagramModel);

removes a certain model (and frees it, if takeOwnership was true)

Public procedure removeAllModels();

removes all models (and frees them, if takeOwnership was true)

Public procedure deleteModel(i:longint);

Deletes a model

Public procedure SetModel(i: longint; const AValue: TAbstractDiagramModel; takeOwnerShip: boolean=false);

Sets a model

Public constructor create;
 
Public constructor create(model: TAbstractDiagramModel; takeOwnership: boolean=false);
 
Public constructor create(model1, model2: TAbstractDiagramModel; takeOwnership1:boolean=false; takeOwnership2: boolean=false);
 
Public destructor destroy; override;
 
Public function dataRows: longint; override;
 
Public function dataTitle(i:longint):string; override;
 
Public procedure setupCanvasForData(i:longint; c: TCanvas); override;
 
Public function dataPoints(i:longint):longint; override;
 
Public procedure data(i,j:longint; out x,y:float); override;
 
Public function setData(i,j:longint; const x,y:float):integer; override;
 
Public function addData(i:longint; const x,y:float):integer; override;
 
Public procedure removeData(i,j:longint); override;
 
Public function minX(i:longint):float; override;
 
Public function maxX(i:longint):float; override;
 
Public function minY(i:longint):float; override;
 
Public function maxY(i:longint):float; override;
 
Public function getFlags: TModelFlags; override;

returns model flags (e.g. editable)

Public function getRowFlags(i:longint): TModelRowFlags; override;

returns flags for a given row

Public function getRowLineStyle(i:longint):TLineStyle; override;

overrides drawer line style

Public function getRowPointStyle(i:longint):TPointStyle; override;

overrides drawer line style

Properties

Public property Models[i:longint]: TAbstractDiagramModel read GetModel write SetModel;
 
Public property HideCertainRows: boolean read FHideCertainRows write SetHideCertainRows;

This controls if there are invisible rows. Set it to false to make all rows visible

Public property RowVisibleAt[i:integer]: boolean read GetRowVisible write SetRowVisible;

If RowVisibleAt[i] is false, the row with number i is hidden Notice that this don't track rows, e.g. if you have one hidden row and remove this one, the row with its number (= the next row, after the deleted one) will be hidden Setting it to false for one (existing) index, sets HideCertainRows to true And hidden rows seems to be completely removed from this model, so if row 0 is hidden, data(0,...) returns the data for row 1 (of course only if row 1 isn't hidden) (the sub models this model is based on aren't effected at all)

Public property BaseModel: integer read FBaseModel write SetBaseModel;

Model used for row independent properies (e.g. model flags)


Generated by PasDoc 0.11.0 on 2012-07-31 14:28:32