| Class TColorButton (unit ColorButton) |
| Constructors |
constructor Create( AOwner: TComponent );| Functions |
procedure MouseDown( Button: TMouseButton; Shift: TShiftState; X, Y: Integer );
procedure MouseUp( Button: TMouseButton; Shift: TShiftState; X, Y: Integer );| Properties |
| Events |
| Variables |
FSaveColor : byte;| Constructors |
constructor Create( AOwner: TComponent );************************************************** Some new defaults.
| Functions |
procedure MouseDown( Button: TMouseButton; Shift: TShiftState; X, Y: Integer );************************************************** When the button is "pressed" draw in shadow color.
procedure MouseUp( Button: TMouseButton; Shift: TShiftState; X, Y: Integer );************************************************** Restore the color when the mouse is lifted.
| Properties |
| Events |
| Variables |
FSaveColor : byte;