Gorilla.UI.Inventory.Editor
Unit Gorilla.UI.Inventory.Editor.pasClasses
- TInventoryEditorFrame = class ( TPanel )
Constants
- const MIN_SINGLE : Double = 1.5e-45;
- const MAX_SINGLE : Double = 3.4e+38;
- const MIN_INT : Integer = $80000000;
- const MAX_INT : Integer = $7FFFFFFF;
- const DEFAULT_OFS_LEFT : Integer = $70;
- const DEFAULT_LBL_OFS_LEFT : Integer = $5C;
TInventoryEditorFrame
Ancestors
Members
Fields
- private FTabControl :
TTabControl
- private FTbItm_TreeView :
TTabItem
- private FTbItm_Edit :
TTabItem
- private FTreeView :
TTreeView
- private FGrp_Fields :
TRectangle
- private FVertScrollBox :
TVertScrollBox
- private FBtn_Apply :
TButton
- private FImageList1 :
TImageList
- private FBtn_Remove :
TButton
- protected FInventory :
TGorillaInventory
- protected FItem :
TGorillaInventoryCustomItem
- protected FTranslation :
TGorillaInventoryTranslationFrame
- protected FParams :
TGorillaInventoryParametersFrame
- protected FIngredients :
TGorillaInventoryIngredientsFrame
Methods
- public constructor Create ( AOwner : TComponent ) ;
- private procedure Btn_ApplyClick ( Sender : TObject ) ;
- private procedure TreeViewDblClick ( Sender : TObject ) ;
- private procedure Btn_RemoveClick ( Sender : TObject ) ;
- protected procedure SetInventory ( AValue : TGorillaInventory ) ; virtual;
- protected procedure LoadTreeViewItem ( const AParent : TTreeViewItem; const AItem : TGorillaInventoryCustomItem ) ;
- protected procedure LoadTreeViewList ( const AParent : TTreeViewItem; const AList : TGorillaInventoryCustomCollection; const AName : string ) ;
- protected procedure LoadControls ( const AItem : TObject ) ;
- protected function LoadControl ( const AItem : TObject; const AName : string; const AType : PTypeInfo; const ATypeKind : TTypeKind; const AValue : TValue; const AIsWritable : Boolean ) : Single ;
- protected procedure SaveControl ( const AItem : TObject; const ACtrl : TFmxObject; const APropName : string; const ASubPropName : string; const AKind : TTypeKind; const AType : PTypeInfo; const AProp : TRttiProperty; const AValue : TValue ) ; overload;
- protected procedure SaveControl ( const AItem : TObject; const ACtrl : TFmxObject ) ; overload;
- public procedure UpdateTreeView ( ) ;
- public procedure ClearEditor ( ) ;
- public procedure LoadItemToEdit ( const AItem : TGorillaInventoryCustomItem ) ;