Наследник TListView
(на
самом деле, является наследником промежуточного класса
TColorListView - автор А. Шахайло, но этот промежуточный класс не
предлагается для самостоятельного использования, и инкапсулирует в
основном возможности по рисованию ячеек и заголовка различным цветом и
шрифтами). Основное отличие от предка - этот список предназначен для
быстрого отображения
больших наборов данных, обычно загруженных из базы данных, поэтому
базовый компонент TListView используется сразу
как виртуальный. Причем, отображение всегда подразумевает вид таблицы (lvReport),
и другие варианты просто никогда не тестировались.
Имеется довольно значительное число внешних и функциональных улучшений, такие как сортировка и фильтрация значений по колонкам, в том числе сортировка по нескольким колонкам, упрощение сортировки по определенным правилам, запоминание ширины и порядка колонок в реестре, программный доступ к ячейкам по именам полей, сопоставленных колонкам, редактирование ячеек, возможность сохранения содержимого в Excel или текстовой файл и многое другое.
TFastTreeView
Еще один наследник TListView.
Стандартный компонент TTreeView не годится
совершенно для работы с большими деревьями. Данная реализация дерева
оказалась полезной во многих случаях.
Данный компонент позволяет работать без проблем с большим числом узлов, имеет некоторые дополнительные улучшения.
Основная цель разработки компонента TFastTable - это компактное хранение огромного числа данных (миллионов и более ячеек). Экономия достигается за счет того, что тождественные строки сохраняются в единственном экземпляре. Второй целью была высокая скорость доступа к ячейкам TFastListView. Для быстрого поиска соответствия между именем колонки и ее индексом в списке колонок используются хэш-таблицы. А для тех случаев, когда и этой скорости оказывается недостаточно, есть набор свойств II, SS, FF, которые позволяют передать в списке параметров свою переменную типа TFastIndex, инициализированную значением null, в которой при первом обращении сохраняется сопоставленный индекс колонки, что еще больше ускоряет дальнейшее обращение к ячейкам. Правда, запись исходного кода в этом случае становится несколько более громоздкой, и приходится вручную контролировать соответствие имен переменных типа TFastIndex и наименований колонок.
Дополнительные возможности TFastTable - это хранение целочисленных и вещественных (Extended) значений, сопоставленных ячейкам. Это позволяет не тратить время на внутренние преобразования значений в строчное представление и наоборот, при работе с числовыми полями таблицы.
Использует вспомогательный компонент TFloatList, предназначенный для хранения списка вещественных чисел (типа Extended).
TUniEdit
Этот компонент инкапсулирует сразу несколько вариантов
редактируемого поля (TEdit, TCombobox, TDatePicker,
TCheckBox), позволяя размещать вместе с полем
сразу текстовую метку этого поля (свойство Title),
и контролировать параметры ввода значений
изменением всего пары свойств. Применение
TUniEdit позволяет упростить настройку формы,
выравнивание элементов (например, есть в наличии свойство
Align, которого почему-то нет в
стандартном TEdit).Дополнительное удобство - это возможность навешивания кнопки EllipsisButton с многоточием на нем, опять же изменением всего одного свойства и добавлением обработчика события OnEllipsis.
TNormalReportГлавное преимущество по сравнению со всеми своими аналогами - это полный контроль всего, что должно быть выведено на печать, обычными программными средствами. При использовании этого компонента вопросы с тем, "как выполнить" группировку линеек не могут возникать в принципе, так как весь процесс вывода на печать полностью контролируется программой пользователя. Процедура печати - это обычный пользовательский обработчик события OnPrint, в которой в нужном порядке размещаются нужные команды.
Входящие в набор
TNormalBand
и
TNormalLabel
могут использоваться для предварительного "рисования" (на любой,
обычно скрытой, форме) линеек и ячеек, которые при печати заполняются
нужными значениями и отправляются затем на печать методами
TNormalReport (например, AddBand, AddRight
и т.п.) Но использоваться могут, вообще говоря, любые визуальные
контролы. Просто TNormalBand и
TNormalLabel лучше приспособлены для
форматирования текста на бумаге. Например, они изначально имеют белый
фон, имеют дополнительные
свойства для управления рамками, а TNormalLabel -
и дополнительный широкий набор для обеспечения форматирования
текста (WrapWord, WrapLetters, WrapSyllabel, InScale,
InFontScale).
При аккуратном использовании, TNormalReport обеспечивает очень быструю подготовку даже очень большого числа страниц. Форма предварительного просмотра в компонент встроена изначально, имеется возможность из предварительного просмотра напечатать нужный лист или диапазон листов отчета.
TKnopka,
TPnKnopka,
TGrKnopka
Компонент "кнопка".
Помимо множества прочих достоинств, самое важное - на
время обработки события OnClick, кнопка
становится недоступной.
Это предотвращает автоматически многие проблемы в тех случаях,
когда до завершения обработки ни в коем случае нельзя пользователю
давать нажимать на кнопку повторно, в том числе в ситуациях, когда
пользователь на все кнопки нажимает двойным кликом мыши.Кроме того, поддерживаются:
- многострочный текст в заголовке кнопки, в с возможностью переноса по словам, по слогам или по буквам,
- картинка TPicture или из TImageList (есть возможность для состояния Enabled=FALSE использовать отдельный ImageList) или из списка стандартных пиктограмм (системные ресурсы, кроме нескольких дополнительных), может быть размещена слева, справа, сверху, снизу от текста или вместо текста,
- при этом кнопка полностью нормально выглядит с темами XP,
- поддерживается опциональная возможность множественного срабатывания одним длительным нажатием мышью или клавишей ENTER,
- двойной клик всегда приводит к двум вызовам события OnClick, в отличие от стандартной кнопки (если к этому моменту первый клик полностью обработан, и кнопка снова доступна, разумеется),
- опциональная рамка из точек вокруг текста,
- цветной текст на кнопке,
- выравнивание; для обеспечения расстояния между множеством таких выровненных кнопок на одном родителе, введен дополнительный компонент - TPnKnopka - кнопка на панели,
- имеется графический аналог TGrKnopka, не требующий выделения отдельного дескриптора окна для каждой кнопки,
- имеются средства для быстрой миграции проекта к использованию компонента TKnopka / TPnKnopka вместо TButton / TBitBtn / TSpeedButton.
Данный компонент используется в TFastListView для сохранения списка в книгу Excel в случае, когда переменная SaveToExcelViaClipboard установлена в значение FALSE.
Поддерживаются асинхронные запросы с возможностью их отмены (через API-функцию SQLCancel), поддерживаются множественные наборы результатов запросов (метод More используется для перехода к следующему результату). Поддержка двоичных полей (Binary) не реализована за ненадобностью. Отсутствует возможность использовать параметры - запрос должен формироваться как текст, все параметры должны быть переведены в текстовой формат. См. модуль UtilsUnit - он содержит большинство недостающих для этого методов, например, DateToSQL, DateTimeToSQL, StrToSQL и некоторые другие.
Помимо возможности быстрой адаптации кода к любой из трех версий компонентов для работы с данными, имеется ряд дополнительных возможностей. Самая ценная из них - это возможность автоматического протоколирования последних выполнявшихся запросов с целью их сохранения (например, в текстовой файл) в случае аварии (или программно). В случае, когда запрос оформляется без использования параметров, т.е. все параметры уже вставлены в текст запроса в строковом виде, такой запрос может быть загружен в соответствующий инструмент (например, Query Analyzer), и протестирован отдельно от программы.
Для упрощения работы с полями имеются свойства
IField, SField, DField, FField - для обращения к полям по имени,
и аналогичные им IFieldN, SFieldN, DFieldN, FFieldN -
для работы с полями по их индексам от 0 до
FieldCount-1.
Использование указанных свойств доступа к полям позволяет сократить записи вроде
Q.FieldByName('Продукт') as
Integer
Q.IField('Продукт')
Для проверки значения поля на NULL имеются методы-функции NullField и NullFieldN. Для формирования динамических запросов имеется рад дополнительных функций в отдельно реализованном модуле UtilsUnit. Например, функции SqlUpdIns, SqlUpd, SqlIns позволяют унифицированным образом оформить в программном коде читабельный текст запроса, сэкономив при этом усилия на проверку синтаксических ошибок в тексте SQL-запроса. Функции StrToSQL, DateToSQL и другие - формировать запросы без параметров, что облегчает их отладку методом прямой вставки текста запроса в средство отладки SQL-запросов (Query Analyzer, Database Desktop).
Для использования данного компонента достаточно включить его в список используемых модулей (главного модуля, например), и назначить в качестве обработчика Application.OnException обработчик из модуля utPhotoExc, следующим образом:
Application.OnException
:= Photographer.AppException;
Это не означает, однако, что необходимо вручную модифицировать все свои
функции таким образом, чтобы добавить обращение к этой функции в начале
каждой функции или процедуры. В теле модуля StackUnit
реализована функция
ModifySources_AddingEnterCall(directory:
String), которую достаточно вызвать один раз в
начале работы программы, чтобы в начале каждого запуска программы были
проверены все новые функции и добавлены для них вызовы процедуры
enter из этого же модуля.
Предусмотрена возможность предотвратить проверку на необходимость
вставки обращения к enter в тех случаях, когда
это необходимо. Имеется возможность удалить все обращения к функции
enter во всех модулях директории, простой
установкой символа условной компиляции
REMOVE_ENTRY_CALLS
и
перекомпиляцией исходного кода (build), после
чего достаточно запустить перекомпилированную программу однократно.
TScanner
