Class TTextDisplay

Unit

DisplaySettingsUnit

Declaration

type TTextDisplay = class(TGoPhastPersistent)

Description

Hierarchy

• TPersistent
• TGoPhastPersistent
• TTextDisplay

Overview

Fields

	FFont: TFont;
	FText: string;
	FRect: TRect;

Methods

	procedure FontChanged(Sender: TObject);
	procedure SetFont(const Value: TFont);
	procedure SetRect(const Value: TRect);
	procedure SetText(const Value: string);
	function GetBottom: integer;
	function GetLeft: integer;
	function GetRight: integer;
	function GetTop: integer;
	procedure SetBottom(const Value: integer);
	procedure SetLeft(const Value: integer);
	procedure SetRight(const Value: integer);
	procedure SetTop(const Value: integer);
	procedure Assign(Source: TPersistent); override;
	procedure AssignTo(Dest: TPersistent); override;
	Constructor Create(Model: TBaseModel);
	Destructor Destroy; override;

Properties

	property Rect: TRect read FRect write SetRect;
	property Text: string read FText write SetText;
	property Font: TFont read FFont write SetFont;
	property Top: integer read GetTop write SetTop;
	property Bottom: integer read GetBottom write SetBottom;
	property Left: integer read GetLeft write SetLeft;
	property Right: integer read GetRight write SetRight;

Description

Fields

	FFont: TFont;

	FText: string;

	FRect: TRect;

Methods

	procedure FontChanged(Sender: TObject);

	procedure SetFont(const Value: TFont);

	procedure SetRect(const Value: TRect);

	procedure SetText(const Value: string);

	function GetBottom: integer;

	function GetLeft: integer;

	function GetRight: integer;

	function GetTop: integer;

	procedure SetBottom(const Value: integer);

	procedure SetLeft(const Value: integer);

	procedure SetRight(const Value: integer);

	procedure SetTop(const Value: integer);

	procedure Assign(Source: TPersistent); override;

	procedure AssignTo(Dest: TPersistent); override;

	Constructor Create(Model: TBaseModel);

	Destructor Destroy; override;

Properties

	property Rect: TRect read FRect write SetRect;

	property Text: string read FText write SetText;

	property Font: TFont read FFont write SetFont;

	property Top: integer read GetTop write SetTop;

	property Bottom: integer read GetBottom write SetBottom;

	property Left: integer read GetLeft write SetLeft;

	property Right: integer read GetRight write SetRight;