Rapid-Q Documentation by William Yu (c)1999	Appendix A: QDIRTREE

QDIRTREE Компонент

QDirTree is a custom component used to provide users with a Windows Explorer like directory list. It eats up a lot of resources, so use with caution. You don't usually need more than one of these.

QDirTree Свойства

Поле	Тип	R/W	По умолчанию

Align	INTEGER	RW	alNone
BorderStyle	INTEGER	RW	bsSingle
Color	INTEGER	RW
Cursor	INTEGER	RW	crDefault
Directory	STRING	RW	False
Enabled	INTEGER	RW	True
FastLoad	INTEGER	RW	False
Font	QFONT	W
Height	INTEGER	RW
HideSelection	INTEGER	RW	False
Hint	STRING	RW
InitialDir	STRING	RW
Left	INTEGER	RW	0
Parent	QFORM/QPANEL/QTABCONTROL	W
PopupMenu	QPOPUPMENU	W
ReadOnly	INTEGER	RW	False
ReadOnStart	INTEGER	RW	False
ShowHint	INTEGER	RW	False
TabOrder	INTEGER	RW
Top	INTEGER	RW	0
Width	INTEGER	RW
Visible	INTEGER	RW	True

QDirTree Методы

Метод	Тип	Описание	Параметры

AddDirTypes	SUB	Add directory types	0
AddDriveTypes	SUB	Add drive types	0
DelDirTypes	SUB	Del directory types	0
DelDirTypes	SUB	Del drive types	0
FullCollapse	SUB	Collapse entire directory list	0
FullExpand	SUB	Expand entire directory list (slow!)	0
Reload	SUB	Re-read directories	0

QDirTree События

Событие	Тип	Происходит когда...	Параметры

OnChange	VOID	Current directory changes	0

QDirTree Примеры

'' A Directory Tree like Windows Explorer.
'' QDIRTREE Компонент courtesy of Markus Stephany.
'' I took out removable drives because it doesn't work properly.
'' So you won't be able to view your floppy disk drives.  CD-ROM drives
'' are fine, as far as I know...

$TYPECHECK ON

DECLARE SUB ChangeDirectory

CREATE Form AS QForm
  Caption = "Directory Tree"
  Center
  CREATE DirTree AS QDirTree
    InitialDir = CURDIR$
    Width = Form.ClientWidth
    Height = Form.ClientHeight
    OnChange = ChangeDirectory
  END CREATE
  ShowModal
END CREATE

SUB ChangeDirectory
  ShowMessage DirTree.Directory
END SUB

Предыдущий Компонент

Содержание

Следующий Компонент