Castle Game Engine

Class TCastleControl

Description
Hierarchy
Fields
Methods
Properties

Unit

Vcl.CastleControl

Declaration

type TCastleControl = class(TCustomControl)

Description

Control rendering OpenGL on VCL form.

Hierarchy

  • TObject
  • TCustomControl
  • TCastleControl

Overview

Methods

Protected procedure CreateHandle; override;
Protected procedure DestroyHandle; override;
Protected procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;
Protected procedure MouseMove(Shift: TShiftState; NewX, NewY: Integer); override;
Protected procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;
Protected function DoMouseWheel(Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint): Boolean; override;
Protected procedure KeyDown(var Key: Word; Shift: TShiftState); override;
Protected procedure KeyPress(var Key: Char); override;
Protected procedure KeyUp(var Key: Word; Shift: TShiftState); override;
Protected procedure Resize; override;
Public constructor Create(AOwner: TComponent); override;
Public destructor Destroy; override;
Public procedure Paint; override;
Public procedure PreviewFormKeyDown(var Key: Word; Shift: TShiftState);
Public procedure PreviewFormKeyUp(var Key: Word; Shift: TShiftState);

Properties

Published property Container: TContainer read FContainer;
Published property Align;
Published property Anchors;
Published property OnClick;
Published property OnDblClick;
Published property OnMouseDown;
Published property OnMouseUp;
Published property OnMouseMove;
Published property OnMouseWheel;

Description

Methods

Protected procedure CreateHandle; override;
 
Protected procedure DestroyHandle; override;
 
Protected procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;

// TODO procedure KeyDown(var Key: Word; Shift: TShiftState); override; procedure KeyUp(var Key: Word; Shift: TShiftState); override; procedure KeyPress(var Key: Char); override;

Protected procedure MouseMove(Shift: TShiftState; NewX, NewY: Integer); override;
 
Protected procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;
 
Protected function DoMouseWheel(Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint): Boolean; override;
 
Protected procedure KeyDown(var Key: Word; Shift: TShiftState); override;
 
Protected procedure KeyPress(var Key: Char); override;
 
Protected procedure KeyUp(var Key: Word; Shift: TShiftState); override;
 
Protected procedure Resize; override;
 
Public constructor Create(AOwner: TComponent); override;
 
Public destructor Destroy; override;
 
Public procedure Paint; override;
 
Public procedure PreviewFormKeyDown(var Key: Word; Shift: TShiftState);

To handle some special keys, set on form KeyPreview and call these methods from VCL form's OnKeyDown / OnKeyUp.

Public procedure PreviewFormKeyUp(var Key: Word; Shift: TShiftState);
 

Properties

Published property Container: TContainer read FContainer;

Access Castle Game Engine container properties and events, not specific for FMX.

Published property Align;
 
Published property Anchors;
 
Published property OnClick;
 
Published property OnDblClick;
 
Published property OnMouseDown;
 
Published property OnMouseUp;
 
Published property OnMouseMove;
 
Published property OnMouseWheel;
 
Generated by PasDoc 0.16.0.

Copyright Michalis Kamburelis and Castle Game Engine Contributors.

This webpage is also open-source and we welcome pull requests to improve it.

We use cookies for analytics. See our privacy policy.