| Class TFileComboBox (unit FileCombo) |
TCustomComboBox
TFileComboBox
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure ApplyFilePath (const EditText: string);
destructor Destroy;
procedure Update;
procedure Change;
procedure Click;
procedure CreateWnd;
procedure DrawItem(Index: Integer; Rect: TRect; State: TOwnerDrawState);
function GetFilePath: string;
procedure Notification(AComponent: TComponent; Operation: TOperation);
procedure ReadBitmaps;
procedure ReadFileNames;
function GetDrive: char;
function GetFileName: string;
function IsMaskStored: Boolean;
procedure SetDirectory(const NewDirectory: string);
procedure SetDrive(Value: char);
procedure SetFileEdit(Value: TEdit);
procedure SetFileName(const NewFile: string);
procedure SetFileType(NewFileType: TFileType);
procedure SetMask(const NewMask: string);| Properties |
property Align :
property Color :
property Ctl3D :
property DragCursor :
property DragMode :
property Enabled :
property FileEdit : TEdit
property FileType : TFileType
property Font :
property ItemHeight :
property Mask : string
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property TabOrder :
property TabStop :
property Visible :
property Directory : string
property Drive : char
property FileName : string| Events |
event OnChange : TNotifyEvent
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStartDrag : | Variables |
DirBMP : TBitmap;
ExeBMP : TBitmap;
FDirectory : string;
FDirList : TDirectoryListBox;
FFileEdit : TEdit;
FFileType : TFileType;
FFilterCombo : TFilterComboBox;
FLastSel : Integer;
FMask : string;
FOnChange : TNotifyEvent;
UnknownBMP : TBitmap;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure ApplyFilePath (const EditText: string);
destructor Destroy;default file mask is all
procedure Update;
procedure Change;
procedure Click;exclude normal files if ftNormal not set
procedure CreateWnd;
procedure DrawItem(Index: Integer; Rect: TRect; State: TOwnerDrawState);
function GetFilePath: string;
procedure Notification(AComponent: TComponent; Operation: TOperation);
procedure ReadBitmaps;
procedure ReadFileNames;
function GetDrive: char;
function GetFileName: string;
function IsMaskStored: Boolean;
procedure SetDirectory(const NewDirectory: string);
procedure SetDrive(Value: char);
procedure SetFileEdit(Value: TEdit);
procedure SetFileName(const NewFile: string);if (idx < 0) or (Items.Count = 0) or (Selected[idx] = FALSE) then Result := '' else
procedure SetFileType(NewFileType: TFileType);store correct directory name
procedure SetMask(const NewMask: string);| Properties |
property Align :
property Color :
property Ctl3D :
property DragCursor :
property DragMode :
property Enabled :
property FileEdit : TEdit
property FileType : TFileType
property Font :
property ItemHeight :
property Mask : string
property ParentColor :
property ParentCtl3D :
property ParentFont :
property ParentShowHint :
property PopupMenu :
property ShowHint :
property TabOrder :
property TabStop :
property Visible :
property Directory : string
property Drive : char
property FileName : string| Events |
event OnChange : TNotifyEvent
event OnClick :
event OnDblClick :
event OnDragDrop :
event OnDragOver :
event OnEndDrag :
event OnEnter :
event OnExit :
event OnKeyDown :
event OnKeyPress :
event OnKeyUp :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnStartDrag : | Variables |
DirBMP : TBitmap;
ExeBMP : TBitmap;
FDirectory : string;
FDirList : TDirectoryListBox;
FFileEdit : TEdit;
FFileType : TFileType;
FFilterCombo : TFilterComboBox;
FLastSel : Integer;
FMask : string;
FOnChange : TNotifyEvent;
UnknownBMP : TBitmap;