[Overview][Types][Classes][Procedures and functions][Variables][Index] | Reference for unit 'Buttons' (#lcl)

# TButtonGlyph

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

A small image that can be attached to buttons

## Declaration

Source position: buttons.pp line 77

`type TButtonGlyph = class(TObject, IUnknown, IImageCacheListener)`
`protected`
`function QueryInterface();`
`function _AddRef;`
`function _Release;`
`procedure CacheSetImageList();`
`procedure CacheSetImageIndex();`
`procedure GlyphChanged();` |  |
`procedure SetTransparentMode();`
`property TransparentMode: TGlyphTransparencyMode; [r]`
`public`
`constructor Create;` |  | Create - constructor for TButtonGlyph: frees the Images cache then creates a Glyph Bitmap
`destructor Destroy; override;` |  | Destroy - destructor for TButtonGlyph: frees caches and calls inherited Destroy
`procedure GetImageIndexAndEffect();` |  | Find the index for the image and the effect to be used for drawing it
`function Draw();` |  | Draw the image in the specified rectangle, within the client rectangle at specified offset, with the specified state and transparency
`procedure Refresh;`
`property Glyph: TBitmap; [rw]` |  | The small bitmap image to be drawn on the button
`property IsDesigning: Boolean; [rw]`
`property NumGlyphs: TNumGlyphs; [rw]` |  | The number of glyphs to be drawn
`property Images: TCustomImageList; [r]` |  | The list of available images from which selection can be made
`property Width: Integer; [r]` |  | The width of the glyph image
`property Height: Integer; [r]` |  | The height of the glyph image
`property ShowMode: TGlyphShowMode; [rw]`
`property OnChange: TNotifyEvent; [rw]` |  | Event handler for a change in the glyph
`end;`

## Inheritance

`TButtonGlyph,IUnknown,IImageCacheListener` |  | A small image that can be attached to buttons
`TObject`

## Description

Button Glyph: The graphics and legend on a button

The latest version of this document can be found at lazarus-ccr.sourceforge.net .