Class TCastleComponentFactory
Unit
Declaration
type TCastleComponentFactory = class(TCastleComponent)
Description
Load a serialized component (from a design file, like .castle-user-interface, .castle-transform, .castle-component) and instantiate it multiple times.
Set Url or call LoadFromStream to load the design.
Then instantiate it (multiple times if needed) using ComponentLoad.
Source: files/castlecomponentserialize.pas (line 124).
Hierarchy
- TObject
- TPersistent
- TComponent
- TCastleComponent
- TCastleComponentFactory
Overview
Methods
| Protected | function GetInternalText: String; virtual; |
| Protected | procedure SetInternalText(const Value: String); virtual; |
| Protected | procedure SetName(const Value: TComponentName); override; |
| Protected | procedure TranslateProperties(const TranslatePropertyEvent: TTranslatePropertyEvent); virtual; |
| Public | destructor Destroy; override; |
| Public | procedure CustomSerialization(const SerializationProcess: TSerializationProcess); virtual; |
| Public | function PropertySections(const PropertyName: String): TPropertySections; virtual; |
| Public | procedure SetTransient; |
| Public | procedure AddNonVisualComponent(const NonVisualComponent: TComponent); |
| Public | procedure InsertNonVisualComponent(const Index: Integer; const NonVisualComponent: TComponent); |
| Public | procedure RemoveNonVisualComponent(const NonVisualComponent: TComponent); |
| Public | function NonVisualComponentsIndexOf(const NonVisualComponent: TComponent): Integer; |
| Public | function NonVisualComponentsCount: Integer; |
| Public | function NonVisualComponentsEnumerate: TNonVisualComponentsEnumerator; |
| Public | function ValueIsStreamed: Boolean; virtual; |
| Public | procedure DesignerInfo(const SList: TStrings); virtual; |
| Public | procedure DesignerWarnings(const SList: TStrings); virtual; |
| Public | constructor Create(AOwner: TComponent); overload; override; |
| Public | function PropertySections(const PropertyName: String): TPropertySections; override; |
| Public | constructor Create(const AUrl: String); overload; deprecated 'use Create(AOwner) overload, then set Url to load'; |
| Public | constructor Create(const Contents: TStream; const ATranslationGroupName: String); overload; deprecated 'use Create(AOwner) overload, then LoadFromStream'; |
| Public | destructor Destroy; override; |
| Public | procedure LoadFromStream(const Contents: TStream; const ATranslationGroupName: String); |
| Public | procedure LoadFromComponent(const Template: TComponent); |
| Public | function ComponentLoad(const InstanceOwner: TComponent; const AssociateReferences: TPersistent = nil): TComponent; |
Properties
| Public | property NonVisualComponents [const Index: Integer]: TComponent read GetNonVisualComponents; |
| Public | property IsLoading: Boolean read FIsLoading; |
| Published | property Url: String read FUrl write SetUrl; |
Description
Methods
| Protected | function GetInternalText: String; virtual; |
|
This item has no description. | |
| Protected | procedure SetInternalText(const Value: String); virtual; |
|
This item has no description. | |
| Protected | procedure SetName(const Value: TComponentName); override; |
|
This item has no description. | |
| Protected | procedure TranslateProperties(const TranslatePropertyEvent: TTranslatePropertyEvent); virtual; |
|
Enumerate all properties that are possible to translate in this component. E.g. in TCastleLabel it will return TCastleLabel.Caption, in TCastleEdit it will return TCastleEdit.Text and TCastleEdit.Placeholder. Returns only non-empty properties, thus assuming that if current (by convention, English) text is empty, then there is no point in translating it. Moreover descendants may define boolean properties to exclude particular text from translating, e.g. TCastleLabel.CaptionTranslate, TCastleEdit.TextTranslate, TCastleEdit.PlaceholderTranslate. It is not recursive (it doesn't enumerate children properties). Use global TranslateProperties procedure to call this on a hierarchy of TComponent. You usually don't want to call this method (it is called by other engine routines). But you may find it useful to override this, if you define new component. | |
| Public | destructor Destroy; override; |
|
This item has no description. | |
| Public | procedure CustomSerialization(const SerializationProcess: TSerializationProcess); virtual; |
|
Override this method to call various methods of SerializationProcess, which in turn allows to serialize/deserialize things that are not published. This allows to serialize/deserialize with more freedom, e.g. to serialize/deserialize some private field. | |
| Public | function PropertySections(const PropertyName: String): TPropertySections; virtual; |
|
Section where to show property in the editor. | |
| Public | procedure SetTransient; |
|
Ignore this component when serializing parent's TCastleUserInterface.Controls list or TCastleTransform.List, and do not show this component in CGE editor. This simply sets csTransient flag in ComponentStyle. This is useful for children that are automatically managed by the parent, and should not be modified by user code. For example, TCastleCheckbox is internally composed from TCastleImageControl and TCastleLabel children, but we don't want to serialize or even show these children to user. Note that if you want to prevent this component from serializing as part of TCastleUserInterface.Controls list or TCastleTransform.List, but you still want it to be visible in CGE editor, then make it a "subcomponent" instead, by Note that both csSubComponent and csTransient only disable the component serialization as part of parent's lists enumerated by CustomSerialization (see internal TCastleUserInterface.SerializeChildrenEnumerate , TCastleTransform.SerializeChildrenEnumerate, TCastleTransform.SerializeBehaviorsEnumerate). If you will make the component published in its own property (which is normal for "subcomponents") then it will be serialized anyway, just as part of it's own property (like TCastleScrollView.ScrollArea). So to really avoid serializing a children component make it csSubComponent and/or csTransient, and do not publish it. | |
| Public | procedure AddNonVisualComponent(const NonVisualComponent: TComponent); |
|
Add non-visual component to this component. This is used to organize non-visual components in a tree hierarchy, in CGE designs and editor.
See also
| |
| Public | procedure InsertNonVisualComponent(const Index: Integer; const NonVisualComponent: TComponent); |
|
Insert non-visual component to this component. This is used to organize non-visual components in a tree hierarchy, in CGE designs and editor.
See also
| |
| Public | procedure RemoveNonVisualComponent(const NonVisualComponent: TComponent); |
|
Removes the component previously added by AddNonVisualComponent. | |
| Public | function NonVisualComponentsIndexOf(const NonVisualComponent: TComponent): Integer; |
|
Index of the previously added non-visual component. Returns -1 if the component was not found. | |
| Public | function NonVisualComponentsCount: Integer; |
|
Count of components added by AddNonVisualComponent.
See also
| |
| Public | function NonVisualComponentsEnumerate: TNonVisualComponentsEnumerator; |
|
You can enumerate current non-visual components using loop like See also
| |
| Public | function ValueIsStreamed: Boolean; virtual; |
|
Whether the current value of this object should be written to the stream. This should be This is used by CastleComponentSerialize, which is used in Castle Game Engine for all serialization. In simple cases, this just says whether the current value of this object equals to some default value. The default implementation of this class returns Descendants that override this to sometimes return The name of this method is consistent with TPropertyEditor.ValueIsStreamed in LCL. | |
| Public | procedure DesignerInfo(const SList: TStrings); virtual; |
|
Override to add information that should be visible at design-time. Call | |
| Public | procedure DesignerWarnings(const SList: TStrings); virtual; |
|
Override to add warnings that should be visible at design-time. Call | |
| Public | constructor Create(AOwner: TComponent); overload; override; |
|
Main constructor. Does not load anything immediately. Set Url or call LoadFromStream to load component. | |
| Public | function PropertySections(const PropertyName: String): TPropertySections; override; |
|
This item has no description. Showing description inherited from TCastleComponent.PropertySections. Section where to show property in the editor. | |
| Public | constructor Create(const AUrl: String); overload; deprecated 'use Create(AOwner) overload, then set Url to load'; |
|
Warning: this symbol is deprecated: use Create(AOwner) overload, then set Url to load Avoid Delphi warnings about constructor hiding. In the long-run, these deprecated constructors should be removed, once everyone got chance to migrate. | |
| Public | constructor Create(const Contents: TStream; const ATranslationGroupName: String); overload; deprecated 'use Create(AOwner) overload, then LoadFromStream'; |
|
Warning: this symbol is deprecated: use Create(AOwner) overload, then LoadFromStream This item has no description. | |
| Public | destructor Destroy; override; |
|
This item has no description. | |
| Public | procedure LoadFromStream(const Contents: TStream; const ATranslationGroupName: String); |
|
Load design from given TStream. If you set up localization (see https://castle-engine.io/manual_text.php#section_localization_gettext ), then upon loading, the design will be automatically localized using the translation group specified. Just leave ATranslationGroupName = '' to not localize. This Url value is unchanged by this. In most common case, you don't really care about the Url value of this component, if you load the contents from TStream. | |
| Public | procedure LoadFromComponent(const Template: TComponent); |
|
Load given component as a template. Effectively every TCastleComponentFactory.ComponentLoad will create a deep clone of Template. This is a way to clone ("deep copy") any TComponent using serialization + deserialization underneath. Template is converted to the JSON classes (though not JSON string) and then deserialized back to a new component. It is not the most efficient way to clone (since the intermeiate JSON representation is created; though note that we don't save / parse JSON as a string). But it is absolutely general and works out-of-the-box on any TComponent, just like our serialization/deserialization. | |
| Public | function ComponentLoad(const InstanceOwner: TComponent; const AssociateReferences: TPersistent = nil): TComponent; |
|
Instantiate component. Using this is similar to using global CastleComponentSerialize.ComponentLoad, but it is much faster if you want to instantiate the same file many times. Newly created component will be owned by InstanceOwner (it can be If AssociateReferences is not The
For example, this example creates an owner dedicated for refering to names in the given instance of a Rock: procedure SpawnRock; var RockOwner: TComponent; Rock: TCastleTransform; RockRigidBody: TCastleRigidBody; SceneToRotate: TCastleTransform; begin RockOwner := TComponent.Create(Self); Rock := RockFactory.ComponentLoad(RockOwner) as TCastleTransform; RockRigidBody := RockOwner.FindRequiredComponent('RockRigidBody') as TCastleRigidBody; SceneToRotate := RockOwner.FindRequiredComponent('SceneToRotate') as TCastleTransform; // here use RockRigidBody, SceneToRotate end;
The
For example: type TRockDesign = class(TPersistent) published SceneToRotate: TCastleTransform; RockRigidBody: TCastleRigidBody; end; procedure SpawnRock; var Rock: TCastleTransform; RockDesign: TRockDesign; begin RockDesign := TRockDesign.Create; try Rock := RockFactory.ComponentLoad(Self, RockDesign) as TCastleTransform; // here use RockDesign.RockRigidBody, RockDesign.SceneToRotate finally FreeAndNil(RockDesign) end; end; | |
Properties
| Public | property NonVisualComponents [const Index: Integer]: TComponent read GetNonVisualComponents; |
|
Components added by AddNonVisualComponent. | |
| Public | property IsLoading: Boolean read FIsLoading; |
|
Is the component during deserialization now. Note: We can't use | |
| Published | property Url: String read FUrl write SetUrl; |
|
Load design from given URL. Set to '' to clear the loaded component. If you set up localization (see https://castle-engine.io/manual_text.php#section_localization_gettext ), then upon loading, the design will be automatically localized using the translation group derived from URL base name. E.g. loading | |
Generated by PasDoc 0.17.0.snapshot.