Class TUndoEditFluxObservations

DescriptionHierarchyFieldsMethodsProperties

Unit

UndoItems

Declaration

type TUndoEditFluxObservations = class(TCustomUndo)

Description

no description available, TCustomUndo description follows

TCustomUndo is an abstract base class used as an ancestor of all TUndoItems in ModelMuse.

Hierarchy

Overview

Fields

Private FOldChobObservations: TFluxObservationGroups;
Private FNewChobObservations: TFluxObservationGroups;
Private FOldDrobObservations: TFluxObservationGroups;
Private FNewDrobObservations: TFluxObservationGroups;
Private FOldGbobObservations: TFluxObservationGroups;
Private FNewGbobObservations: TFluxObservationGroups;
Private FOldRvobObservations: TFluxObservationGroups;
Private FNewRvobObservations: TFluxObservationGroups;
Private FOldMt3dObs: TMassFluxObs;
Private FNewMt3dObs: TMassFluxObs;

Methods

Private procedure AssignMt3dObsToModel(MtsdObs: TMassFluxObs);
Private procedure FillMt3dLists(var Mt3dObs: TMassFluxObs);
Protected function Description: string; override;
Public Constructor Create;
Public procedure AssignNewObservations(NewChobObservations, NewDrobObservations, NewGbobObservations, NewRvobObservations: TFluxObservationGroups; var NewMtsdObs: TMassFluxObs);
Public Destructor Destroy; override;
Public procedure DoCommand; override;
Public procedure Undo; override;

Description

Fields

Private FOldChobObservations: TFluxObservationGroups;
 
Private FNewChobObservations: TFluxObservationGroups;
 
Private FOldDrobObservations: TFluxObservationGroups;
 
Private FNewDrobObservations: TFluxObservationGroups;
 
Private FOldGbobObservations: TFluxObservationGroups;
 
Private FNewGbobObservations: TFluxObservationGroups;
 
Private FOldRvobObservations: TFluxObservationGroups;
 
Private FNewRvobObservations: TFluxObservationGroups;
 
Private FOldMt3dObs: TMassFluxObs;
 
Private FNewMt3dObs: TMassFluxObs;
 

Methods

Private procedure AssignMt3dObsToModel(MtsdObs: TMassFluxObs);
 
Private procedure FillMt3dLists(var Mt3dObs: TMassFluxObs);
 
Protected function Description: string; override;
 
Public Constructor Create;
 
Public procedure AssignNewObservations(NewChobObservations, NewDrobObservations, NewGbobObservations, NewRvobObservations: TFluxObservationGroups; var NewMtsdObs: TMassFluxObs);
 
Public Destructor Destroy; override;
 
Public procedure DoCommand; override;
 
Public procedure Undo; override;
 
Generated by PasDoc 0.12.1 on 2013-05-13 15:42:06