Class TPaintTextBox (unit INIUtil)

Inherits from

TPaintBox

Constructors


constructor Create(AOwner:TComponent);



Functions

procedure Notification(AComponent:TComponent;Operation:TOperation);


procedure Paint;


function GetFormat:Word;


procedure SetMessageText(const Msg:string);


procedure SetShadow(sh:Integer);


procedure SetShadowColor(shCol:TColor);


procedure SetTextFormat(Format:TTextFormatFlag);


procedure SetXBorder(xBor:Integer);


procedure SetYBorder(yBor:Integer);


Properties

property Caption : string


property ImageIndex : Integer


property ImageList : TImageList


property MessageText : string


property Shadow : Integer


property ShadowColor : TColor


property TextFormat : TTextFormatFlag


property XBorder : Integer


property YBorder : Integer


property FormatValue : Word


Events

Variables

FImageIndex : Integer;


FImageList : TImageList;


FMsgText : string;


FShadow : Integer;


FShadowColor : TColor;


FTextFormat : TTextFormatFlag;


FXBorder : Integer;


FYBorder : Integer;



Constructors


constructor Create(AOwner:TComponent);


Functions


procedure Notification(AComponent:TComponent;Operation:TOperation);


procedure Paint;


function GetFormat:Word;


procedure SetMessageText(const Msg:string);


procedure SetShadow(sh:Integer);


procedure SetShadowColor(shCol:TColor);


procedure SetTextFormat(Format:TTextFormatFlag);


procedure SetXBorder(xBor:Integer);


procedure SetYBorder(yBor:Integer);


Properties


property Caption : string


property ImageIndex : Integer


property ImageList : TImageList


property MessageText : string


property Shadow : Integer


property ShadowColor : TColor


property TextFormat : TTextFormatFlag


property XBorder : Integer


property YBorder : Integer


property FormatValue : Word


Events


Variables


FImageIndex : Integer;


FImageList : TImageList;


FMsgText : string;


FShadow : Integer;


FShadowColor : TColor;


FTextFormat : TTextFormatFlag;


FXBorder : Integer;


FYBorder : Integer;