Class TframeCustomColor

DescriptionHierarchyFieldsMethodsProperties

Unit

Declaration

type TframeCustomColor = class(TFrame)

Description

Hierarchy

Overview

Fields

Implicit pcChoices: TPageControl;
Implicit tabSelection: TTabSheet;
Implicit lblDataSet: TLabel;
Implicit lblColorScheme: TLabel;
Implicit lblCycles: TLabel;
Implicit pbColorScheme: TPaintBox;
Implicit lblColorAdjustment: TLabel;
Implicit lblComment: TLabel;
Implicit comboColorScheme: TComboBox;
Implicit seCycles: TJvSpinEdit;
Implicit jsColorExponent: TJvxSlider;
Implicit seColorExponent: TJvSpinEdit;
Implicit cbLogTransform: TCheckBox;
Implicit udDataSets: TJvUpDown;
Implicit rgUpdateLimitChoice: TRadioGroup;
Implicit virttreecomboDataSets: TRbwStringTreeCombo;
Implicit tabFilters: TTabSheet;
Implicit lblLowerLimit: TLabel;
Implicit lblUpperLimit: TLabel;
Implicit lblValuesToIgnore: TLabel;
Implicit lblNumberOfValuesToIgnore: TLabel;
Implicit lblEpsilon: TLabel;
Implicit frameCheck3DMax: TframeDisplayLimit;
Implicit frameCheck3DMin: TframeDisplayLimit;
Implicit cbActiveOnly: TCheckBox;
Implicit rdgValuesToIgnore: TRbwDataGrid4;
Implicit seNumberOfValuesToIgnore: TJvSpinEdit;
Implicit rdeEpsilon: TRbwDataEntry;
Implicit tabLegend: TTabSheet;
Implicit imLegend: TImage;
Implicit pnlLegend: TPanel;
Implicit lblMethod: TLabel;
Implicit lblColorLegendRows: TLabel;
Implicit comboMethod: TComboBox;
Implicit seLegendRows: TJvSpinEdit;
Implicit rdgLegend: TRbwDataGrid4;
Implicit timerLegend: TTimer;
Implicit reComment: TRichEdit;
Implicit btnColorSchemes: TButton;
Private FDataSetDummyObjects: TList;
Private FSelectedVirtNode: PVirtualNode;
Private FUpdatingLegend: Boolean;
Private FStartTime: TDateTime;
Protected FStoredLegend: TLegend;
Protected FLegend: TLegend;
Protected FFrontItems: TStringList;
Protected FSideItems: TStringList;
Protected FTopItems: TStringList;

Methods

Implicit procedure seNumberOfValuesToIgnoreChange(Sender: TObject);
Implicit procedure seLegendRowsChange(Sender: TObject);
Implicit procedure pbColorSchemePaint(Sender: TObject);
Implicit procedure comboColorSchemeChange(Sender: TObject);
Implicit procedure seCyclesChange(Sender: TObject);
Implicit procedure seCyclesKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
Implicit procedure jsColorExponentChange(Sender: TObject);
Implicit procedure seColorExponentChange(Sender: TObject);
Implicit procedure virttreecomboDataSetsChange(Sender: TObject);
Implicit procedure virttreecomboDataSetsTreeChange(Sender: TBaseVirtualTree; Node: PVirtualNode);
Implicit procedure virttreecomboDataSetsTreeGetText(Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType; var CellText: string);
Implicit procedure virttreecomboDataSetsTreeInitNode(Sender: TBaseVirtualTree; ParentNode, Node: PVirtualNode; var InitialStates: TVirtualNodeInitStates);
Implicit procedure udDataSetsChangingEx(Sender: TObject; var AllowChange: Boolean; NewValue: SmallInt; Direction: TUpDownDirection);
Implicit procedure rdgValuesToIgnoreEndUpdate(Sender: TObject);
Implicit procedure comboMethodChange(Sender: TObject);
Implicit procedure rdgLegendEndUpdate(Sender: TObject);
Implicit procedure rdgLegendSetEditText(Sender: TObject; ACol, ARow: Integer; const Value: string);
Implicit procedure rdgLegendStateChange(Sender: TObject; ACol, ARow: Integer; const Value: TCheckBoxState);
Implicit procedure FrameResize(Sender: TObject);
Implicit procedure timerLegendTimer(Sender: TObject);
Implicit procedure btnColorSchemesClick(Sender: TObject);
Private procedure UpdateLegendAfterDelay;
Private function GetLegendDataSource: TObserver;
Private procedure SetLegendDataSource(const Value: TObserver);
Private function CanColorDataSet(DataArray: TDataArray): boolean;
Protected function GetSelectedArray: TDataArray; virtual; abstract;
Protected procedure GetDataSets;
Protected procedure StoreDataSetsInLists;
Protected procedure FinalizeList(List: TStringList);
Protected procedure SetSelectedNode(Sender: TBaseVirtualTree; Node: PVirtualNode);
Protected procedure RetrieveSelectedObject(var AnObject: TObject);
Protected procedure AssignLimits(DataType: TRbwDataType; Limits: TColoringLimits);
Protected procedure ReadLimits(DataType: TRbwDataType; Limits: TColoringLimits);
Protected procedure UpdateLegend;
Protected procedure Loaded; override;
Public procedure ResetTreeText;
Public destructor Destroy; override;
Public procedure SetData; virtual; abstract;
Public procedure UpdateColorSchemes;

Properties

Public property LegendDataSource: TObserver read GetLegendDataSource write SetLegendDataSource;
Public property SelectedVirtNode: PVirtualNode read FSelectedVirtNode;

Description

Fields

Implicit pcChoices: TPageControl;
 
Implicit tabSelection: TTabSheet;
 
Implicit lblDataSet: TLabel;

lblDataSet displays "Data set or boundary condition".

Implicit lblColorScheme: TLabel;

lblColorScheme displays "Color scheme".

Implicit lblCycles: TLabel;

lblCycles labels seCycles.

Implicit pbColorScheme: TPaintBox;

pbColorScheme is used to give a preview of the color schemes listed in comboColorScheme. See pbColorSchemePaint.

Implicit lblColorAdjustment: TLabel;
 
Implicit lblComment: TLabel;
 
Implicit comboColorScheme: TComboBox;

comboColorScheme displays a list of the different methods for converting a value in the TDataArray used for coloring the TPhastGrid to a color.

Implicit seCycles: TJvSpinEdit;
 
Implicit jsColorExponent: TJvxSlider;
 
Implicit seColorExponent: TJvSpinEdit;
 
Implicit cbLogTransform: TCheckBox;
 
Implicit udDataSets: TJvUpDown;
 
Implicit rgUpdateLimitChoice: TRadioGroup;
 
Implicit virttreecomboDataSets: TRbwStringTreeCombo;
 
Implicit tabFilters: TTabSheet;
 
Implicit lblLowerLimit: TLabel;

lblLowerLimit displays "Lower limit".

Implicit lblUpperLimit: TLabel;
 
Implicit lblValuesToIgnore: TLabel;
 
Implicit lblNumberOfValuesToIgnore: TLabel;
 
Implicit lblEpsilon: TLabel;
 
Implicit frameCheck3DMax: TframeDisplayLimit;

frameCheck3DMax is used to set the maximum value used to color the grid.

Implicit frameCheck3DMin: TframeDisplayLimit;

frameCheck3DMin is used to set the minimum value used to color the grid.

Implicit cbActiveOnly: TCheckBox;
 
Implicit rdgValuesToIgnore: TRbwDataGrid4;
 
Implicit seNumberOfValuesToIgnore: TJvSpinEdit;
 
Implicit rdeEpsilon: TRbwDataEntry;
 
Implicit tabLegend: TTabSheet;
 
Implicit imLegend: TImage;
 
Implicit pnlLegend: TPanel;
 
Implicit lblMethod: TLabel;
 
Implicit lblColorLegendRows: TLabel;
 
Implicit comboMethod: TComboBox;
 
Implicit seLegendRows: TJvSpinEdit;
 
Implicit rdgLegend: TRbwDataGrid4;
 
Implicit timerLegend: TTimer;
 
Implicit reComment: TRichEdit;
 
Implicit btnColorSchemes: TButton;
 
Private FDataSetDummyObjects: TList;

FDataSetDummyObjects is implemented as a TObjectList.

Private FSelectedVirtNode: PVirtualNode;
 
Private FUpdatingLegend: Boolean;
 
Private FStartTime: TDateTime;
 
Protected FStoredLegend: TLegend;

Private declarations

Protected FLegend: TLegend;
 
Protected FFrontItems: TStringList;

FFrontItems stores a list of the TDataArrays or boundary conditions that can be displayed on the front view of the model. The Objects property of FFrontItems contains either the corresponding TDataArray or the corresponding TPhastTimeList.

Protected FSideItems: TStringList;

FSideItems stores a list of the TDataArrays or boundary conditions that can be displayed on the side view of the model. The Objects property of FSideItems contains either the corresponding TDataArray or the corresponding TPhastTimeList.

Protected FTopItems: TStringList;

FTopItems stores a list of the TDataArrays or boundary conditions that can be displayed on the top view of the model. The Objects property of FTopItems contains either the corresponding TDataArray or the corresponding TPhastTimeList.

Methods

Implicit procedure seNumberOfValuesToIgnoreChange(Sender: TObject);
 
Implicit procedure seLegendRowsChange(Sender: TObject);
 
Implicit procedure pbColorSchemePaint(Sender: TObject);

pbColorSchemePaint gives a preview of the color scheme selected in comboColorScheme.

Implicit procedure comboColorSchemeChange(Sender: TObject);
 
Implicit procedure seCyclesChange(Sender: TObject);
 
Implicit procedure seCyclesKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
 
Implicit procedure jsColorExponentChange(Sender: TObject);
 
Implicit procedure seColorExponentChange(Sender: TObject);
 
Implicit procedure virttreecomboDataSetsChange(Sender: TObject);
 
Implicit procedure virttreecomboDataSetsTreeChange(Sender: TBaseVirtualTree; Node: PVirtualNode);
 
Implicit procedure virttreecomboDataSetsTreeGetText(Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType; var CellText: string);
 
Implicit procedure virttreecomboDataSetsTreeInitNode(Sender: TBaseVirtualTree; ParentNode, Node: PVirtualNode; var InitialStates: TVirtualNodeInitStates);
 
Implicit procedure udDataSetsChangingEx(Sender: TObject; var AllowChange: Boolean; NewValue: SmallInt; Direction: TUpDownDirection);
 
Implicit procedure rdgValuesToIgnoreEndUpdate(Sender: TObject);
 
Implicit procedure comboMethodChange(Sender: TObject);
 
Implicit procedure rdgLegendEndUpdate(Sender: TObject);
 
Implicit procedure rdgLegendSetEditText(Sender: TObject; ACol, ARow: Integer; const Value: string);
 
Implicit procedure rdgLegendStateChange(Sender: TObject; ACol, ARow: Integer; const Value: TCheckBoxState);
 
Implicit procedure FrameResize(Sender: TObject);
 
Implicit procedure timerLegendTimer(Sender: TObject);
 
Implicit procedure btnColorSchemesClick(Sender: TObject);
 
Private procedure UpdateLegendAfterDelay;
 
Private function GetLegendDataSource: TObserver;
 
Private procedure SetLegendDataSource(const Value: TObserver);
 
Private function CanColorDataSet(DataArray: TDataArray): boolean;
 
Protected function GetSelectedArray: TDataArray; virtual; abstract;

GetSelectedArray fills virttreecomboDataSets with data about the things that can be used to color the grid. GetSelectedArray retrieves the data about the TDataArray used to color the TPhastGrid.

Protected procedure GetDataSets;
 
Protected procedure StoreDataSetsInLists;
 
Protected procedure FinalizeList(List: TStringList);
 
Protected procedure SetSelectedNode(Sender: TBaseVirtualTree; Node: PVirtualNode);
 
Protected procedure RetrieveSelectedObject(var AnObject: TObject);
 
Protected procedure AssignLimits(DataType: TRbwDataType; Limits: TColoringLimits);
 
Protected procedure ReadLimits(DataType: TRbwDataType; Limits: TColoringLimits);
 
Protected procedure UpdateLegend;
 
Protected procedure Loaded; override;
 
Public procedure ResetTreeText;
 
Public destructor Destroy; override;
 
Public procedure SetData; virtual; abstract;
 
Public procedure UpdateColorSchemes;
 

Properties

Public property LegendDataSource: TObserver read GetLegendDataSource write SetLegendDataSource;
 
Public property SelectedVirtNode: PVirtualNode read FSelectedVirtNode;
 

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:32