Gorilla.Context.Types
Unit Gorilla.Context.Types.pasRecords
- record TGorillaShaderLight
- record TGorillaShaderTexture
- record TGorillaShaderMaterial
- record TBlendFactorHelper
- record TBlendEquationFuncHelper
- record TBlendSetting
- record TSmoothSetting
- record TOrthographicData
- record TPlaneF
- record TClipPlaneF
- record TObjectAccessHelper
Enumerations
- enum TGorillaContextErrorKind = ( ContextError, CompileError, InitializationError ) ;
- enum TBlendFactor = ( bfZero, bfOne, bfSrcColor, bfOneMinusSrcColor, bfSrcAlpha, bfOneMinusSrcAlpha, bfDstAlpha, bfOneMinusDstAlpha, bfDstColor, bfOneMinusDstColor, bfSrcAlphaSaturate ) ;
- enum TBlendEquationFunc = ( befAdd, befSubtract, befReverseSubtract, befMin, befMax ) ;
- enum TSmoothTarget = ( stPoints, stLines, stPolygons ) ;
- enum TStencilOpEx = ( Keep, Zero, Replace, Increase, Decrease, Invert, IncreaseWrap, DecreaseWrap ) ;
- enum TPolygonOffsetFill = ( pofOffsetFillOn, pofOffsetFillOff ) ;
- enum TSmoothLines = ( slOn, slOff ) ;
Constants
- const ATTRIB_VERTEX : Integer = $0;
- const ATTRIB_NORMAL : Integer = $1;
- const ATTRIB_COLOR0 : Integer = $2;
- const ATTRIB_COLOR1 : Integer = $3;
- const ATTRIB_COLOR2 : Integer = $4;
- const ATTRIB_COLOR3 : Integer = $5;
- const ATTRIB_TEXCOORD0 : Integer = $6;
- const ATTRIB_TEXCOORD1 : Integer = $7;
- const ATTRIB_TEXCOORD2 : Integer = $8;
- const ATTRIB_TEXCOORD3 : Integer = $9;
- const ATTRIB_BINORMAL : Integer = $A;
- const ATTRIB_TANGENT : Integer = $B;
- const ATTRIB_MODELMATRIX_V1 : Integer = $C;
- const ATTRIB_MODELMATRIX_V2 : Integer = $D;
- const ATTRIB_MODELMATRIX_V3 : Integer = $E;
- const ATTRIB_MODELMATRIX_V4 : Integer = $F;
- const GORILLA_SHADER_TEXTURES_MAX : Integer = $10;
- const SCannotCreateShaderProgram : string = "cannot create shader program: %%s - %%s";
- const SCannotActivateShaderProgram : string = "cannot activate shader program";
- const SCannotActivateCreatedShaderProgram : string = "cannot activated created shader program";
- const SCannotUseShaderProgram : string = "cannot use shader program";
- const SCannotBeginRenderScene : string = "cannot begin rendering scene for %%s: %%d";
- const SCannotEndRenderScene : string = "cannot end rendering scene for %%s: %%d";
- const SGCannotCreateVertexShader : string = "Cannot create Vertex-Shader for '%%s': %%s";
- const SGCannotCreatePixelShader : string = "Cannot create Fragment-Shader for '%%s': %%s";
- const SErrorInContextMethodWithFlag : string = "error in context method "%%s" (error = %%d)";
Mics. types
- type PGorillaShaderLight = pointer to TGorillaShaderLight;
- type PGorillaShaderTexture = pointer to TGorillaShaderTexture;
- type TGorillaShaderTextures = array [0..15] of TGorillaShaderTexture;
- type PGorillaShaderMaterial = pointer to TGorillaShaderMaterial;
- type PBlendSetting = pointer to TBlendSetting;
- type TBlendSettings = array [0..31] of TBlendSetting;
- type TPlaneFType = Float;
- type PPlaneFType = pointer to Single;
- type PClipPlaneF = pointer to TClipPlaneF;
Functions / Procedures
- public procedure RaiseInitializationExceptionFmt ( AContext : TContext3D; AResStringRec : PResStringRec; const AArgs : array of TVarRec ) ;
- public procedure RaiseContextExceptionFmt ( AContext : TContext3D; AResStringRec : PResStringRec; const AArgs : array of TVarRec ) ;
- public procedure RaiseCompileExceptionFmt ( AContext : TContext3D; ADesignTime : Boolean; AResStringRec : PResStringRec; const AArgs : array of TVarRec ) ;
- public function MultisampleTypeToNumber ( const Multisample : TMultisample ) : Integer ;
- public function GLGetErrorFlags ( ) : Integer ;
TGorillaShaderLight
Fields
- public LightType :
Integer
- public Reserved1 :
- public Position :
TVector3D
- public Direction :
TVector3D
- public Ambient :
TAlphaColorF
- public Diffuse :
TAlphaColorF
- public Specular :
TAlphaColorF
- public SpotCutoff :
Single
- public SpotCosCutoff :
Single
- public SpotExponent :
Single
- public ConstantAttenuation :
Single
- public LinearAttenuation :
Single
- public QuadraticAttenuation :
Single
- public Reserved4 :
Methods
TGorillaShaderMaterial
Fields
- public Emissive :
TAlphaColorF
- public Ambient :
TAlphaColorF
- public Diffuse :
TAlphaColorF
- public Specular :
TAlphaColorF
- public Clipping :
TAlphaColorF
- public Displacement :
TVector3D
- public Features :
TVector3D
- public Shininess :
Single
- public Textures :
Integer
- public PoolTexturesOffset :
Integer
- public PoolTextures :
Integer
- public Texture :
TGorillaShaderTextures
Methods
TBlendSetting
Fields
- public Enabled :
Boolean
- public Func :
TBlendEquationFunc
- public AlphaFunc :
TBlendEquationFunc
- public ColorSource :
TBlendFactor
- public ColorDest :
TBlendFactor
- public AlphaSource :
TBlendFactor
- public AlphaDest :
TBlendFactor
Methods
- private procedure SetSource ( AValue : TBlendFactor ) ;
- private procedure SetDest ( AValue : TBlendFactor ) ;
- public function Create ( ) : TBlendSetting ; static overload;
- public function CreateForFMX
(
)
: TBlendSetting
;
static;
FMX UI Controls specific blending settings. This is not compatible with Gorilla3D rendering pipeline blending!
- public function Create ( AEnabled : Boolean ) : TBlendSetting ; static overload;
- public function Create ( AEnabled : Boolean; AFunc : TBlendEquationFunc; AColorSource : TBlendFactor; AColorDest : TBlendFactor; AAlphaSource : TBlendFactor; AAlphaDest : TBlendFactor ) : TBlendSetting ; static overload;
- public function Create ( AEnabled : Boolean; AFunc : TBlendEquationFunc; AColorSource : TBlendFactor; AColorDest : TBlendFactor ) : TBlendSetting ; static overload;
Properties
TPlaneF
TObjectAccessHelper
Methods
- public function GetFieldAddress
(
const
AObj :
TObject; const
AName :
string
)
: PPointer
;
static;
Returns the absolute pointer to a field of the supplied object. If the field could not be found, an exception will be thrown.
- public function CallMethod ( const AObj : TObject; const AName : string; const AArgs : TArray<System.Rtti.TValue> ) : TValue ; static;