Перейти к основному содержанию

Не Data-Aware компоненты

TrSpeedButton = class(TRxSpeedButton)
Обычная кнопка TRxSpeedButton с некоторыми дополнительными свойствами.
Состояние: Готов.
Свойства
Align: TAlign Выравнивание. Поднято из TControl.
ControlFocused: TWinControl Кнопку можно поместить рядом с каким-либо элементом. Тогда, если ControlFocused имеет фокус и при этом нажать клавишу ControlShortCut, то сработает нажатие кнопки.
ControlShortCut: TShortCut
GlyphResKind: TBitmapResKind Тип картинки. Каждому типу соответствует определенный тип ресурса (например, rkBitmap - BITMAP, rkGIF - GIF).
GlyphResource: string Имя ресурса с картинкой. Допускаются и цифровые значения. Поиск ресурса осуществляется в глобальной переменной RHandles типа TList, содержащей дескрипторы (Handles) загруженных модулей (exe, dll, dpl, bpl).
MenuCallOption: TMenuItemClickOption Порядок вызова MenuItem.OnClick
MenuItem: TMenuItem Пункт меню, который выполняет то же действие. Синхронизируется свойство Enabled и событие OnClick.
MenuShortCut: TShortCut "Горячая" кнопка для подстановки в MenuItem и PopupMenuItem. Подставляется только в том случае, когда им не присвоены свои ShortCut.
PopupMenuItem: TMenuItem Пункт всплывающего меню, который выполняет то же действие. Синхронизируется свойство Enabled и событие OnClick.
TrSeparator = class(TBevel)
Разделитель.
Состояние: Готов.
Свойства
SeparatorStyle: TrSeparatorStyle Вид разделителя:
rspSeparator - просто пустое место;
rspDivider - вертикальная линия.
UseShape: Boolean Использовать ли отрисовку TBevel
TrLabel = class(TrCustomLabel);  TrCustomLabel = class(TGraphicControl)
Компонент типа TStaticText, но со значительно расширенными возможностями.
Состояние: Готов.
Свойства
BevelInner: TPanelBevel Тип внутренней рамки
BevelOuter: TPanelBevel Тип внешней рамки
BevelWidth: TBevelWidth Ширина рамок
Blink: Boolean Если True, разрешено мерцание.
BlinkColor: TColor Цвет текста для мерцания
BlinkBottomColor: TColor Цвет задней кромки текста при мерцании
BlinkSpeed: Word Частота мерцания в миллисекундах
BlinkTopColor: TColor Цвет передней кромки текста мерцании
BorderTransparent: Boolean Если True, то бордюр прозрачный (если Transparent=False).
BorderWidth: TBorderWidth Ширина бордюра
RaisedBottom: Boolean Если True, показывает заднюю кромку текста
RaisedBottomColor: TColor Цвет задней кромки текста
RaisedBottomDistance: TBorderWidth Отступ задней кромки текста
RaisedTop: Boolean Если True, показывает переднюю кромку текста
RaisedTopColor: TColor Цвет передней кромки текста
RaisedTopDistance: TBorderWidth Отступ передней кромки текста
Text3D: Boolean Если True, разрешается трехмерный текст (используются Raised... свойства)
TrBitBtn = class(TCustomRBitBtn);  TCustomRBitBtn = class(TBitBtn)
Обычная кнопка TBitBtn с некоторыми дополнительными свойствами.
Состояние: Готов.
Свойства
Align: TAlign Выравнивание. Поднято из TControl.
GlyphResKind: TBitmapResKind см. здесь
GlyphResource: string
TErrorHandler = class(TComponent)
Обработчик ошибок выполнения программы. Можно использовать как глобальный обработчик ошибок, так и для показа отдельного сообщения об ошибке. Обработчики исключительных ситуаций регистрируются в списке RErrors с помощью процедуры AddError как plugin'ы.
Состояние: Готов.
Свойства
Caption: TCaption Заголовок окна
Cancel: Boolean Аналогично свойствам TForm
Default: Boolean
Description: TStrings Текст, который будет выводиться по нажатию кнопки Подробнее и сохраняться в файле протокола.
ExtBtnCaption: TCaption Текст на дополнительной кнопке в окне показа сообщения
ExtBtnVisible: TrEHExtBtn Когда показывать дополнительную кнопку
IniFile: string Имя файла с описанием ошибок типа EDBEngineError. Пример - Errors.ini. Если путь не указан, то его местоположение определяется в зависимости от IniLocation. В этом файле можно переопределить выдаваемые BDE или SQL-сервером сообщения в удобоваримый вид. Имена секций должны соответствовать  началам сообщений, а в названиях параметров нужно указывать фрагменты сообщений для его идентификации (например, имена таблиц, триггеров и т.д.), разделенных символом ;. Фрагменты проверяются по условию ИЛИ.
IniLocation: TrFileLocation В какую папку сохранять IniFile, если не указан путь. Если flDefault, то %WINDIR%, если flProgram, то рабочая папка программы.
LogFile: string Имя файла протокола. Если путь не указан, то его местоположение определяется в зависимости от LogLocation.
LogLocation: TrFileLocation В какую папку сохранять IniFile, если не указан путь. Если flDefault, то текущий каталог, если flProgram, то рабочая папка программы.
Message: TCaption Собственно текст сообщения
Picture: TPicture Картинка, показываемая в форме сообщения, если Style = ehCustom.
ShowForm: Boolean Показывать ли форму с сообщением
Style: TrEHStyle Стиль иконки и звука (соответствует MessageBox и MessageBeep)
TitleMessage: TCaption Подзаголовок сообщения (например, Ошибка в программе)
События
OnExtButtonClick: TNotifyEvent Обработчик нажатия дополнительной кнопки. В качестве Sender передается TErrorHandler.
OnExtButtonSetVisible: TrOnExtButtonSetVisible;
TrOnExtButtonSetVisible = procedure (Sender: TObject; var SetVisible: Boolean) of object;		 Обработчик, вызываемый после определения свойства Visible в соответствии с ExtBtnVisible, но перед показом формы сообщения.
Методы
procedure AnalyzeException(E: Exception) Разборка исключительной ситуации и заполнение свойств Message, TitleMessage и Description.
procedure AppException(Sender: TObject;
E: Exception)		 Обработка ошибки. Применение:
Application.OnException := ErrorHandler1.AppException;
При этом можно присвоить значения только свойствам IniFile, LogFile и UserName. Остальные заполняются в этой процедуре.
procedure Execute Вызов экранной формы с сообщением
procedure SavingLog Запись ошибки в файл протокола. Если такого файла нет, то он создается. Указываются дата, время, пользователь, программа, активные экранная форма и визуальный компонент, а также содержание свойства Description.
procedure ShowMessage(aCaption, aTitleMes, aMes, aDesc: TCaption; Style: TrEHStyle) Заполнение свойств из параметров и вызов Execute
TLauncher = class(TComponent)
Интерфейс к API функциям CreateProcess и ShellExecuteEx.
Состояние: Готов.
Свойства
Active: Boolean [R/o] Происходит ли ожидание завершения процесса.
ProcessInfo: TProcessInformation Информация о процессе. Для ShellExecuteEx заполнено только hProcess (дескриптор процесса).
ConsoleCharsX: Cardinal*
ConsoleCharsY: Cardinal*		 Количество строк и колонок для консольного приложения
ConsoleFillAttributes: TrFillAttributes* Цвета текста и фона для консольного приложения
ConsoleTitle: string* Заголовок консольного приложения
CreationFlags: TrCreationFlags* Параметры создания процесса (dwCreationFlags).
Desktop: string* Только для Windows NT. Имя "рабочего стола" (STARTUPINFO.lpDesktop)
Environment: TStrings* Переменные окружения, создаваемые только для запускаемого приложения
LaunchMethod: TrLaunchMethod Метод запуска (CreateProcess или ShellExecuteEx).
Parameters: string Параметры запускаемого приложения
Priority: TrPriorityClass* Приоритет запускаемого приложения
ProgramName: string Имя запускаемого приложения или файла
ShellExecuteMask: TrShellExecuteMasks для TShellExecuteInfo.fMask
ShellOperation: string Выполняемая операция (например, open, print). По умолчанию - open. Только для ShellExecuteEx.
ShowMode: TShowMode Вид открытия окна
StartupFlags: TrStartupFlags* Флаги использования отдельных параметров (STARTUPINFO.dwFlags).
TimeoutWaitInit: Cardinal Время ожидания запуска приложения или начала выполнения файла, в мс. Если время истекло, срабатывает событие OnTimeoutElapsed.
TimeoutWaitTerminate: Cardinal Время ожидания окончания выполнения приложения или файла, в мс. Если время истекло, срабатывает событие OnTimeoutElapsed.
TimerInterval: Cardinal Интервал опроса состояния процесса для определения его завершения. Только если определено событие OnFinished или установлено TimeoutWaitTerminate.
WindowLeft: Integer*
WindowTop: Integer*
WindowWidth: Cardinal*
WindowHeight: Cardinal*		 Положение и размеры окна запускаемого приложения
WorkDir: string Рабочая папка запускаемого приложения
События
BeforeLaunch: TrBeforeLaunch
TrBeforeLaunch =
procedure(Sender: TObject;
var StartupInfo: TStartupInfo;
var ShellExecuteInfo: TShellExecuteInfo)		 Можно настроить параметры непосредственно перед запуском
OnFinished: TNotifyEvent Процесс завершился...
OnTimeoutElapsed: TrOnTimeoutElapsed
TrOnTimeoutElapsed = procedure(Sender: TObject; WaitInit: Boolean);		 Время ожидания истекло... WaitInit = True говорит о том, что ожидали запуска. Иначе ожидали завершения.
Методы
procedure Launch ЗАПУСК
* Только для CreateProcess.
TrPeriodComboEdit = class(TrCustomComboEdit);
TrCustomComboEdit = class(TCustomComboEdit)
Выбор диапазона дат (периода) в диалоге. В качестве Text высвечивается название периода.
Состояние: Готов.
Свойства
Date1: TDate
Date2: TDate		 Границы периода
Period: TrPeriod (R/O) Период, соответствующий Date1 и Date2.
Align: TAlign Выравнивание. Поднято из TControl.
GlyphResKind: TBitmapResKind см. здесь
GlyphResource: string
NeedPrefix: Boolean Нужен ли в названии периода префикс, например, для "2000 год" -> "за 2000 год".
События
OnCloseUp: TNotifyEvent; Происходит при закрытии диалога.
Методы
procedure AssignDate(dDate: TDateTime; dTypePeriod: TTypePeriod; Offset: Integer) Автоматическое формирование границ периода типа dTypePeriod, включающего дату dDate. Offset - смещение периода.
Пример: AssignDate(StrToDate('03.01.00'), bdMonth, -1) - сформирует Date1:='01.12.99', Date2:='31.12.99'.
procedure AssignNum(NumPeriod,Year: Integer; dTypePeriod: TTypePeriod) Автоматическое формирование границ периода типа dTypePeriod с номером NumPeriod в году Year.
Пример: AssignNum(12, 1999, bdMonth) - сформирует Date1:='01.12.99', Date2:='31.12.99'.
TrPageSetupDialog = class(TCommonDialog)
Интерфейс к стандартному диалогу настройки размеров, ориентации бумаги, отступов для печати.
Состояние: Готов.
Свойства
PaperSizeName: String (R/O) Название размера бумаги
PaperSizeType: TrPSPaperSize (R/O) Размер бумаги
Printer: TPrinter Принтер, для которого производятся настройки
Centered: Boolean Центрирование диалога. Если True, диалоговое окно центрируется.
Margins: TrPSRect Отступы в текущей единице измерения
Measurements: TrPSMeasurements Единица измерения
MinMargins: TrPSRect Минимальные отступы принтера в текущей единице измерения
Options: TrPageSetupOptions Опции диалога
Orientation: TPrinterOrientation Ориентация бумаги у текущего принтера (Printer)
PaperSize: TrPSPoint Размер бумаги в текущей единице измерения
Методы
function Execute: Boolean Показывает диалог настройки страницы. Если настройки приняты, то возвращает True, иначе False.
function FromMeasurementVal(Val: Integer): Double Преобразование из pixels в текущую единицу измерения
function ReadCurrentValues: Boolean Читает установленные значения у принтера Printer
function ToMeasurementVal(Val: Double): Integer Преобразование единицы измерения в pixels
TrMenuBar = class(TToolBar)
Клон компоненты TMenuBar от Borland (меню как в Delphi 4,5). Немного подправлена.
Состояние: Готов.
Свойства
Menu: TMainMenu Меню, которое нужно показать в ToolBar.
Методы
procedure RefreshButtons Обновление свойства Enabled кнопок.
TrBackground = class(TComponent)
Сохраняет размеры и координаты формы, сплиттеров и панелей инструментов, а также настраивает фон окна.
Состояние: Готов.
Свойства
AutoLoad: Boolean Автоматическое чтение сохраненных ранее настроек окна.
AutoSave: Boolean Если True, при закрытии формы автоматически сохраняются настройки окна. Иначе настройки окна сохраняются или после вызова диалога настройки или вызовом метода SaveBackground.
Color: TColor Цвет фона формы-владельца
FileName: TGraphicFileName Имя файла с обоями
PosSizeEnabled: TrPosSizeSet Множество определяет, какие свойства формы сохранять:
rpsPosEnabled-допускает сохранение позиции окна,
rpsSizeEnabled-допускает сохранение размеров окна.
RedrawBkg: Boolean Если True, разрешает компоненте рисовать фон формы.
RegKey: String Имя ключа в системном реестре
SaveSplitterPos: Boolean Если True, то сохраняются позиции всех компонент класса TSplitter на форме.
SaveToolBar: Boolean Если True, то сохраняются позиции всех компонент класса TToolBar на форме.
ValueName: TBkgValueNameType В название параметра реестра вставлять имя или класс формы.
ViewMode: TrViewMode Режим показа обоев:
rvmNone - обои не показываются,
rvmTile - заполняется поверхность обоями,
rvmCenter - картинка центрируется,
rvmStretch - картинка растягивается.
События
AfterLoadBackground: TNotifyEvent Вызывается сразу после успешной загрузки параметров.
BeforeSaveBackground: TNotifyEvent Вызывается непосредственно перед сохранением параметров.
Методы
function Execute: Boolean Выводит на экран диалог настройки фона и позиции окна. Результат True, если нажата кнопка ОК в противном случае.
procedure SaveBackground Сохраняет текущие настройки в системном реестре.
TrDLLloader = class(TComponent)
Предназначена для загрузки динамической библиотеки во время выполнения приложения.
Состояние: Готов.
Свойства
EntryPoint[const Name: String]: Pointer Указатель на экспортируемую функцию с именем Name
FileVersion: string Версия библиотеки в формате XX.XX.XX.XX
Active: Boolean Загрузка/Выгрузка библиотеки из памяти.
DefaultDir: String Каталог для поиска файла по-умолчанию.
LibraryName: TFileName Имя библиотеки
RequiredProcs: TStrings Список экспортируемых функций, наличие которых обязательно
RequiredVersion: String Минимальная поддерживаемая версия библиотеки (ProductVersion)
VersionInfo: TStrings (R/O) Информация о библиотеке
События
AfterLoadLibrary: TNotifyEvent Вызывается сразу после успешной загрузки библиотеки.
BeforeFreeLibrary: TNotifyEvent Вызывается непосредственно перед выгрузкой библиотеки из памяти.
Методы
procedure Close Выгрузка библиотеки из памяти (то же самое, что и Active := False).
procedure Open Загрузка библиотеки из памяти (то же самое, что и Active := True).
TrComboEdit = class(TrCustomComboEdit);
TrCustomComboEdit = class(TCustomComboEdit)
TСomboEdit с дополнительными свойствами.
Состояние: Готов.
Свойства
Align: TAlign Выравнивание. Поднято из TControl.
GlyphResKind: TBitmapResKind см. здесь
GlyphResource: string
TrImage = class(TImage)
TImage с возможностью просмотра TImageList или ресурса.
Состояние: Готов.
Свойства
Count: Integer Количество кадров
DefPicture: TPicture Изображение по умолчанию (Picture)
Images: TCustomImageList Источник кадров для показа
ImageIndex: Integer Индекс текущего кадра
Interval: Cardinal Интервал между кадрами
ResKind: TBitmapResKind Источник кадров для показа
см. здесь
Resource: string
SlideShow: Boolean Непрерывный циклический показ кадров
TrConnect = class(TrCustomConnect)
TrCustomConnect = class(TComponent)
Организует процедуру коннекта к какому-либо ресурсу, включая ввод имени ресурса, пользователя и пароля.
Состояние: Готов.
Свойства
Resources: TStringList Список ресурсов
Users: TStringList Список пользователей
AutoLogon: Boolean Подключение без диалога. Используются свойства Resource, User и Password.
Captions: TrConnectCaptions Надписи на форме ввода пароля
Help: TrConnectHelp Контексты страниц помощи для элементов формы ввода пароля
MaxAttempts: Integer Максимально возможное количество попыток подключения к базе данных.
Password: string Введенный пароль
RegKey: string Ключ системного реестра, куда записывается и откуда считывается информация о последнем успешном подключении (кроме пароля). Из этого ключа заполняются свойства Resource, Users, User.
Resource: string Выбранный ресурс
ResourceDirectInput: Boolean Разрешение пользователю вводить ресурс в форме диалога, а не только выбирать из списка.
ResourceEnabled: Boolean Разрешение пользователю выбирать ресурс в форме диалога.
ShowLastPassword: Boolean Показывать пароль из компонента в форме ввода.
User: string Имя пользователя
UserEnabled: Boolean Разрешение пользователю изменять имя пользователя в форме диалога.
UserRequired: Boolean Пароль обязателен или нет.
События
AfterConnect: TNotifyEvent Вызывается после подключением.
BeforeConnect: TNotifyEvent Вызывается перед подключения.
OnError: TrConnectErrorEvent;
TrConnectErrorEvent = procedure(Sender: TObject; E: Exception; var Action: TrConnectAction) of object		 Вызывается при ошибках подключения. Можно повторить подключение, проигнорировать ошибку.
Методы
function Connect: Boolean Подключение
procedure DoConnect Непосредственно подключение (для потомков)
TrPlugins = class(TComponent)

Помогает управлять плагинами, находящихся в определенной папке. Плагины разделяются по типам и должны иметь 2 обязательных процедуры - GetInfo, которая возвращает Название, Тип и Доп. данные (TInfoProc) и Execute для выполнения действия (TExecuteProc).
TInfoProc = procedure(var sFullName: pChar; var sPlugType: pChar; var sOptParams: pChar); stdcall;
TExecuteProc = function(const Params1, Params2, Params3: pChar): pChar; stdcall;

Состояние: Готов.
Свойства
Plugins[Index: Integer]: TrPlugin Плагин с индексом Index
PlugsPath: String Папка, где находятся плагины.
FileMask: String Маска имен файлов плагинов
RegKey: string Ключ системного реестра, куда записывается плагины по умолчанию для каждого их типа.
RequiredVersion: String Требуемая минимальная версия плагина в формате XX.XX.XX.XX
Методы
function ExecutePlugin(
const PlugName: String;
const PlugType: String;
const Param1, Param2, Param3: String): String		 Выполняет вызов Execute плагина
function GetDefaultPlug(const PlugType: String): String Плагин по умолчанию типа PlugType
function GetExistsPlug(
const PlugType, PlugName: String;
DefaultIfNotExists: Boolean = False): String		 Возвращает имя существующего плагина (если указано имя) или плагин по умолчанию (если указан тип).
function GetPluginByName(const PlugName: String): TrPlugin Поиск плагина по имени
function GetPlugByOptParams(PlugType, ParamName, ParamValue: String): String Поиск плагина типа PlugType по значению ParamValue параметра ParamName. Поиск производится по доп. данным, возвращенным вызовом GetInfo из плагина.
function GetPlugNames(const PlugType: String): String Список плагинов типа PlugType
function GetPlugTypes: String Непосредственно подключение (для потомков)
function PlugExists(const PlugType, PlugName: String): Boolean Есть ли такой плагин?
procedure SetDefaultPlug(const PlugType, PlugName: String) Сделать плагин PlugName типа PlugType плагином по умолчанию.