Unit CapCtrl |
*****************************************************************************) (* TCaptionControl 1.10 for Delphi 3.0 *) (* Beta Development version - Build 1 *) (* NOT FOR DISTRIBUTION *) (* *) (* Copyright (c) 1996, 98 Yorai Aminov *) (
Classes |
TCaptionButton - TCaptionButton
TCaptionButtons - TCaptionButtons
TCaptionControl -
TCustomCaptionControl - TCustomCaptionControl
Functions |
Register - Register component
Types |
TCaptionButtonClickEvent
TCaptionButtonDrawEvent
TCaptionButtonKind
TCaptionGradient
TDirection
TDrawCaptionEvent
Constants |
Variables |
Functions |
Types |
TCaptionButtonClickEvent = procedure(Sender: TObject; ButtonIndex: Integer; var Pushed: Boolean) of object
TCaptionButtonDrawEvent = procedure(Sender: TObject; ButtonIndex: Integer; Canvas: TCanvas; Rect: TRect; var Drawn: boolean) of object
TCaptionButtonKind = (cbkCustom, cbkOk, cbkRollUp, cbkRollDown, cbkDocument, cbkFolder, cbkWindow, cbkMail, cbkDownArrow, cbkUpArrow, cbkLeftArrow, cbkRightArrow, cbkMore, cbkFlag, cbkCool, cbkInfo);
TCaptionGradient = (cgNone, cgActive, cgAlways);
TDirection = (dirLeft, dirRight);Types
TDrawCaptionEvent = procedure(Sender: TObject; var CaptionText: String; Canvas: TCanvas; Rect: TRect; var Drawn: boolean) of objectEvents
Constants |
Variables |