Gorilla.UI.TransitionsFrame

Unit Gorilla.UI.TransitionsFrame.pas

Classes

TTransitionFlowChartAnimationPattern = class ( TFlowChartItemPattern )
TTransitionFlowChartFrame = class ( TPanel )
TTransitionFlowChartForm = class ( TForm )

TTransitionFlowChartAnimationPattern

Ancestors

-TFlowChartItemPattern

-TFlowChartRectanglePattern

-TFlowChartPattern

Members

Methods

public constructor Create ( AOwner : TComponent ) ;
protected function GetDisplayName ( ) : string ; override;
protected function GetAnimationId ( ) : string ;
protected function GetTransitionFrame ( AFlowChart : TFlowChartFrame ) : TTransitionFlowChartFrame ;
protected procedure DoOnSetup ( ) ; override;
protected procedure DoOnGetDisplayName ( ASender : TFlowChartPattern; var AName : string ) ;
protected procedure DoOnBuilt ( ASender : TFlowChartPattern; const ASource : TFlowChartPattern ) ;
protected procedure DoOnMoved ( ASender : TFlowChartPattern ) ;
protected procedure DoOnAttached ( ASender : TFlowChartPattern; const ASource : TFlowChartPattern ) ;
protected procedure DoOnUnattached ( ASender : TFlowChartPattern; const ASource : TFlowChartPattern ) ;
protected procedure DoOnCanLink ( ASource : TFlowChartPattern; ADest : TFlowChartPattern; var AAllowed : Boolean ) ;
protected procedure DoOnCanDeleteTransition ( ASource : TFlowChartPattern; ADest : TFlowChartPattern; var AAllowed : Boolean ) ;
protected procedure DoOnEditTransition ( ASender : TFlowChartPattern; const ASource : TFlowChartPattern ) ;
public procedure UpdatePattern ( ) ;

Properties

public AnimationId : string
read GetAnimationId

TTransitionFlowChartFrame

Ancestors

-TPresentedControl

-TStyledControl

Members

Fields

private FLeftTab : TPanel
private FRightTab : TPanel
private FSplitter : TSplitter
private FModelView : TModelViewerFrame
private FFlowChart : TFlowChartFrame
private FManager : TFlowChartManagerFrame
private FEditor : TFlowChartEditorFrame
private FScrollBox : TVertScrollBox
private FTemplates : TTransitionTemplates
private FLayersBox : TComboBox
private FLayerAddBtn : TButton
private FLayerRemBtn : TButton
private FAnimTreeTab : TTabItem
private FAnimTree : TTreeView
private FTransTreeTab : TTabItem
private FTransTree : TTreeView
private FSource : TGorillaAnimationController
private FActiveLayer : string

Methods

public constructor Create ( AOwner : TComponent ) ;
public destructor Destroy ( ) ;
private procedure DoOnApplyEditor ( const AItem : TObject; const AUIElement : TFlowChartPattern ) ;
private procedure DoOnLayerChange ( ASender : TObject ) ;
private procedure DoOnAddLayer ( ASender : TObject ) ;
private procedure DoOnRemoveLayer ( ASender : TObject ) ;
private procedure SetActiveLayer ( const AValue : string ) ;
private function GetActiveLayer ( ) : TGorillaAnimationTransitionLayer ;
public procedure Cleanup ( ) ;
public procedure Setup ( ) ;
public procedure CreateTemplates ( ASource : TGorillaAnimationController ) ;
public procedure UpdateAnimations ( ) ;
public procedure UpdateLayers ( ) ;
public procedure UpdateTransitions ( ) ;
public procedure AddLayer ( ) ;
public function IsLayerActive ( ) : Boolean ;
public procedure LoadModel ( const AFilename : string ) ;
public procedure AddAnimations ( const AFiles : TStrings ) ; overload;
public procedure AddAnimations ( const AFiles : TArray<System.string> ) ; overload;
public procedure LoadAnimationControllerFromFile ( const AFilename : string ) ;
public procedure OverrideAnimationControllerFromFile ( const AFilename : string ) ;

Properties

public ModelView : TModelViewerFrame
read FModelView
public FlowChart : TFlowChartFrame
read FFlowChart
public Manager : TFlowChartManagerFrame
read FManager
public Editor : TFlowChartEditorFrame
read FEditor
public Source : TGorillaAnimationController
read FSource
public ActiveLayer : string
read FActiveLayer
write SetActiveLayer

TTransitionFlowChartForm

Ancestors

-TCommonCustomForm

Members

Fields

protected FFrame : TTransitionFlowChartFrame
protected FToolbar : TToolBar
protected FModel : TFmxObject
protected FStoredParent : TFmxObject

Methods

public constructor Create ( AOwner : TComponent ) ;
public constructor CreateNew ( AOwner : TComponent; Dummy : NativeInt = $0 ) ;
public destructor Destroy ( ) ;
protected function GetController ( ) : TGorillaAnimationController ;
protected procedure SetController ( AValue : TGorillaAnimationController ) ;
protected procedure UnsetController ( ) ;
protected procedure ActivateModel ( ACtrl : TGorillaAnimationController ) ;
protected procedure DeactivateModel ( ) ;
protected procedure CreateMenu ( ) ;
protected procedure DoOnLoad ( ASender : TObject ) ;
protected procedure DoOnSave ( ASender : TObject ) ;
protected procedure DoOnClose ( Sender : TObject; var Action : TCloseAction ) ;
protected procedure DoOnCloseQuery ( Sender : TObject; var CanClose : Boolean ) ;
public function Execute ( ACtrl : TGorillaAnimationController ) : Boolean ;

Properties

public Frame : TTransitionFlowChartFrame
read FFrame
public Controller : TGorillaAnimationController
read GetController
write SetController