Class TmwComboBase (unit mwCombBase)

Inherits from

TCustomEdit

Constructors


constructor Create(AOwner: TComponent);

Destroy


Functions

procedure BoxClick(Sender: TObject);


destructor Destroy;

WMLButtonDown

procedure DrawImage(Bitmap: TBitmap; Position: Integer);

SetBounds

procedure CreateParams(var Params: TCreateParams);

Create

procedure CreateWindowHandle(const Params: TCreateParams);

CreateWnd

procedure CreateWnd;


procedure SetBounds(Left, Top, Width, Height: Integer);

BoxClick

procedure SetEditRect;

WndProc

function GetBoxGlyph: TBitmap;

SetBoxWidth

function GetBoxWidth: Integer;

SetStateImage

function GetGridHeight:Integer;

SetBoxGlyph

procedure SetBoxGlyph(NewValue: TBitmap);

GetBoxGlyph

procedure SetBoxWidth(NewValue: Integer);

GetBoxWidth

procedure SetGridHeight(NewValue:Integer);

GetGridHeight

procedure SetImage(NewValue: TBitmap);

DrawImage

procedure SetStateImage(NewValue: TBitmap);

SetImage

procedure WMPaint(var Message: TWMPaint);

CreateWindowHandle

procedure WndProc(var Message: TMessage);

WMPaint

Properties

property BoxGlyph : TBitmap


property BoxWidth : Integer


property Font :


property GridHeight : Integer


property Image : TBitmap


property ShowHint :


property StateImage : TBitmap


property Text :


Events

event OnChange :


event OnClick :


event OnDblClick :


event OnEnter :


event OnExit :


Variables

Box : TSpeedButton;


Grid : TStringGrid;


Action : procedure of object;


FCanvas : TControlCanvas;


fImage : TBitmap;


fStateImage : TBitmap;



Constructors


constructor Create(AOwner: TComponent);

Destroy


Functions


procedure BoxClick(Sender: TObject);


destructor Destroy;

WMLButtonDown


procedure DrawImage(Bitmap: TBitmap; Position: Integer);

SetBounds


procedure CreateParams(var Params: TCreateParams);

Create


procedure CreateWindowHandle(const Params: TCreateParams);

CreateWnd


procedure CreateWnd;


procedure SetBounds(Left, Top, Width, Height: Integer);

BoxClick


procedure SetEditRect;

WndProc


function GetBoxGlyph: TBitmap;

SetBoxWidth


function GetBoxWidth: Integer;

SetStateImage


function GetGridHeight:Integer;

SetBoxGlyph


procedure SetBoxGlyph(NewValue: TBitmap);

GetBoxGlyph


procedure SetBoxWidth(NewValue: Integer);

GetBoxWidth


procedure SetGridHeight(NewValue:Integer);

GetGridHeight


procedure SetImage(NewValue: TBitmap);

DrawImage


procedure SetStateImage(NewValue: TBitmap);

SetImage


procedure WMPaint(var Message: TWMPaint);

CreateWindowHandle


procedure WndProc(var Message: TMessage);

WMPaint


Properties


property BoxGlyph : TBitmap


property BoxWidth : Integer


property Font :


property GridHeight : Integer


property Image : TBitmap


property ShowHint :


property StateImage : TBitmap


property Text :


Events


event OnChange :


event OnClick :


event OnDblClick :


event OnEnter :


event OnExit :


Variables


Box : TSpeedButton;


Grid : TStringGrid;


Action : procedure of object;


FCanvas : TControlCanvas;


fImage : TBitmap;


fStateImage : TBitmap;