Class TDrawItem

Unit

DrawTextUnit

Declaration

type TDrawItem = class(TPersistent)

Description

Hierarchy

• TPersistent
• TDrawItem

Overview

Fields

	FRect: TRect;
	FFont: TFont;
	FText: string;
	FSelected: boolean;
	FEditing: boolean;
	FOnChange: TNotifyEvent;
	FOnDraw: TDrawTextEvent;

Methods

	procedure FontChanged(Sender: TObject);
	procedure SetFont(const Value: TFont);
	procedure SetRect(const Value: TRect);
	procedure SetText(const Value: string);
	procedure SetEditing(const Value: boolean);
	procedure SetSelected(const Value: boolean);
	procedure Changed;
	Constructor Create;
	Destructor Destroy; override;
	procedure Draw(ACanvas: TCanvas);

Properties

	property Selected: boolean read FSelected write SetSelected;
	property Editing: boolean read FEditing write SetEditing;
	property Text: string read FText write SetText;
	property Rect: TRect read FRect write SetRect;
	property Font: TFont read FFont write SetFont;
	property OnChange: TNotifyEvent read FOnChange write FOnChange;
	property OnDraw: TDrawTextEvent read FOnDraw write FOnDraw;

Description

Fields

	FRect: TRect;

	FFont: TFont;

	FText: string;

	FSelected: boolean;

	FEditing: boolean;

	FOnChange: TNotifyEvent;

	FOnDraw: TDrawTextEvent;

Methods

	procedure FontChanged(Sender: TObject);

	procedure SetFont(const Value: TFont);

	procedure SetRect(const Value: TRect);

	procedure SetText(const Value: string);

	procedure SetEditing(const Value: boolean);

	procedure SetSelected(const Value: boolean);

	procedure Changed;

	Constructor Create;

	Destructor Destroy; override;

	procedure Draw(ACanvas: TCanvas);

Properties

	property Selected: boolean read FSelected write SetSelected;

	property Editing: boolean read FEditing write SetEditing;

	property Text: string read FText write SetText;

	property Rect: TRect read FRect write SetRect;

	property Font: TFont read FFont write SetFont;

	property OnChange: TNotifyEvent read FOnChange write FOnChange;

	property OnDraw: TDrawTextEvent read FOnDraw write FOnDraw;