Class TRbwInplaceEdit4

Unit

RbwDataGrid4

Declaration

type TRbwInplaceEdit4 = class(TInplaceEditList)

Description

TRbwInplaceEdit4 is used to gain access to the protected UpdateContents procedure.

Hierarchy

• TInplaceEditList
• TRbwInplaceEdit4

Overview

Fields

	FPushButtonWidth: integer;
	FPressed: Boolean;
	FTracking: Boolean;
	FOnGetButtonCaption: TGetButtonCaptionEvent;
	FOnGetButtonWidt: TGetButtonWidthEvent;

Methods

	procedure WMLButtonDblClk(var Message: TWMLButtonDblClk); message wm_LButtonDblClk;
	procedure WMSetCursor(var Message: TWMSetCursor); message WM_SetCursor;
	function GetPushButtonWidth: integer;
	procedure BoundsChanged; override;
	function ButtonRect: TRect;
	procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;
	procedure MouseMove(Shift: TShiftState; X, Y: Integer); override;
	procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;
	function OverButton(const P: TPoint): Boolean;
	procedure PaintWindow(DC: HDC); override;
	procedure StopTracking;
	procedure TrackButton(X,Y: Integer);
	function GetButtonCaption(ACol, ARow: integer): string;
	constructor Create(Owner: TComponent); override;

Properties

	property PushButtonWidth: integer read GetPushButtonWidth;
	property Pressed: Boolean read FPressed;
	property OnGetButtonCaption: TGetButtonCaptionEvent read FOnGetButtonCaption write FOnGetButtonCaption;
	property OnGetButtonWidth: TGetButtonWidthEvent read FOnGetButtonWidt write FOnGetButtonWidt;

Description

Fields

	FPushButtonWidth: integer;

	FPressed: Boolean;

	FTracking: Boolean;

	FOnGetButtonCaption: TGetButtonCaptionEvent;

	FOnGetButtonWidt: TGetButtonWidthEvent;

Methods

	procedure WMLButtonDblClk(var Message: TWMLButtonDblClk); message wm_LButtonDblClk;

	procedure WMSetCursor(var Message: TWMSetCursor); message WM_SetCursor;

	function GetPushButtonWidth: integer;

	procedure BoundsChanged; override;

	function ButtonRect: TRect;

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

	procedure MouseMove(Shift: TShiftState; X, Y: Integer); override;

	procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;

	function OverButton(const P: TPoint): Boolean;

	procedure PaintWindow(DC: HDC); override;

	procedure StopTracking;

	procedure TrackButton(X,Y: Integer);

	function GetButtonCaption(ACol, ARow: integer): string;

	constructor Create(Owner: TComponent); override;

Properties

	property PushButtonWidth: integer read GetPushButtonWidth;

	property Pressed: Boolean read FPressed;

	property OnGetButtonCaption: TGetButtonCaptionEvent read FOnGetButtonCaption write FOnGetButtonCaption;

	property OnGetButtonWidth: TGetButtonWidthEvent read FOnGetButtonWidt write FOnGetButtonWidt;