Gorilla.UI.Inventory.VisualItems
Unit Gorilla.UI.Inventory.VisualItems.pasClasses
- TGorillaInventoryVisualItemsFrame = class ( TPanel )
TGorillaInventoryVisualItemsFrame
Ancestors
Members
Fields
- private FInventory :
TGorillaInventory
- private FIsUpdating :
Boolean
- private FOnUpdated :
TNotifyEvent
- private FGrd_VisualItems :
TStringGrid
- private FBtn_Add :
TSpeedButton
- private FGrp_Buttons :
TRectangle
- private FBtn_Remove :
TSpeedButton
- private FBtn_Clear :
TSpeedButton
- private FBtn_Refresh :
TSpeedButton
- private FBtn_Upwards :
TSpeedButton
- private FBtn_Downwards :
TSpeedButton
- private FLbl_VisualItemsHdr :
TLabel
Methods
- public constructor Create ( AOwner : TComponent ) ;
- private procedure Btn_AddClick ( Sender : TObject ) ;
- private procedure Btn_RemoveClick ( Sender : TObject ) ;
- private procedure Btn_UpwardsClick ( Sender : TObject ) ;
- private procedure Btn_DownwardsClick ( Sender : TObject ) ;
- private procedure Btn_ClearClick ( Sender : TObject ) ;
- private procedure Btn_RefreshClick ( Sender : TObject ) ;
- private procedure Grd_VisualItemsEditingDone ( Sender : TObject; const ACol : Integer; const ARow : Integer ) ;
- private procedure Grd_VisualItemsSelChanged ( Sender : TObject ) ;
- private procedure AddVisualItem ( const AIndex : Integer; const AName : string; ALOD0 : string; ALOD1 : string; ALOD2 : string; AModelFile : string ) ;
- private procedure RemoveVisualItem ( const AName : string ) ;
- private procedure ClearAllVisualItems ( ) ;
- private procedure SetInventory ( AValue : TGorillaInventory ) ;
- public procedure Clear ( ) ;
- public procedure LoadVisualItems ( const AInventory : TGorillaInventory ) ;
- public procedure ApplyVisualItems ( const AInventory : TGorillaInventory ) ;