Class: TmlBlurButton

TCustomControl ----+
              |
    TmlCustomBitmapButton ----+
                              |
                      TmlRealTimeButton ----+
                                            |
                                      TmlBlurButton

Description:
Button with blur effect

Unit:
mediabtn (mediabtn.pas)

Constructors:

constructor Create(AOwner: TComponent); override;

Propertys:

property ClickSound;
property ActiveSound;
property ActiveTextColor: TColor read FActiveTextColor write SetActiveTextColor;
Active caption color
property BevelWidht: integer read FBevelWidth write SetBevelWidth;
Bevel width
property Blur: boolean read FBlur write SetBlur;
If true then using blur algoritm
property Color: TColor read FColor write SetColor;
Button color
property Kind: TmlKind read FKind write SetKind;
Button kind. See TmlKind
property TextColor: TColor read FTextColor write SetTextColor;
Non active caption color

Methods:

function CreateOneBitmap(AState: TBtnState; AActive: boolean): TBitmap;
destructor Destroy; override;

constructor Create(AOwner: TComponent); override;


property ClickSound;


property ActiveSound;


property ActiveTextColor: TColor read FActiveTextColor write SetActiveTextColor;

Active caption color


property BevelWidht: integer read FBevelWidth write SetBevelWidth;

Bevel width


property Blur: boolean read FBlur write SetBlur;

If true then using blur algoritm


property Color: TColor read FColor write SetColor;

Button color


property Kind: TmlKind read FKind write SetKind;

Button kind. See TmlKind


property TextColor: TColor read FTextColor write SetTextColor;

Non active caption color


function CreateOneBitmap(AState: TBtnState; AActive: boolean): TBitmap;


destructor Destroy; override;