| Class TSelectComboBox (unit SelCombo) |
TComboBox
| Constructors |
constructor Create ( AOwner : TComponent );| Functions |
procedure CheckAll;
procedure Checked( Index: integer );
procedure ClosePopUp( Sender : TObject );
procedure DeSelectAll( Sender: TObject );
destructor Destroy;
function IsChecked ( Index: integer ) : boolean;
procedure ListBoxDrawItem( Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState );
procedure ListBoxMouseDown( Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer );
function NonSelectedList : TStringList;
procedure SelectAll( Sender: TObject );
function SelectedList : TStringList;
function SelectedString : string;
procedure UnCheckAll;
procedure UnChecked( Index: integer );
procedure DropDown;
function IfChecked( Index: integer ) : boolean;
procedure OwnerDrawCheck ( Index: integer );
procedure OwnerDrawRect ( Index: integer );
procedure Toggle( Index : integer );| Properties |
property HorzScrollBar : boolean| Events |
| Variables |
FDDForm : TForm;
FDeSelectAll : TMenuItem;
FHorzScrollBar : boolean;
FListBox : TListBox;
FPopup : TPopupMenu;
FSelectAll : TMenuItem;| Constructors |
constructor Create ( AOwner : TComponent );| Functions |
procedure CheckAll;
procedure Checked( Index: integer );
procedure ClosePopUp( Sender : TObject );Assign Form coordinate and show
procedure DeSelectAll( Sender: TObject );
destructor Destroy;Create PopUp
function IsChecked ( Index: integer ) : boolean;
procedure ListBoxDrawItem( Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState );
procedure ListBoxMouseDown( Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer );
function NonSelectedList : TStringList;
procedure SelectAll( Sender: TObject );procedure TSelectComboBox.SelectAll( Sender: TObject );
function SelectedList : TStringList;
function SelectedString : string;
procedure UnCheckAll;
procedure UnChecked( Index: integer );
procedure DropDown;
function IfChecked( Index: integer ) : boolean;
procedure OwnerDrawCheck ( Index: integer );
procedure OwnerDrawRect ( Index: integer );
procedure Toggle( Index : integer );| Properties |
property HorzScrollBar : boolean| Events |
| Variables |
FDDForm : TForm;
FDeSelectAll : TMenuItem;
FHorzScrollBar : boolean;
FListBox : TListBox;
FPopup : TPopupMenu;
FSelectAll : TMenuItem;