Class TGLPanel (unit GLPanel)

Inherits from

TCustomPanel

Constructors


constructor Create(AOwner: TComponent);

Create a rendering context.


Functions

destructor Destroy;


procedure GLReDraw;

Clean up and terminate.

procedure NewGLPrep;


function GetColorBits: Cardinal;


function GetDepthBits: Cardinal;


function GetFlags : TPFDFlags;


function GetLayerType: TPFDLayerTypes;


function GetPixelType: TPFDPixelTypes;


procedure Paint;


procedure Resize;


procedure SetColorBits (Value: Cardinal);


procedure SetDepthBits (Value: Cardinal);


procedure SetFlags (Value: TPFDFlags);


procedure SetLayerType (Value: TPFDLayerTypes);


procedure SetPixelType (Value: TPFDPixelTypes);


procedure NewPaint;


procedure ResetFlags (Value: TPFDFlags);

pointer to users routine for static setup

Layer type


procedure ResetLayerType (Value: TPFDLayerTypes);


procedure ResetPixelType (Value: TPFDPixelTypes);


procedure SetDCPixelFormat;


Properties

property Align :


property Alignment :


property DragCursor :

property BevelInner; property BevelOuter; property BevelWidth; property BorderWidth; property BorderStyle;

property DragMode :


property Enabled :


property GLColorBits : Cardinal

property Caption; property Color;

property GLDepthBits : Cardinal

property Ctl3D;

property GLFlags : TPFDFlags


property GLLayerType : TPFDLayerTypes

property Font;

property GLPixelType : TPFDPixelTypes


property Locked :


property ParentShowHint :

property ParentColor; property ParentCtl3D; property ParentFont;

property PopupMenu :


property ShowHint :


property TabOrder :


property TabStop :


property Visible :


Events

event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnGLDraw : TNotifyEvent


event OnGLInit : TNotifyEvent


event OnGLPrep : TNotifyEvent


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnResize :


event OnStartDrag :


Variables

DC : HDC;


FColorBits : Cardinal;


FDepthBits : Cardinal;


FFirstTimeInFlag : Boolean;


FFlags : TPFDFlags;


FLayerType : TPFDLayerTypes;


FOnGLDraw : TNotifyEvent;


FOnGLInit : TNotifyEvent;

pointer to users routine of GL draw commands

FOnGLPrep : TNotifyEvent;

pointer to users routine for GL initialization

FPFDChanged : Boolean;


FPixelType : TPFDPixelTypes;


GFlags : Word;


GLayerType : Smallint;


GPixelType : Word;


hrc : HGLRC;


Palette : HPALETTE;



Constructors


constructor Create(AOwner: TComponent);

Create a rendering context.


Functions


destructor Destroy;


procedure GLReDraw;

Clean up and terminate.


procedure NewGLPrep;


function GetColorBits: Cardinal;


function GetDepthBits: Cardinal;


function GetFlags : TPFDFlags;


function GetLayerType: TPFDLayerTypes;


function GetPixelType: TPFDPixelTypes;


procedure Paint;


procedure Resize;


procedure SetColorBits (Value: Cardinal);


procedure SetDepthBits (Value: Cardinal);


procedure SetFlags (Value: TPFDFlags);


procedure SetLayerType (Value: TPFDLayerTypes);


procedure SetPixelType (Value: TPFDPixelTypes);


procedure NewPaint;


procedure ResetFlags (Value: TPFDFlags);

pointer to users routine for static setup

Layer type


procedure ResetLayerType (Value: TPFDLayerTypes);


procedure ResetPixelType (Value: TPFDPixelTypes);


procedure SetDCPixelFormat;


Properties


property Align :


property Alignment :


property DragCursor :

property BevelInner; property BevelOuter; property BevelWidth; property BorderWidth; property BorderStyle;


property DragMode :


property Enabled :


property GLColorBits : Cardinal

property Caption; property Color;


property GLDepthBits : Cardinal

property Ctl3D;


property GLFlags : TPFDFlags


property GLLayerType : TPFDLayerTypes

property Font;


property GLPixelType : TPFDPixelTypes


property Locked :


property ParentShowHint :

property ParentColor; property ParentCtl3D; property ParentFont;


property PopupMenu :


property ShowHint :


property TabOrder :


property TabStop :


property Visible :


Events


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnGLDraw : TNotifyEvent


event OnGLInit : TNotifyEvent


event OnGLPrep : TNotifyEvent


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnResize :


event OnStartDrag :


Variables


DC : HDC;


FColorBits : Cardinal;


FDepthBits : Cardinal;


FFirstTimeInFlag : Boolean;


FFlags : TPFDFlags;


FLayerType : TPFDLayerTypes;


FOnGLDraw : TNotifyEvent;


FOnGLInit : TNotifyEvent;

pointer to users routine of GL draw commands


FOnGLPrep : TNotifyEvent;

pointer to users routine for GL initialization


FPFDChanged : Boolean;


FPixelType : TPFDPixelTypes;


GFlags : Word;


GLayerType : Smallint;


GPixelType : Word;


hrc : HGLRC;


Palette : HPALETTE;