В Главе 8 Джефф использовал оболочку приложения калькулятора закладных, чтобы проверить свой механизм обработки вычисления закладных. В этой главе мы создадим полезный работающий калькулятор закладных (основывающийся на этом же механизме), который позволит вам изменять параметры закладной. В процессе этого мы исследуем еще несколько стандартных компонентов Delphi и посмотрим, как создавать и использовать окна диалога. Законченное приложение калькулятора за кладных показано на Рисунке 9.1.

Главная форма

Мы собираемся полностью переделать главную форму, показанную в Главе 8, хотя мы и сохраним компонент StringGrid, который фактически отображает вычисленную амортизационную таблицу. StringGrid является почти совершенным средством для отображения этого типа табличных данных.

Приступим к новой форме и изменим свойства Object Inspector, как показано в Таблице 9.1.

Таблица 9.1

Изменения свойств для главной формы калькулятора закладных

Поле Значение

Borderlcons.biMaximize False

Caption "Калькулятор закладных"

Height 390

Name "MortgageForm"

Width 677

Если желаете, можете изменить свойства Height и Width. Я выбрал эти числа после некоторого экспериментирования: Width (Ширина), равная 677, просто достаточна велика, чтобы приспособить компонент StringGrid, a Height (Высота), равная 390, позволяет отображать 5 платежей без необходимости выполнять прокрутку.

Как только вы установите все эти свойства, сохраните свою работу, назвав модуль MORTFORM.PAS, а проект - MORTCALC.DPR.

Компонент Panel

Если вы присмотритесь по-внимательнее к Рисунку 9.1, вы заметите, что на пульте инструментальных средств в верхней части формы имеются четыре быстрые кнопки. Эти кнопки постоянно располагаются в компененте Panel (Пульт), который выравнен по верхнему краю окна.

Программирование в среде Delphi
Рис. 9.1 Приложение калькулятора закладных

Пульты являются очень полезными объектами, так как они могут быть использованы для группирования других компонентов вашей ф. >рмы Компоненты, помещаемые на пульт, размещаются относительно пульта, что означает, что если пульт перемещается, то это же делают и компоненты на нем. Это значительно ускоряет расстановку групп элементов управления, оставляя их выравненными друг относительно друга.

Пульты могут быть также выравнены по верхнему, левому, правому или нижнему краю рамки окна таким образом, чтобы при изменениях размеров окна пульт оставался в том же положении относительно рамки. И, поскольку компоненты пульта размещаются относительно самого пульта, они движутся вместе с ней Пульт также имеет встроенные сквозные пояснения для птичек (fly-by hints) и свойство Caption, дающее возможность отображать текст на пульте. Одним словом, компонент Panel является великолепным выбором в качестве основы для панели инструментальных средств, палитры инструментальных средств или панели статуса.

Выберите компонент Panel из палитры компонентов (он находится несколько в стороне - с правой стороны стандартной страницы (Standart page)), и опустите его на вашу форму. Замените его свойство Aliggn на alTop и установите ShowHint в True. ShowHint является "крючком", дающим нам возможность добавлять сквозные пояснения к компонентам пульта. Очистите свойство Caption, так как пульт не должен отображать никакого текста. Когда вы закончите, компонент Panel должен размещаться в верхней части формы и быть растянут на всю ее ширину.


⇐ Предыдущая страница| |Следующая страница ⇒

Программирование в среде Delphi



Новости за месяц

  • Декабрь
    2021
  • Пн
  • Вт
  • Ср
  • Чт
  • Пт
  • Сб
  • Вс
  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31