KRField.pas

 

Типы данных

• TKRFieldDateTime – список возможных вариантов отображения текущего значения как даты
  • fdtNone – текущее значение не является датой
  • fdtTime – отображать текущее значение как время
  • fdtDate – отображать текущее значение как дату
  • fdtDateTime – отображать текущее значение как дату и время

TKRFieldValueEvent = procedure (Sender: TObject; var AValue: Variant) of object;

• TKRFieldValueEvent – событие передающее текущее значение до его отображения, для возможности корректировки
  • Sender – указатель на текущий объект класса TKRField
  • AValue – текущее значение

Переменные

• KRFldMsgMaximumLimit – сообщение о превышении максимального предела. Маска максимального предела [#Value]
• KRFldMsgMinimumLimit – сообщение о преодолении минимального предела. Маска минимального предела [#Value]
• KRFldMsgAskBeforeInput – вопрос подтверждения ввода значения. Маска текущего значения [#Value]
• KRFldMsgIncorrectValue – сообщение о некорректном вводе значения

Классы

Класс TKRField

Родительский класс TCustomEdit

Интерфейсы: IKRTimer

TKRField – компонент удаленного управления и мониторинга для ввода/вывода значения переменной класса TKRVariable

Свойства класса TKRField

property Variable: TKRVariable;

• Variable – переменная, значение которой будет отображаться. Если свойство VarSet пусто, то данная переменная будет использоваться и для ввода значения

property VarSet: TKRVariable;

• VarSet – переменная для ввода значения

property ValType: TVarType;

• ValType – тип переменной. Устанавливается автоматически при добавлении переменной в поле Variable, но может быть изменено. Изменять данное значение есть смысл в том случае если предполагается корректировка значения до его вывода/ввода с помощью событий OnShowValue и OnSetValue

property Format: String;

• Format – формат вывода значения. В зависимости от типа значения переменной используются разные функции форматирования. Для целочисленного значения Format, для значения с плавающей точкой FormatFloat. Если свойство DateTime не равно fdtNone, то для форматирования используется функция FormatDateTime

property Timer: TKRTimer;

• Timer – таймер класса TKRTimer для обновления значения в поле

property EnterAftExit: boolean;

• EnterAftExit – если значение равно False, то для ввода значения нужно нажать клавишу Enter. Если значение равно True, то ввод происходит при потере фокуса

property ErrorColor: TColor;

• ErrorColor – цвет фона при ошибке в переменной Variable

property ErrorFontColor: TColor;

• ErrorFontColor – цвет шрифта при ошибке в переменной Variable

property ChangeFontColor: TColor;

• ChangeFontColor – цвет шрифта при редактировании

property InputMax: Variant;

• InputMax – максимальный предел для ввода значения. Если введенное пользователем значение превыситзаданный предел, то отобразится диалоговое окно с сообщением из переменной KRFldMsgMaximumLimit

property InputMin: Variant;

• InputMin – минимальный предел для ввода значения. Если введенное пользователем значение будет меньше заданного предела, то отобразится диалоговое окно с сообщением из переменной KRFldMsgMinimumLimit

property AskBeforeInput: boolean;

• AskBeforeInput – если включить данное свойство, то перед вводом значения отобразится диалоговое окно с подтверждающим вопросом из переменной KRFldMsgAskBeforeInput

property ErrorToHint: boolean;

• ErrorToHint – если включить данное свойство, то в всплывающей подсказке будет выводится текущая ошибка переменной Variable

property DateTime: TKRFieldDateTime;

• DateTime – свойство типа TKRFieldDateTime, которое говорит о том, что значение нужно рассматривать как дату

События класса TKRField

property OnSetValue: TKRFieldValueEvent;

• OnSetValue – событие вызывается при вводе значения до его отправки в переменную для возможной корректировки

property OnShowValue: TKRFieldValueEvent;

• OnShowValue – событие вызывается при обновлении значения до его вывода для возможной корректировки

Скачать:

Пример работы с полями ввода/вывода KRField в Delphi

Примеры использования:

• Мини SCADA система на Delphi
• Пример передачи данных по протоколу Modbus

Поделиться: