Тема 6. Ввод и отображение чисел, дат и времени

1. Компоненты ввода и отображения целых чисел - Up Down и CSpinEdit

2. Компоненты ввода и отображения дат и времени - DateTimePicker, MonthCalendar, CCalendar

3. Компонент генерации страницы Excel - FIBook

4. Компонент отображения иерархических данных - ListView

В VCL C++Builder существует ряд компонентов, позволяющих вводить, отображать и редактировать числа, даты и время. В табл. 4 приведен перечень специализированных компонентов ввода и отображения чисел, дат и времени с краткими характеристиками и указанием основных параметров, содержащих отображаемый или вводимый текст.

Таблица 1. Компоненты ввода и отображения чисел, дат и времени

Компонент	Страница	Описание
UpDown (кнопка-счетчик)	Win32	Кнопка-счетчик, в сочетании с компонентами Edit и другими позволяющая вводить цифровую информацию. Основное свойство - Position.
CSpinEdit (кнопка-счетчик с окном редактирования)	Samples	Окно редактирования в комбинации с кнопкой-счетчиком. Почти то же, что комбинация Edit и UpDown. Основное свойство - Value
DateTimePicker(окно ввода дат и времени)	Win32	Ввод даты (с выпадающим календарем).и времени Основные свойства - Date и Time.
MonthCalendar (окно ввода дат)	Win32	Ввод дат с выбором из календаря.
Calendar (календарь на указанный месяц	Samples	Отображение календаря на указанный месяц. Основные свойства - Month и Day.
FIBook (страницы Excel)	ActiveX	Компонент ввода и обработки числовой информации, аналогичный страницам Excel.

1. Ввод и отображение целых чисел - компоненты Up Down и CSpinEdit

В C++Builder имеются специализированное компоненты, обеспечивающие ввод целых чисел - UpDown и CSpinEdit

Компонент UpDown превращает окно редактирования Edit в компонент, в котором пользователь может выбирать целое число, изменяя его кнопками со стрелками. Если к тому же установить в true свойство окна ReadOnly, то пользователь просто не сможет ввести в окно какой-либо свой текст и вынужден будет ограничиться выбором числа. Компонент CSpinEdit представляет собой сочетание Edit и UpDown, оформленное как отдельный тип компонента.

Основное свойство компонента UpDown - Associate, связывающее кнопки со стрелками с одним из оконных компонентов, обычно с Edit. Чтобы опробовать компонент UpDown, перенесите на форму его и окно редактирования Edit, расположив Edit там, где это требуется, a UpDown - в любом месте формы. Далее в выпадающем списке свойства Associate компонента UpDown выберите Editl. Компонент UpDown немедленно переместится к Edit и как бы сольется с ним.

Свойство AlignButton определяет размещение кнопки компонента UpDown, (слева или справа от окна), может принимать значения udLeft или udRight.

Свойство Orientation определяет, расположение кнопки (по вертикали или по горизонтали), может принимать значения udHorizontal или udVertical,.

Свойство ArrowKeys определяет, будут ли управлять компонентом клавиши клавиатуры со стрелками.

Свойство Thousands определяет наличие или отсутствие разделительного пробела между каждыми тремя цифрами разрядов вводимого число.

Свойства Min и Мах компонента UpDown задают соответственно минимальное и максимальное значения чисел, свойство Increment задает приращение числа при каждом нажатии на кнопку.

Свойство Position определяет текущее значение числа. Это свойство можно читать, чтобы узнать, какое число задал пользователь. Его можно задать во время проектирования в диапазоне Min-Max, Тогда это будет значение числа по умолчанию, отображаемое в окне в начале выполнения приложения.

Свойство Wrap определяет, как ведет себя компонент при достижении максимального или минимального значений. Если Wrap - false, то при увеличении или уменьшении числа до максимального или минимального значения это число фиксируется на предельном значении и нажатие кнопки, пытающейся увеличить максимальное число или уменьшить минимальное, ни к чему не приводит. Если же Wrap = true, то попытка превысить максимальное число приводит к его сбросу на минимальное значение. Аналогично, попытка уменьшить минимальное число приводит к его сбросу на максимальное значение. Т.е. изменение чисел «закольцовывается».

Если в компоненте Edit, связанном с UpDown, не задать ReadOnly равным true, то пользователь сможет редактировать число, не пользуясь кнопками со стрелками. Это удобно, если требуемое число далеко от указанного по умолчанию, а шаг приращения Increment в UpDown мал. Но тут проявляется серьезный недостаток компонента UpDown: ничто не мешает пользователю ввести по ошибке не цифры, а какие-то другие символы.

Свойства компонента CSpinEdit похожи на рассмотренные, только имеют другие имена: свойства Min, Max, Position называются соответственно MinValue, MaxValue, Value. В целом компонент CSpinEdit во многих отношениях удобнее простого сочетания UpDown и Edit.

2. Ввод и отображение дат и времени - компоненты DateTimePicker, MonthCalendar, CCalendar

Наиболее удобным является DateTimePicker, очень эффектен за счет появления выпадающего календаря и обеспечивает безошибочный ввод дат и времени.

Сойство Kind определяет режим работы компонента: dtkDate - ввод даты, dtkTime - ввод времени.

Свойство DateMode при вводе дат, при значении dmComboBox - задает выпадающий календарь, а при dmUpDown - наличие кнопок увеличения и уменьшения, напоминающих те, которые используются в компонентах UpDown и CSpinEdit. Но в данном случае с помощью кнопок пользователь может независимо устанавливать число, месяц и год.

Формат представления дат определяется свойством DateFormat, которое может принимать значения dfShort - краткий формат (например, «08.03.02»), или dfLong - полный формат (например, «8 Март 2002г.»).

Значение даты по умолчанию можно задать в Инспекторе Объектов через свойство Date. Это же свойство читается для определения заданной пользователем даты. При чтении Date надо учитывать тип этого свойства - TDateTime, представляющий собой число с плавающей запятой, целая часть которого содержит число дней, отсчитанное от некоторого начала календаря, а дробная часть равна части 24-часового дня, За начало календаря принята дата 30/12/1899 00 часов.

Для преобразования значения свойства Date в строку можно воспользоваться функцией DateToStr. Например, оператор

Memo1->Lines->Add("Дата: " + DateToStr(DateTimePickerl->Date));

добавит в окно Memo1 строку вида "Дата: 24.10.07".

При вводе дат можно задать значения свойств MaxDate и MinDate, определяющих соответственно максимальную и минимальную дату, которую может задать пользователь.

В режиме ввода времени dtkTime введенное пользователем значение можно найти в свойстве Time. Преобразовать время в строку можно функцией TimeToStr.

Компонент MonthCalendar похож на компонент DateTimePicker, работающий в режиме ввода дат. Правда, в компоненте MonthCalendar предусмотрены некоторые дополнительные возможности: допускается множественный выбор дат в некотором диапазоне (свойство MultiSelect), можно указывать в календаре номера недель с начала года (свойство WeekNumbers), перестраивать календарь, задавая первый день каждой недели (свойство FirstDayOfWeek) и т.п.

Компонент CCalendar представляет собой календарь на один год. Свойства Year - год, Month - месяц, Day – день - целые числа, с которыми иногда удобнее иметь дело, чем с типом TDateTime. Перед отображением на экране или в процессе проектирования надо задать значения Month и Year, чтобы компонент отобразил календарь на указанный месяц указанного года. Если надо иметь календарь на текущий месяц, надо установить в true значение свойства UseCurrentDate (установлено по умолчанию). В этом случае по умолчанию будет показан календарь на текущий месяц с выделенным в нем текущим днем.

Свойство StartOfWeek задает день, с которого начинается неделя. По умолчанию задано 0 - воскресенье, как это принято в западных календарях. Но для нас все-таки как-то привычнее начинать неделю с рабочего дня - понедельника. Так что желательно задать StartOfWeek = 1.

3. Страницы Excel - компонент FIBook

Компонент FIBook (страница ActiveX) позволяет встроить в приложение таблицы Excel, которые пользователь может заполнять соответствующими числами, а компонент будет производить по заданным формулам вычисления и тут же отображать их результаты в указанных ячейках. В таблицу можно встроить диаграммы и графики различных типов. И все изменения, вносимые пользователем в данные таблицы, немедленно будут отображаться в диаграммах.

Перенесите на форму компонент FIBook и щелкните на нем правой кнопкой мыши. Выберите из всплывшего меню команду Workbook Designer. Появится диалоговое окно проектирования - является упрощенным вариантом Excel. Можете писать в ячейках необходимые надписи, задавая шрифт, его стиль, обрамление, записывать формулы.

Кнопка Chart позволяет ввести на страницу диаграммы и графики. Чтобы задать диаграмму, надо сначала выделить курсором в таблице данные, которые должны отображаться в диаграмме, затем нажать кнопку ввода диаграммы, после этого указать курсором рамку, в которой должна отображаться диаграмма. В результате попадете в диалоговое окно, в котором сможете выбрать тип диаграммы и необходимые ее атрибуты.

Щелкнув правой кнопкой мыши на компоненте FIBook, можете выбрать еще одну команду - Properties. В появившемся диалоговом окне можно задать опции, определяющие, что будет отображено в таблице при работе приложения: заголовки строк и столбцов (Row Heading и Column Heading), сетка (Gridlines), формулы вычислений (Formulas) и т.п.

Компонент FIBook очень удобен, если надо предоставить пользователю возможность работать с таблицами Excel. Однако для решения подобных задач имеется и другой путь - использование серверов СОМ и OLE.

4. Компоненты отображения иерархических данных ListView

Компонент ListView (Win32)- позволяет отображать в стиле Windows данные в виде списков, таблиц, крупных и мелких пиктограмм. С подобным отображением все вы сталкиваетесь, раскрывая папки Windows.

Стиль отображения информации определяется свойством ViewStyle, которое может устанавливаться в процессе проектирования или программно во время выполнения. Свойство может принимать значения: vslcon - крупные значки, vsSmalllcon - мелкие значки, vslist - список, vsReport - таблица.

Рассмотрим основные свойства и методы компонента ListView. Начните новое приложение и перенесите на него ListView. Основное свойство компонента ListView, описывающее состав отображаемой информации - Items. Во время проектирования оно может быть установлено специальным редактором, вызываемым щелчком на кнопке с многоточием рядом с этим свойством в окне Инспектора Объектов. В нем задаются новые узлы кнопкой New Item и дочерние узлы - кнопкой New Subltem. Только смысл дочерних узлов другой: это информация, которая появляется только в режиме vsReport - в виде таблицы.

Задайте в редакторе некоторое множество элементов и дочерних узлов. Смысл их зависит от конкретной задачи.

Для каждого узла задается свойство Caption - надпись, появляющаяся около пиктограммы. Для дочерних узлов это свойство соответствует надписи, появляющейся в ячейках таблицы в режиме vsReport.

Свойство Image Index определяет индекс пиктограммы. Индекс соответствует спискам изображений, хранящимся в отдельных компонентах ImageList. Указания на эти компоненты можно задать в свойствах LargeImages для режима vslcon и SmallImages для режимов vsSmallIcon, vsList и vsReport. Индексы начинаются с 0.

Свойство State Index в панели Item Properties позволяет добавить вторую пиктограмму в данный объект. Подобная пиктограмма может просто служить дополнительной характеристикой объекта. Индекс, указываемый как State Index, соответствует списку изображений, хранящихся в отдельном компоненте ImageList, указанном в свойстве Statelmages компонента ListView.

Остановимся пока на этих свойствах и построим приложение, предоставляющее пользователю возможность изменять вид списка в окне ListView и, кроме того, позволяющее при стилях vslcon и vsSmalllcon перетаскивать пиктограммы мышью в любое место окна. Для реализации такого приложения нам потребуется компонент меню MainMenu. Кроме того, для понимания некоторых приведенных ниже операторов надо представлять себе технологию перетаскивания Drag&Drop.

Для реализации примера надо сделать следующее:

■ введите в приложение разделы меню Крупные значки (пусть его имя будет MIсоn), Мелкие значки (имя MSmallIcon), Список (имя Mlist) и Таблица (имя MReport)

■ установите во всех этих разделах одинаковый отличный от нуля индекс GroupIndex и свойства Radioltem в true

■ один из разделов пометьте как Checked и в свойстве списка ViewStyle установите значение, соответствующее этому разделу

■ напишите следующие обработчики щелчков для этих разделов:

void fastcall TForm1::MIconClick(TObject *Sender)

{

ListView1->ViewStyle = vslcon;

MIcon->Checked = true;

ListView1->DragMode = dmAutomatic;

}

void _fastcall TForm1::MSmallIconClick(TObject *Sender)

{

ListView1->ViewStyle = vsSmalllcon;

MSmallIcon->Checked = true;

ListView1->DragMode = dmAutomatic;

}

void _fastcall TForm1::MListClick(TObject *Sender)

{

ListView1->ViewStyle = vsList;

MList->Checked = true;

ListView1->DragMode = dmManual;

}

void _fastcall TForm1::MReportClick(TObject *Sender)

{

ListView1->ViewStyle = vsReport;

MReport->Checked = true;

ListView1->DragMode = dmManual;

}

Кроме того, надо написать следующие обработчики событий OnDragOver и OnDragDrop компонента ListView:

void _fastcall TForm1::ListView1DragOver(TObject *Sender, TObject *Source, int X, int Y, TDragState State, bool SAccept)

{

Accept = (Source = ListView1);

}

void_ _fastcall TForm1::ListView1DragDrop(TObject *Sender,TObject *Source, int X, int Y)

{

((TListView*)Sender)->Selected->Position = Point(X,Y);

}

Реализуйте этот пример. Вы увидите, что создали окно, имеющее много общего с обычными папками Windows.

Метод Arrange:

void _fastcall Arrange(TListArrangement Code);

позволяет упорядочить пиктограммы в режимах vslcon и vsSmalllcon. Параметр Code определяет способ упорядочивания:

arAlignBottom	выравнивание вдоль нижнего края области
arAlignLeft	выравнивание вдоль левого края области
arAlignRight	выравнивание вдоль правого края области
arAlignTop	выравнивание вдоль верхнего края области
arDefault	выравнивание по умолчанию (вдоль верхнего края области)
arSnapToGrid	размещение каждой пиктограммы в ближайшем узле сетки

Вы можете ввести в свое тестовое приложение раздел Выравнивание и в обработчик щелчка на нем записать оператор

ListView1->Arrange(arAlignTop);

Тогда после перетаскивания элементов вы всегда сможете опять упорядочить их расположение, выбрав этот раздел меню.

Способ упорядочивания определяется соответствующим заданием свойства SortType.

Свойство Checkboxes, установленное в true, определяет отображение индикатора с флажком около каждого элемента списка. Только учтите, что свойство срабатывает только в случае, если вы не установили описанное ранее свойство Statelmages. Иначе говоря, около пиктограммы может появляться или индикатор, или дополнительная пиктограмма.

Индикаторы элементов можно устанавливать программно или их может изменять пользователь во время выполнения. Тогда узнать программно, установлен ли индикатор в некотором элементе Items[i], можно проверкой его свойства Checked. Например:

for (int i=0; i < ListView1->Items->Count; i++)

if (ListView1->Items->Item[i]->Checked)

ShowMessage("Выбран элемент " + ListView1->Items->Item[i]->Caption);

Приведенный оператор проверяет все элементы и отображает сообщения о тех, в которых установлен индикатор. В реальном приложении, конечно, вместо такого сообщения должны предприниматься какие-то действия.

Свойства HotTrack и HotTrackStyles определяют появление выделения при перемещении курсора над элементом списка и стиль этого выделения. Свойство HoverTime задает в миллисекундах задержку появления такого выделения.

Свойство списка Selected определяет выделенный пользователем элемент списка. Этим можно воспользоваться для выполнения каких-то действий. Например, если требуются некие действия при двойном щелчке на каком-то элементе, то в обработчике события OnDblClick компонента ListView можно написать оператор:

if (ListView1->Selected != NULL)

ShowMessage(ListView1->Selected->Caption);

Оператор if проверяет, выделен ли какой-то элемент, т.е. произведен ли двойной щелчок на элементе, а не просто на пустом поле списка. Если щелчок на элементе, то с ним можно провести какие-то действия (в данном примере вместо этого просто отображается сообщение).

Свойство Columns определяет список заголовков таблицы в режиме vsReport при свойстве ShowColumnHeaders (показать заголовки), установленном в true. Свойство Columns можно задать в процессе проектирования специальным редактором заголовков, вызываемом двойным щелчком на компоненте ListView или щелчком на кнопке с многоточием рядом со свойством Columns в окне Инспектора Объектов. Кнопка Add New (крайняя левая) позволяет добавить новую секцию в заголовок, кнопка Delete Selected (вторая слева) - удалить секцию, кнопки Move Selected Up и Move Selected Down (кнопки со стрелками) позволяют изменять последовательность секций.

После того, как добавили секцию и установили на ней курсор, в окне Инспектора Объектов появится множество свойств этого объекта. В свойстве Caption можете задать текст заголовка. В свойстве Imagelndex можете указать индекс пиктограммы, которая появится перед заголовком. Свойства MinWidth и MaxWidth определяют соответственно минимальную и максимальную ширину заголовка в пикселах. Только в этих пределах пользователь может изменять ширину заголовка курсором мыши. Значение ширины по умолчанию задается значением свойства Width. При изменении ширины секции во время выполнения генерируется событие OnSectionResize.