Class TLanguagesCombo (unit LCCombo)

Inherits from

TCustomComboBox

Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions

destructor Destroy;


procedure BuildList;

Protected declarations

procedure Click;


procedure CreateWnd;


procedure Change;


procedure DrawItem(Index: Integer; Rect: TRect; State: TOwnerDrawState);


function GetLanguage: TLanguage;


function GetLanguageCount: Integer;


function GetLanguageName: String;


procedure Reset;


procedure SetLanguage(Value: TLanguage);


procedure SetLanguageName(const NewName: String);


procedure SetLanguageType(LT: TLanguageType);


procedure SetShowFlag(Value: Boolean);


procedure SetViewType(VT: TLanguageViewType);


Properties

property Color :


property Ctl3D :


property DragCursor :


property DragMode :


property Enabled :


property Font :


property ImeMode :


property ImeName :


property Language : TLanguage

Published declarations

property LanguageCount : Integer


property LanguageName : String


property LanguageType : TLanguageType


property ParentColor :


property ParentCtl3D :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ShowFlag : Boolean


property ShowHint :


property TabOrder :


property TabStop :


property ViewType : TLanguageViewType


property Visible :


Events

event OnChange : TNotifyEvent


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnDropDown :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnStartDrag :


Variables

FlagBmp : TBitmap;


FLanguageType : TLanguageType;

Private declarations

FOnChange : TNotifyEvent;


FShowFlag : Boolean;


FViewType : TLanguageViewType;



Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions


destructor Destroy;


procedure BuildList;

Protected declarations


procedure Click;


procedure CreateWnd;


procedure Change;


procedure DrawItem(Index: Integer; Rect: TRect; State: TOwnerDrawState);


function GetLanguage: TLanguage;


function GetLanguageCount: Integer;


function GetLanguageName: String;


procedure Reset;


procedure SetLanguage(Value: TLanguage);


procedure SetLanguageName(const NewName: String);


procedure SetLanguageType(LT: TLanguageType);


procedure SetShowFlag(Value: Boolean);


procedure SetViewType(VT: TLanguageViewType);


Properties


property Color :


property Ctl3D :


property DragCursor :


property DragMode :


property Enabled :


property Font :


property ImeMode :


property ImeName :


property Language : TLanguage

Published declarations


property LanguageCount : Integer


property LanguageName : String


property LanguageType : TLanguageType


property ParentColor :


property ParentCtl3D :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ShowFlag : Boolean


property ShowHint :


property TabOrder :


property TabStop :


property ViewType : TLanguageViewType


property Visible :


Events


event OnChange : TNotifyEvent


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnDropDown :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnStartDrag :


Variables


FlagBmp : TBitmap;


FLanguageType : TLanguageType;

Private declarations


FOnChange : TNotifyEvent;


FShowFlag : Boolean;


FViewType : TLanguageViewType;