Class TBGLCustomBitmap

Unit

Declaration

type TBGLCustomBitmap = class(TBGRABitmap)

Description

Abstract RGBA bitmap that can be used with OpenGL by converting it into a texture

Hierarchy

Overview

Fields

Protected FActualHeight: integer;
Protected FActualRect: TRect;
Protected FActualWidth: integer;
Protected FAllocatedHeight: integer;
Protected FAllocatedWidth: integer;
Protected FTexture: IBGLTexture;
Protected FTextureInvalidated: boolean;

Methods

Public destructor Destroy; override;
Public function MakeTextureAndFree: IBGLTexture;
Public function Resample(newWidth, newHeight: integer; mode: TResampleMode=rmFineResample; ACopyProperties: Boolean=False): TBGLCustomBitmap; override;
Protected function GetOpenGLMaxTexSize: integer; virtual; abstract;
Protected function GetTexture: IBGLTexture; virtual;
Protected function GetTextureGL: IUnknown; override;
Public procedure ApplyGlobalOpacity(alpha: byte); overload; override;
Public procedure Fill(const c: TBGRAPixel); override;
Public procedure InvalidateBitmap; override;
Public procedure NoClip; override;
Public procedure ReplaceColor(const ABefore, AAfter: TBGRAPixel); overload; override;
Public procedure ReplaceColor(before, after: TColor); overload; override;
Public procedure ReplaceTransparent(const AAfter: TBGRAPixel); overload; override;
Public procedure SetSize(AWidth, AHeight: integer); override;
Public procedure SwapRedBlue; overload; override;
Protected procedure Init; override;
Protected procedure NotifyOpenGLContextNotCreatedYet; virtual;
Protected procedure NotifySizeTooBigForOpenGL; virtual;
Protected procedure SetClipRect(const AValue: TRect); override;
Protected procedure SwapRedBlueWithoutInvalidate(ARect: TRect);

Properties

Public property AllocatedHeight: integer read FAllocatedHeight;
Public property AllocatedWidth: integer read FAllocatedWidth;
Public property Height: integer read FActualHeight;
Public property MaxTextureSize: integer read GetOpenGLMaxTexSize;
Public property Texture: IBGLTexture read GetTexture;
Public property Width: integer read FActualWidth;

Description

Fields

Protected FActualHeight: integer;

This item has no description.

Protected FActualRect: TRect;

This item has no description.

Protected FActualWidth: integer;

This item has no description.

Protected FAllocatedHeight: integer;

This item has no description.

Protected FAllocatedWidth: integer;

This item has no description.

Protected FTexture: IBGLTexture;

This item has no description.

Protected FTextureInvalidated: boolean;

This item has no description.

Methods

Public destructor Destroy; override;

This item has no description. Showing description inherited from TBGRADefaultBitmap.Destroy.

Free the object and all its resources

Public function MakeTextureAndFree: IBGLTexture;

This item has no description.

Public function Resample(newWidth, newHeight: integer; mode: TResampleMode=rmFineResample; ACopyProperties: Boolean=False): TBGLCustomBitmap; override;

This item has no description.

Protected function GetOpenGLMaxTexSize: integer; virtual; abstract;

This item has no description.

Protected function GetTexture: IBGLTexture; virtual;

This item has no description.

Protected function GetTextureGL: IUnknown; override;

This item has no description. Showing descriptions inherited from ancestors.

From IBGRAScanner.GetTextureGL:

Returns the corresponding OpenGL texture. The value is nil if no texture is associated. **

From IBGRAScanner.GetTextureGL:

Returns the corresponding OpenGL texture. The value is nil if no texture is associated. **

Public procedure ApplyGlobalOpacity(alpha: byte); overload; override;

This item has no description.

Public procedure Fill(const c: TBGRAPixel); override;

This item has no description.

Public procedure InvalidateBitmap; override;

This item has no description.

Public procedure NoClip; override;

This item has no description. Showing description inherited from TCustomUniversalBitmap.NoClip.

Stop clipping (clipping rectangle becomes the whole image)

Public procedure ReplaceColor(const ABefore, AAfter: TBGRAPixel); overload; override;

This item has no description.

Public procedure ReplaceColor(before, after: TColor); overload; override;

This item has no description.

Public procedure ReplaceTransparent(const AAfter: TBGRAPixel); overload; override;

This item has no description.

Public procedure SetSize(AWidth, AHeight: integer); override;

This item has no description. Showing description inherited from TBGRADefaultBitmap.SetSize.

For more properties, see parent class [[TBGRACustomBitmap and IBGRAScanner#TBGRACustomBitmap|TBGRACustomBitmap]]

Public procedure SwapRedBlue; overload; override;

This item has no description.

Protected procedure Init; override;

This item has no description. Showing description inherited from TCustomUniversalBitmap.Init.

ReadWriteConfig: TBGRAReadWriteConfig;

Protected procedure NotifyOpenGLContextNotCreatedYet; virtual;

This item has no description.

Protected procedure NotifySizeTooBigForOpenGL; virtual;

This item has no description.

Protected procedure SetClipRect(const AValue: TRect); override;

This item has no description.

Protected procedure SwapRedBlueWithoutInvalidate(ARect: TRect);

This item has no description.

Properties

Public property AllocatedHeight: integer read FAllocatedHeight;

This item has no description.

Public property AllocatedWidth: integer read FAllocatedWidth;

This item has no description.

Public property Height: integer read FActualHeight;

This item has no description.

Public property MaxTextureSize: integer read GetOpenGLMaxTexSize;

This item has no description.

Public property Texture: IBGLTexture read GetTexture;

This item has no description.

Public property Width: integer read FActualWidth;

This item has no description.