|
|
|
| |
Определяет диалоговый фрагмент, позволяющий сделать выбор каталога (папки) файловой системы, представленной в виде дерева.
Создание объекта
frgObj=new TDirectoryOutline(Parent);
| Собственные свойства
|
| Свойство
| Тип
| Описание
|
| Directory
| String
| выбранный каталог, также каталог по умолчанию
|
| Drive
| String
| выбранный диск, также диск по умолчанию
|
| TextCase
| Enum
| регистр отображения информации (см. ниже)
|
| Наследуемые от компонента TOutline
| [TYPE]
| [DESC]
|
| DefaultRowHeight
| Number
| высота строки по умолчанию
|
| ItemHeight
| Number
| исходная высота узла дерева
|
| Lines
| TStrings
| список строк дерева
|
| OutlineStyle
| Enum
| стиль отображения дерева (см. ниже)
|
| PictureClosed
| TBitmap
| изображение, используемое для значка свернутого узла
|
| PictureLeaf
| TBitmap
| изображение, используемое для значка узла, не имеющего потомков
|
| PictureMinus
| TBitmap
| изображение, используемое для значка развернутого узла
|
| PictureOpen
| TBitmap
| изображение, используемое для значка развернутого узла
|
| PicturePlus
| TBitmap
| изображение, используемое для значка свернутого узла
|
| Row
| Number
| номер строки выделенного узла
|
| ScrollBars
| Enum
| отображение полос прокрутки (см. ниже)
|
| SelectedItem
| Number
| индекс выделенного узла в списке Items
|
| Style
| Enum
| способ отрисовки дерева и его узлов (см. ниже)
|
| TopRow
| Number
| номер верхней видимой строки
|
| Только чтение
| [TYPE]
| [DESC]
|
| Canvas
| TCanvas
| дескриптор графической канвы
|
| GridHeight
| Number
| текущая высота дерева, px
|
| GridWidth
| Number
| текущая ширина дерева, px
|
| ItemCount
| Number
| текущее количество узлов в дереве
|
| RowCount
| Number
| текущее количество строк
|
| VisibleRowCount
| Number
| количество видимых строк дерева
|
|
| Свойство TextCase
|
| Значение
| Описание
|
| tcAsIs
| как есть
|
| tcLowerCase
| в нижнем регистре
|
| tcUpperCase
| в верхнем регистре
|
|
| Свойство OutlineStyle
|
| Значение
| Описание
|
| osText
| только текст
|
| osPlusMinusText
| текст и значки PicturePlus, PictureMinus в зависимости от состояния узла
|
| osPictureText
| текст и значки PictureOpen, PictureClosed, PictureLeaf в зависимости от состояния узла
|
| osPlusMinusPictureText
| объединение стилей osPlusMinusText и osPictureText
|
| osTreeText
| текст и линии, связывающие родительские и дочерние узлы
|
| osTreePictureText
| объединение стилей osTreeText и osPictureText (стиль по умолчанию)
|
|
| Свойство Style
|
| Значение
| Описание
|
| otStandard
| автоматическая отрисовка
|
| otOwnerDraw
| программная отрисовка (по событию OnDrawItem)
|
|
Стандартные свойства
Стандартные методы
Стандартные события
// Главная форма
frm=new TForm();
frm.Caption="JS+ - фрагмент диалога TDirectoryOutline";
frm.Width =450;
frm.Height=300;
// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Выберите папку";
// Папки
dol=new TDirectoryOutline(frm);
dol.BorderStyle=bsSingle;
dol.SetBounds(10,10,frm.ClientWidth-20,stb.Top-20);
dol.Directory=getWinDir();
dol.OnChange=dol_Change;
dol.OnCollapse=dol_Collapse;
dol.OnExpand=dol_Expand;
dol.TextCase=tcUpperCase;
frm.ShowModal();
function dol_Change(Sender)
{
var dol=Sender;
stb.SimpleText=" Выделенный узел: "+dol.Lines[dol.SelectedItem-1].trim();
}
// Обработчик события OnCollapse
function dol_Collapse(Sender,Index)
{
var dol=Sender;
stb.SimpleText=" Узел: "+dol.Lines[Index-1].trim()+" свернут";
}
// Обработчик события OnExpand
function dol_Expand(Sender,Index)
{
var dol=Sender;
stb.SimpleText=" Узел: "+dol.Lines[Index-1].trim()+" развернут";
}
|
Совместимость
C++ Builder/Delphi
|
| JS+ | Руководство пользователя
|
|
|
| |
|
|
