Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
laboratornye_raboty.docx
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
2.27 Mб
Скачать

Вопросы для контроля

  1. Для чего нужен компонент TDBNavigator

  2.     Как обозначается Указатель текущей записи перемещается к первой записи файла данных?

  3. Как обозначается Указатель текущей записи перемещается к предыдущей записи файла данных?

  4. Как обозначается Указатель текущей записи перемещается к следующей записи файла данных?

  5. Как обозначается Указатель текущей записи перемещается к последней записи файла данных?

  6. Что позволяет свойство VisibleButtons?

Литература

  1. Фаронов В.В. Программирование на языке высокого уровня: Учебник для вузов. -СПб.: Питер, 2003.

  2. Бобровский С.И. Delphi 7. Учебный курс. - СПб.: Питер, 2005.

  3. Кетков Ю.Л., Кетков А.Ю. Практика программирования: Visual Basic, C++ Builder, Delphi. - СПб.: БХВ - Петербург, 2005.

Лабораторная работа № 9

Тема: Создание формы прихода продуктов на склад. 

Цель: Научиться создавать формы и навигатор

Оборудование и/или программное обеспечение: ПК, Delphi

Теоретическая часть

Давайте уберем некоторые кнопки с нашего компонента TDBNavigator. Для этого щелкнем по раскрывающемуся свойству VisibleButtons. Появится список кнопок нашего "навигатора". Чтобы отключить определенную кнопку, надо присвоить ей значение False. Уберите кнопки nbRefresh, nbEdit и nbCancel.

    У TDBNavigator есть еще одно очень интересное свойство ShowHint, которое может принимать два значение True и False. Напомним, что это свойство отвечает за то, будут ли появляться всплывающие подсказки при наведение курсора на компонент. Давайте установим это значение в True и запустим нашу программу. Можно заметить, что при наведении курсора мыши на какую либо кнопку появляется подсказка.

    Напомним, что эти подсказки можно редактировать. Для этого у компонента TDBNavigator существует свойство Hints, являющееся аналогом свойства Hint, отвечающего за текст подсказки.

    Свойство Hints имеет тип TString, оно содержит 10 текстовых строк, определяющих текст подсказок (рисунок 1). Несмотря на то, что мы удалили некоторые кнопки из компонента TDBNavigator, подсказки для них остались, причем они расположены в определенной последовательности. Давайте заменим подсказки следующим образом:

First record -> Первая запись

Prior record -> Предыдущая запись

Next record -> Следующая запись

Last record -> Последняя запись

Insert record -> Добавить запись

Delete record -> Удалить запись

Edit record -> Редактировать запись

Post edit -> Сохранить изменения

Cancel edit -> Отменить изменения

Refresh data -> Обновить

Рис.1. Свойство Hints компонента TDBNavigator

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

Рис.2. Работающее приложение

    При выводе информации в режиме формы, в каждый момент времени пользователь может видеть только одну запись. Такой режим работы с базой данных не всегда удобен. Если необходимо видеть одновременно несколько записей базы данных, то нужно обеспечить просмотр данных в режиме таблицы.

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