Class TTimeSeriesReader

Unit

PathlineReader

Declaration

type TTimeSeriesReader = class(TTimeSeriesSettings)

Description

Hierarchy

• TPersistent
• TCustomModpathSettings
• TTimeSeriesSettings
• TTimeSeriesReader

Overview

Fields

	FFileName: string;
	FFileDate: TDateTime;
	FSeries: TTimeSeriesCollection;
	FSeriesV6: TTimeSeriesCollectionV6;
	FMaxTime: double;
	FMinTime: double;
	FTimeIndex: integer;
	FDrawingTimeSeries: Boolean;
	FTimeSeriesGLIndex: array of TGLuint;
	FRecordedTimeSeries: array of Boolean;
	FRealList: TRealList;
	FModel: TBaseModel;
	FMaxParticleGroup: Integer;
	FMinParticleGroup: Integer;

Methods

	procedure SetFileDate(const Value: TDateTime);
	procedure SetLines(const Value: TTimeSeriesCollection);
	procedure SetMaxTime(const Value: double);
	procedure SetMinTime(const Value: double);
	procedure SetTimeIndex(const Value: integer);
	procedure GetMinMaxValues(var MaxValue: Double; var MinValue: Double);
	function CheckShowSeries(Series: TCustomTimeSeries): Boolean;
	function GetPointColor(MaxValue, MinValue: double; Point: TTimeSeriesPoint): TColor;
	function GetRecordedTimeSeries(ATimeIndex: integer): boolean;
	procedure SetRecordedTimeSeries(ATimeIndex: integer; const Value: boolean);
	function GetTimeSeriesGLIndex(ATimeIndex: integer): TGLuint;
	procedure Record3DTimeSeries(TimeIndex: integer);
	procedure EnsureGLArrays(ATimeIndex: Integer);
	function GetTimes: TRealList;
	procedure SetTimes(const Value: TRealList);
	procedure SetLinesV6(const Value: TTimeSeriesCollectionV6);
	procedure ReadFileV5;
	procedure ReadFileV6;
	procedure SetMaxParticleGroup(const Value: Integer);
	procedure SetMinParticleGroup(const Value: Integer);
	procedure Assign(Source: TPersistent); override;
	constructor Create(Model: TBaseModel);
	Destructor Destroy; override;
	procedure ReadFile;
	procedure Draw(Orientation: TDataSetOrientation; const BitMap: TBitmap32);
	procedure Draw3D;
	procedure Invalidate;
	procedure ExportShapefile(FileName: string);

Properties

	property RecordedTimeSeries[ATimeIndex:integer]: boolean read GetRecordedTimeSeries write SetRecordedTimeSeries;
	property TimeSeriesGLIndex[ATimeIndex:integer]: TGLuint read GetTimeSeriesGLIndex;
	property Times: TRealList read GetTimes write SetTimes;
	property FileName: string read FFileName write FFileName;
	property FileDate: TDateTime read FFileDate write SetFileDate;
	property Series: TTimeSeriesCollection read FSeries write SetLines;
	property SeriesV6: TTimeSeriesCollectionV6 read FSeriesV6 write SetLinesV6;
	property MaxTime: double read FMaxTime write SetMaxTime;
	property MinTime: double read FMinTime write SetMinTime;
	property TimeIndex: integer read FTimeIndex write SetTimeIndex;
	property MinParticleGroup: Integer read FMinParticleGroup write SetMinParticleGroup;
	property MaxParticleGroup: Integer read FMaxParticleGroup write SetMaxParticleGroup;

Description

Fields

	FFileName: string;

	FFileDate: TDateTime;

	FSeries: TTimeSeriesCollection;

	FSeriesV6: TTimeSeriesCollectionV6;

	FMaxTime: double;

	FMinTime: double;

	FTimeIndex: integer;

	FDrawingTimeSeries: Boolean;

	FTimeSeriesGLIndex: array of TGLuint;

	FRecordedTimeSeries: array of Boolean;

	FRealList: TRealList;

	FModel: TBaseModel;

	FMaxParticleGroup: Integer;

	FMinParticleGroup: Integer;

Methods

	procedure SetFileDate(const Value: TDateTime);

	procedure SetLines(const Value: TTimeSeriesCollection);

	procedure SetMaxTime(const Value: double);

	procedure SetMinTime(const Value: double);

	procedure SetTimeIndex(const Value: integer);

	procedure GetMinMaxValues(var MaxValue: Double; var MinValue: Double);

	function CheckShowSeries(Series: TCustomTimeSeries): Boolean;

	function GetPointColor(MaxValue, MinValue: double; Point: TTimeSeriesPoint): TColor;

	function GetRecordedTimeSeries(ATimeIndex: integer): boolean;

	procedure SetRecordedTimeSeries(ATimeIndex: integer; const Value: boolean);

	function GetTimeSeriesGLIndex(ATimeIndex: integer): TGLuint;

	procedure Record3DTimeSeries(TimeIndex: integer);

	procedure EnsureGLArrays(ATimeIndex: Integer);

	function GetTimes: TRealList;

	procedure SetTimes(const Value: TRealList);

	procedure SetLinesV6(const Value: TTimeSeriesCollectionV6);

	procedure ReadFileV5;

	procedure ReadFileV6;

	procedure SetMaxParticleGroup(const Value: Integer);

	procedure SetMinParticleGroup(const Value: Integer);

	procedure Assign(Source: TPersistent); override;

	constructor Create(Model: TBaseModel);

	Destructor Destroy; override;

	procedure ReadFile;

	procedure Draw(Orientation: TDataSetOrientation; const BitMap: TBitmap32);

	procedure Draw3D;

	procedure Invalidate;

	procedure ExportShapefile(FileName: string);

Properties

	property RecordedTimeSeries[ATimeIndex:integer]: boolean read GetRecordedTimeSeries write SetRecordedTimeSeries;

	property TimeSeriesGLIndex[ATimeIndex:integer]: TGLuint read GetTimeSeriesGLIndex;

	property Times: TRealList read GetTimes write SetTimes;

	property FileName: string read FFileName write FFileName;

	property FileDate: TDateTime read FFileDate write SetFileDate;

	property Series: TTimeSeriesCollection read FSeries write SetLines;

	property SeriesV6: TTimeSeriesCollectionV6 read FSeriesV6 write SetLinesV6;

	property MaxTime: double read FMaxTime write SetMaxTime;

	property MinTime: double read FMinTime write SetMinTime;

	property TimeIndex: integer read FTimeIndex write SetTimeIndex;

	property MinParticleGroup: Integer read FMinParticleGroup write SetMinParticleGroup;

	property MaxParticleGroup: Integer read FMaxParticleGroup write SetMaxParticleGroup;