Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
delph_t.doc
Скачиваний:
47
Добавлен:
12.04.2015
Размер:
2.26 Mб
Скачать

TNotebook- набор страниц

property ActivePage: Stringy-

Определяет имя верхней страницы блокнота.

property Pagelndex: Integer;

Содержит индекс верхней страницы блокнота.

property Pages: TStrings;

Содержит набор строк с именами страниц.

TTabbedNotebook- набор страниц с закладками

property Data: Pointer;

Указатель на связанные с узлом данные.

property Expanded: Boolean;

Если содержит True, с узлом связан раскрытый список дочерних узлов.

property FullPath: String;

Содержит полное имя узла со списком имен всех родительских узлов, разделенных символом ItemSeparator объекта TOutLine.

property Hasltems: Boolean;

Содержит True, если с узлом связаны дочерние узлы,

property Index: Longint;

Содержит уникальный идентификатор узла в компоненте TOutLine.

property IsVisible: Boolean;

Содержит True, если узел виден в окне компонента TOutLine.

property Level: Integer;

Определяет уровень иерархии узла. Узел самого верхнего уровня имеет уровень 0, его дочерние узлы - уровень 1, их дочерние узлы - уровень 2 и т.д.

property Text: String;

Определяет имя узла.

property Topltem: Longint;

Содержит индекс своего родительского узла первого уровня (родительский узел нулевого уровня не виден в компоненте TOutLine).

Класс tOutLineNode: методы

procedure ChangeLevelBy(Value:TChangeRange) ;

Перемещает уровень узла на один вверх (Value=-l) или вниз (Value=+l).

procedureCollapse;

Закрывает список дочерних узлов.

procedureFullExpand;

Раскрывает список всех своих дочерних узлов на всех уровнях.

function GetFirstChild: TTreeNode;

Возвращает ссылку на первый дочерний узел или NIL, если нет дочерних узлов.

function GetPrevChild(Value:Longint): Longint;

Возвращает индекс узла, предшествующего узлу Value.

TAttachMode = (oaAdd, oaAddChild, oalnsert); procedure MoveTo(Destination: Longint; AttachMode: TAttachMode) ;

Перемещает узел со всеми потомками в положение, определяемое индексом Destination и режимом AttachMode: oaAdd - добавить последним на том же уровне, что и Destination; oaAddChild - добавить последним к потомкам узла Destination; oalnsert - вставить на место Destination, который смещается ниже него на том же уровне.

Свойства компонента tOutLine

property Canvas: TCanvas;

Определяет канву для прорисовки компонента.

property ItemHeight: Integers-

Определяет высоту узлов.

property Items[Index: Longint]: TOutlineNode;

Открывает доступ к узлу по его индексу.

property ItemCount: Longint;

Содержит общее количество узлов.

property Lines: TStrings;

Содержит список всех узлов.

TOutlineOption = (ooDrawTreeRoot, ooDrawFocusRect,. ooStretchBit-maps); TOutlineOptions = set of TOutlineOption; property Options: TOutlineOptions;

Определяет атрибуты прорисовки: ooDrawTreeRoot - соединять линии узлов верхнего уровня; ooDrawFocusRect - выделять пунктиром сфокусированный узел; ooStretchBitmaps - масштабировать пиктограммы.

TOutlineStyle = (osText, osPlusMinusText, osPictureText, osPlusMinusPictureText, osTreeText, osTreePictureText);

Задает стиль прорисовки: osText - выводится только текст (без линий); osPlusMinusText-текст и пиктограммы PicturePlus/PictureMinus; osPictureText - текст и пиктограммы Picture-

property OutlineStyle: TOutlineStyle;

Open/PictureClosed/PictureLeaf; osPlusMinus-PictureText - объединяет два предыдущих стиля; osTreeText - текст и линии связи между узлами; osTreePictureText - объединяет osTreeText и osPictureText.

property PictureClosed: TBitmap;

Содержит пиктограмму узла с закрытым списком дочерних узлов. По умолчанию -закрытая папка.

property PictureMinus: TBitmap;

Содержит пиктограмму узла с закрытым списком дочерних узлов. По умолчанию -пиктограмма со знаком минус.

property PictureOpen: TBitmap;

Содержит пиктограмму узла с открытым списком дочерних узлов. По умолчанию -открытая папка.

property PictureLeaf: TBitmap;

Содержит пиктограмму узла, не имеющего дочерних узлов. По умолчанию - пиктограмма документа.

property PicturePlus: TBitmap;

Содержит пиктограмму узла с открытым списком дочерних узлов. По умолчанию -пиктограмма со знаком плюс.

property Row: Longing-

Содержит индекс сфокусированного узла.

property ScrollBars: TScrollStyle;

Определяет наличие полос прокрутки: ssNone - нет полос; ssHorizontal - горизонтальная полоса; ss Vertical - вертикальная полоса; ssBoth - и горизонтальная, и вертикальная полоса.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]