TCustomControl ----+ | TmlCustomBitmapButton ----+ | TmlRealTimeButton
Unit:
mediabtn
(mediabtn.pas)
Constructors:
Propertys:
Methods:
constructor Create(AOwner: TComponent); override;
property ClickSound;
property ActiveSound;
function CreateOneBitmap(AState: TBtnState; AActive: boolean): TBitmap;
procedure DrawBitmaps; override;
destructor Destroy; override;
procedure Loaded; override;
procedure CreateBitmaps; // Run-Time cach bitmaps