type TUCFNote = class(TGraphicControl)
Name | Description |
---|---|
FBorder | |
FComputingSize | |
FNoteTabPoints | |
FNoteTabSize | |
FParentBrush | |
FText |
constructor Create( anOwner : TComponent); override; |
Déclarations publiques
destructor Destroy; override; |
procedure AdjustSize; override; |
Déclarations protégées
procedure BrushHasChanged( anObject : TObject); virtual; |
function CanResize(var NewWidth, NewHeight: Integer): Boolean; override; |
procedure ChangeText( Sender : TObject); virtual; |
procedure ComputeBorder; virtual; |
procedure ComputeSize; virtual; |
function GetBrush: TBrush; |
function GetFont: TFont; |
function GetText: TStrings; |
procedure Paint; override; |
procedure PaintBack; virtual; |
procedure PaintBorder; virtual; |
procedure PaintText; virtual; |
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer); override; |
procedure SetBrush(const Value: TBrush); |
procedure SetFont(const Value: TFont); |
procedure SetNoteTabSize(const Value: Integer); |
procedure SetParentBrush(const Value: Boolean); |
procedure SetText(const Value: TStrings); |
AutoSize: |
Brush: |
Font: |
NoteTabSize: |
ParentBrush: |
Text: |
AutoSize: |
Déclarations publiées
Brush: |
Font: |
NoteTabSize: |
ParentBrush: |
Text: |