| Class TRaiseLowerButton (unit raisebtn) |
TCustomPanel
If you use or modify this component, have Fun. But please send an email (And if possible, the modified component) to rhand@idealss.com.. THanx
| Constructors |
constructor Create(aOwner : Tcomponent);| Functions |
procedure CMMouseEnter(var msg:TMessage);
procedure CMMouseLeave(var msg: TMessage);
destructor Destroy;
function GetTitle:String;
Procedure SetPicture(NewPic : TPicture);
procedure SetTitle(Newcap : String);Procedures to SEt property Values
procedure WMSize(var Message:TWMSize);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure Paint;
procedure SetName(const NewName : TComponentName);| Properties |
property Align :
property Color :
property Font :
property Hint :
property ParentColor :
property Parentfont :
property ParentShowHint :
property Picture : TPicture
property ShowHint :
property Title : String| Events |
event OnClick : | Variables |
fImage : TPicture;
fTitle : String;| Constructors |
constructor Create(aOwner : Tcomponent);| Functions |
procedure CMMouseEnter(var msg:TMessage);Windows Message Handlers
procedure CMMouseLeave(var msg: TMessage);respond to mouse enter
destructor Destroy;Constructor and Destructor
function GetTitle:String;
Procedure SetPicture(NewPic : TPicture);
procedure SetTitle(Newcap : String);Public declarations
Procedures to SEt property Values
procedure WMSize(var Message:TWMSize);respond to mouse leave
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);Protected declarations
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure Paint;
procedure SetName(const NewName : TComponentName);Overriden procedures
| Properties |
property Align :
property Color :
property Font :
property Hint :
property ParentColor :
property Parentfont :
property ParentShowHint :
property Picture : TPicturePublished declarations
property ShowHint :
property Title : String| Events |
event OnClick : | Variables |
fImage : TPicture;Private declarations
fTitle : String;