Class TFireGraphicControl

Unit

Declaration

type TFireGraphicControl = class(TControl)

Description

Hierarchy

Overview

Fields

Protected FUpdateOnResize: Boolean;

Methods

Public constructor Create(AOwner: TComponent); override;
Public destructor Destroy; override;
Public function DragDropState: TFireDragDropState;
Public function GetDragDropObject: TFireDragDropObject;
Public procedure UpdateLayout;
Public procedure SetFocusGP(GraphicPrimitive: TFireGraphicPrimitive; Reason: Integer = 0);
Public function GetFocusedGP: TFireGraphicPrimitive;
Public procedure SetActiveGP(GraphicPrimitive: TFireGraphicPrimitive);
Public function GetActiveGP: TFireGraphicPrimitive;
Public procedure SetPressedGP(GraphicPrimitive: TFireGraphicPrimitive);
Public function GetOverGP: TFireGraphicPrimitive;
Public procedure setToolTip(const Tip: String);
Public function GetPalette: TFirePalette;
Public procedure SetPalette(const Palette: TFirePalette);
Public procedure MouseOverUpdate(const Pos: TPoint; ForcePressGP: Boolean);
Public procedure GeometryChanged;
Public procedure MouseDoubleClickPressed(Button: TMouseButton; Shift: TShiftState; X, Y: Single);
Public procedure SetNewScene(AScene: IScene); override;
Protected procedure StyleChanged; virtual;
Protected procedure StyleChangedHandler(const Sender: TObject; const Msg: TMessage);
Protected procedure Paint; override;
Protected procedure PaintChildren; override;
Protected function DoSetSize(const ASize: TControlSize; const NewPlatformDefault: Boolean; ANewWidth, ANewHeight: Single; var ALastWidth, ALastHeight: Single): Boolean; override;
Protected function ObjectAtPoint(P: TPointF): IControl; override;
Protected function CheckHitTest(const AHitTest: Boolean): Boolean; override;
Protected procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Single); override;
Protected procedure MouseMove(Shift: TShiftState; X, Y: Single); override;
Protected procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Single); override;
Protected procedure MouseClick(Button: TMouseButton; Shift: TShiftState; X, Y: Single); override;
Protected procedure MouseWheel(Shift: TShiftState; WheelDelta: Integer; var Handled: Boolean); override;
Protected procedure KeyDown(var Key: Word; var KeyChar: WideChar; Shift: TShiftState); override;
Protected procedure KeyUp(var Key: Word; var KeyChar: WideChar; Shift: TShiftState); override;
Protected procedure DoEnter; override;
Protected procedure DoExit; override;
Protected procedure DoMouseEnter; override;
Protected procedure DoMouseLeave; override;
Protected procedure DragEnter(const Data: TDragObject; const P: TPointF); override;
Protected procedure DragOver(const Data: TDragObject; const P: TPointF; var Operation: TDragOperation); override;
Protected procedure DragDrop(const Data: TDragObject; const P: TPointF); override;
Protected procedure DragLeave; override;
Protected function ShowContextMenu(const ScreenPosition: TPointF): Boolean; override;
Protected procedure DialogKey(var Key: Word; Shift: TShiftState); override;
Protected procedure MoveDragDropObject(const Pos: TPoint; DragObject: TFireDragDropObject); virtual;
Protected procedure StopDragDrop; virtual;
Protected function CreateNativeDragDropObject(const Pos: TPoint): TFireNativeDragObject; virtual;
Protected function IsLocked: Boolean; virtual;
Protected procedure CheckPressedState(Sender: TObject);
Protected procedure Update(const R: TRect);
Protected procedure RealignRootGeometry;
Protected function GetScaleFactor: Single;
Protected function HitTestGP(const Point: TPoint): TFireGraphicPrimitive;
Protected function RootPrimitive: TFireGraphicPrimitive;
Protected procedure SetRoot(Root: TFireGraphicPrimitive);

Properties

Public property PressedGP: TFireGraphicPrimitive read FPressedGP;
Public property Font: TFont read FFont write SetFont;
Protected property Effects: TFireEffects read FEffects;
Protected property RootGP: TFireGraphicPrimitive read FRootGP;
Protected property ScaleFactor: Single read GetScaleFactor;

Description

Fields

Protected FUpdateOnResize: Boolean;
 

Methods

Public constructor Create(AOwner: TComponent); override;
 
Public destructor Destroy; override;
 
Public function DragDropState: TFireDragDropState;
 
Public function GetDragDropObject: TFireDragDropObject;
 
Public procedure UpdateLayout;
 
Public procedure SetFocusGP(GraphicPrimitive: TFireGraphicPrimitive; Reason: Integer = 0);
 
Public function GetFocusedGP: TFireGraphicPrimitive;
 
Public procedure SetActiveGP(GraphicPrimitive: TFireGraphicPrimitive);
 
Public function GetActiveGP: TFireGraphicPrimitive;
 
Public procedure SetPressedGP(GraphicPrimitive: TFireGraphicPrimitive);
 
Public function GetOverGP: TFireGraphicPrimitive;
 
Public procedure setToolTip(const Tip: String);
 
Public function GetPalette: TFirePalette;
 
Public procedure SetPalette(const Palette: TFirePalette);
 
Public procedure MouseOverUpdate(const Pos: TPoint; ForcePressGP: Boolean);
 
Public procedure GeometryChanged;
 
Public procedure MouseDoubleClickPressed(Button: TMouseButton; Shift: TShiftState; X, Y: Single);
 
Public procedure SetNewScene(AScene: IScene); override;
 
Protected procedure StyleChanged; virtual;
 
Protected procedure StyleChangedHandler(const Sender: TObject; const Msg: TMessage);
 
Protected procedure Paint; override;
 
Protected procedure PaintChildren; override;
 
Protected function DoSetSize(const ASize: TControlSize; const NewPlatformDefault: Boolean; ANewWidth, ANewHeight: Single; var ALastWidth, ALastHeight: Single): Boolean; override;
 
Protected function ObjectAtPoint(P: TPointF): IControl; override;
 
Protected function CheckHitTest(const AHitTest: Boolean): Boolean; override;
 
Protected procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Single); override;
 
Protected procedure MouseMove(Shift: TShiftState; X, Y: Single); override;
 
Protected procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Single); override;
 
Protected procedure MouseClick(Button: TMouseButton; Shift: TShiftState; X, Y: Single); override;
 
Protected procedure MouseWheel(Shift: TShiftState; WheelDelta: Integer; var Handled: Boolean); override;
 
Protected procedure KeyDown(var Key: Word; var KeyChar: WideChar; Shift: TShiftState); override;
 
Protected procedure KeyUp(var Key: Word; var KeyChar: WideChar; Shift: TShiftState); override;
 
Protected procedure DoEnter; override;
 
Protected procedure DoExit; override;
 
Protected procedure DoMouseEnter; override;
 
Protected procedure DoMouseLeave; override;
 
Protected procedure DragEnter(const Data: TDragObject; const P: TPointF); override;
 
Protected procedure DragOver(const Data: TDragObject; const P: TPointF; var Operation: TDragOperation); override;
 
Protected procedure DragDrop(const Data: TDragObject; const P: TPointF); override;
 
Protected procedure DragLeave; override;
 
Protected function ShowContextMenu(const ScreenPosition: TPointF): Boolean; override;
 
Protected procedure DialogKey(var Key: Word; Shift: TShiftState); override;
 
Protected procedure MoveDragDropObject(const Pos: TPoint; DragObject: TFireDragDropObject); virtual;
 
Protected procedure StopDragDrop; virtual;
 
Protected function CreateNativeDragDropObject(const Pos: TPoint): TFireNativeDragObject; virtual;
 
Protected function IsLocked: Boolean; virtual;
 
Protected procedure CheckPressedState(Sender: TObject);
 
Protected procedure Update(const R: TRect);
 
Protected procedure RealignRootGeometry;
 
Protected function GetScaleFactor: Single;
 
Protected function HitTestGP(const Point: TPoint): TFireGraphicPrimitive;
 
Protected function RootPrimitive: TFireGraphicPrimitive;
 
Protected procedure SetRoot(Root: TFireGraphicPrimitive);
 

Properties

Public property PressedGP: TFireGraphicPrimitive read FPressedGP;
 
Public property Font: TFont read FFont write SetFont;
 
Protected property Effects: TFireEffects read FEffects;
 
Protected property RootGP: TFireGraphicPrimitive read FRootGP;
 
Protected property ScaleFactor: Single read GetScaleFactor;
 

Generated by PasDoc 0.15.0.