- •Содержание
- •Введение
- •Лабораторная работа № 13 Создание простых форм. Программирование кнопок
- •Теоретические сведения Назначение и состав окон для визуальной разработки по в Delphi 7
- •Объект tForm(форма)
- •Объект tLabel (текстовое поле)
- •Объект tButton (кнопка)
- •Преобразование типов
- •Метод установления фокуса
- •Порядок выполнения работы
- •Варианты
- •Контрольные вопросы
- •Лабораторная работа № 14 Интерактивный ввод и вывод. Обработка исключительных ситуаций
- •Теоретические сведения Компонент tEdit (поле редактирования)
- •Компонент tRadioButton (переключатель)
- •Пример 14.1. При нажатии на кнопки «Ответ» в окне появляется строка, соответствующая выбранному переключателю (рис. 14.1)
- •Обработка события, вызванного нажатием на кнопку, имеет такой вид:
- •Процедуры и функции, реализующие диалоговые окна
- •Обработчики исключений
- •Пример 14.2. Вычислить значение функции . Экранная форма программы показана на рис. 14.5.
- •Порядок выполнения работы
- •Варианты
- •Контрольные вопросы
- •Лабораторная работа № 15 Программирование циклов. Компоненты: флажок, группа компонентов, главное меню, контекстное меню, список действий, область просмотра
- •Теоретические сведения Компонент tMemo (область просмотра)
- •Пример 15.1. В многострочный редактор при нажатии кнопки выводятся номера строк. Экранная форма программы показана на рис. 15.1.
- •Компонент tCheckBox (флажок)
- •Пример 15.2. Флажками отмечаются используемые кредитные карточки и по нажатию кнопки в многострочный редактор выводятся эти названия. Экранная форма программы показана на рис. 15.2.
- •Панель tGroupBox (группы компонентов)
- •Пример 15.3. С помощью флажков выбирают продукты из списка и по нажатию кнопки в многострочный редактор выводятся эти названия. Экранная форма программы показана на рис. 15.3.
- •Список действий (tActionList)
- •Главное меню (tMainMenu)
- •Пример 15.5. Создан простой редактор содержащий меню. Экранная форма программы показана на рис. 15.7.
- •Обработка событий выбора пунктов меню имеет вид
- •Всплывающее меню (tPopupMenu)
- •Обработка событий выбора пунктов меню аналогична примеру 15.5 и имеет вид
- •Варианты
- •Контрольные вопросы
- •Лабораторная работа № 16Обработка динамических массивов данных. КомпонентTStringGrid(Таблица строк)
- •Теоретические сведения Компонент tStringGrid (таблица строк)
- •Implementation
- •Порядок выполнения работы
- •Варианты
- •Контрольные вопросы
- •Лабораторная работа № 17Работа с объектами. Инкапсуляция. Наследование. Полиморфизм. Создание заставки
- •Теоретические сведения Понятие класса и объекта
- •Инкапсуляция и свойства объекта
- •Наследование
- •Полиморфизм и виртуальныеметоды
- •Директивы, используемые при объявлении класса
- •Порядок выполнения работы
- •Варианты
- •Контрольные вопросы
- •Лабораторная работа № 18Компоненты для работы с файлами и каталогами
- •Теоретические сведения Компоненты для работы с файлами и каталогами
- •Выбор дисковода
- •Просмотр и перемещение по дереву каталогов
- •Просмотр списка и выбор имени файла
- •Выбор маски для списка файлов
- •Порядок выполнения работы
- •Контрольные вопросы
- •Лабораторная работа № 19Создание многооконных приложений (mdi). Строка Состояний
- •Теоретические сведения Компонент tStatusBar(строка состояний)
- •Многооконные приложения
- •Порядок выполнения работы
- •Варианты
- •Контрольные вопросы
- •Лабораторная работа № 20КомпонентTChart для Построение диаграмм различных типов. Создание библиотек динамической компоновки (Dll). Статическое подключение Dll
- •Теоретические сведения Компонент tChart (диаграмма)
- •Пример 20. 1. Построить график функции с шагом 0.1 в интервале [-5;5]. Экранная форма программы показана на рис. 20.2. Приведем фрагмент кода программы с обработкой основных событий:
- •Implementation
- •Создание библиотеки динамической компоновки (dll)
- •Пример 20. 2. Создать библиотеку содержащую функции сложения целых и вещественных чисел, а также строк. Код библиотеки имеет вид
- •Статический вызов библиотеки
- •Пример 20.3. Используем статически функции, описанные в библиотеке (см. Пример 20.2). Экранная форма программы показана на рис. 20.5. Фрагмент кода с использованием функций из библиотеки:
- •Implementation
- •Порядок выполнения работы
- •Контрольные вопросы
- •Лабораторная работа № 21Использование форм в библиотеках динамической компоновки (Dll). Динамическое подключение Dll.
- •Теоретические сведения Динамический вызов библиотеки
- •Implementation
- •Использование форм в библиотеках
- •Порядок выполнения работы
- •Варианты
- •Контрольные вопросы
- •Домашнее задание № 6Компоненты: Поля редактирования, группа переключателей. Обработка событий клавиатуры
- •Теоретические сведения Компонент группа переключателей (tRadioGroup)
- •События клавиатуры
- •Порядок выполнения работы
- •Варианты:
- •Контрольные вопросы
- •Домашнее задание № 7Создание Справочного файла
- •Теоретические сведения Создание справочной системы
- •Порядок выполнения работы
- •Контрольные вопросы
- •Библиографический список
Объект tButton (кнопка)
Объект Button используют для создания кнопок на форме. Кнопка помещается на форму с помощью кнопки на стандартной панели инструментов. Кроме аналогичных приведенных ранее свойств Visible, With, Height, Font, Color, Name, Caption, Cursor, Enabled, Left, Top, кнопки имеют свойства указанные в табл. 13.3.
Таблица 13.3. Свойства объекта TButton
Свойство |
Описание свойства |
Примеры значений |
Cancel |
Установка в true определяет, что нажатие пользователем клавиши Esc эквивалентно нажатию кнопки Button. Имеет смысл задавать кнопкам Отменить в различных диалоговых окнах, чтобы можно было выйти из диалога, нажав эту кнопку или клавишу Esc |
True, false |
Default |
Установка в true определяет, что нажатие пользователем клавиши Enter эквивалентно нажатию кнопки Button даже если она в этот момент не находится в фокусе. Однако, если в момент нажатия Enter в фокусе находится другая кнопка, то сработает кнопка в фокусе |
True, false |
Для программирования кнопки Button1 необходимо дважды нажать на нее левой клавишей мыши. В результате активизируется окно текста программы с заготовкой процедуры Button1Click, которая будет обрабатывать событие нажатия на кнопке Button1:
procedure TForm1.Button1Click(Sender: TObject);
begin
end;
В заготовку необходимо вставить текст программы, содержащий реакцию на это событие. Если текст оставить без изменений, то при первой же компиляции происходит автоматическое удаление заготовки.
Преобразование типов
Так как многие стандартные визуальные компоненты (TLabel, TEdit и другие) вводят/выводят информацию только в виде текста, необходимо работать с функциями преобразования типов. Некоторые из них представлены в табл. 13.4.
Таблица 13.4. Подпрограммы преобразования типов
Процедура/функция |
Назначение |
IntToStr(Value: Integer): string; |
Преобразование целочисленных значений в строку |
CurrToStr(Value: Currency): string; |
Преобразование значения Currency в строку |
FloatToStr(Value: Extended): string; |
Преобразование значения с плавающей точкой в строку |
Str(X [: Width [: Decimals ]]; var S); |
Преобразование числового значения в строку |
StrToBool(const S: string): Boolean; |
Преобразование строки в булевое значение |
StrToCurr(const S: string): Currency; |
Преобразование строки в значение Currency |
StrToFloat(const S: string): Extended; |
Преобразование строки в значение с плавающей точкой |
StrToInt(const S: string): Integer; |
Преобразование строки в целое значение |
BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string; |
Преобразование булевого значения в строку. UseBoolStrs определяет содержимое строки-результата, если UseBoolStrs=true, то в строку помещается значение B в виде строки «true» или «false», в противном случае в строку выводится -1, если В = true и 0, если B = false |
Val(S; var V; var Code: Integer); |
Преобразование строки в числовое значение |