1. Окно инспектора объектов содержит две страницы: Properties и Events. Страница Properties служит для установки нужных свойств компонента, страница Events позволяет определить реакцию компонента на то или иное событие. В верхней части инспектора объектов располагается раскрывающийся список всех компонентов, помещенных на форму. Просмотрите свойства формы, представленные на странице Properties.
2. По умолчанию заголовок окна совпадает с заголовком формы: Form1.Измените свойство Caption c Form1на Лабораторная работа №1.Для этого щелкните мышью по строке Caption и в правой части измените текст заголовка.
3. Обратите внимание на свойство Name. Это свойство определяет имя компонента, под которым компонент будет известен программе. Первое время можно оставлять имя таким, какое задает Delphiпо умолчанию. Так Вы запомните названия компонентов. В дальнейшей работе рекомендуется задавать компонентам имена «со смыслом» вместо однотипных имен, которые «придумывает» Delphi.
4. Поместите на форму компонент Panel1.Осуществите прогон пустой программы. В рабочем приложении максимизируйте окно, а затем закройте его.
5. Задайте свойству Align компонента Panel1значение alBottom.Свойство Align указывает способ выравнивания размещаемого компонента относительно того контейнера, в котором он размещается. Осуществите прогон программы. В рабочем приложении максимизируйте окно, а затем закройте его. Размер панели при таком размещении изменяется пропорционально форме.
6. Очистите свойство Caption для компонента Panel1.
7. Отбуксируйте сторону компонента Panel1,ухватившись за верхний обрамляющий черный квадратик. Установите высоту панели приблизительно равную 175.Обратите внимание на то, что это значение установилось в свойстве Height инспектора объектов.
8. Поместите на форму компонент Panel2и расположите его на левой стороне (свойству Align задайте значение alLeft). Очистите свойство Caption. Ширину панели измените, установив значение 233в свойстве Width инспектора объектов.
9. Поместите на форму компонент Memo1(многострочный редактор) и задайте свойству Align значение alClient.Компонент займет всю оставшуюся часть формы.
10. Очистите свойство Lines многострочного редактора. Для этого щелкните по этому свойству в окне инспектора объектов и вызовите диалоговое окно изменения свойства. Удалите умалчиваемый текст Memo1 и закройте окно кнопкой .
11. Установите на панель Panel2метку Label1.Свойству WordWrap придайте значение True.Свойство WordWrap разрешает/отменяет разрыв строки на границе слова. Свойству Caption придайте значение «Введите значение веса в граммах».
12. Установите на панель Panel2 редактор Edit1.Очистите свойство Text.
13. Установите на панель кнопку Button1.Задайте свойству Caption значение «Ввод». Щелчком по правой части строки свойства Font раскройте диалоговое окно настройки шрифта и измените высоту шрифта.
14. Установите на панель кнопку BitBtn1,которая находится на панели Additional. Измените свойство Kind на bkClose.Для компонентов TBitBtnсвойство Kind (сорт) определяет типовые функции, которые реализует кнопка в диалоговых окнах. Значение bkClose определяет типовую функцию закрытия окна, которая будет связана с этой кнопкой. Увеличьте размеры кнопки.
15. Выделите кнопку Button1.В инспекторе объектов отразятся свойства кнопки Button1.Щелкните по закладке Events. На этой закладке перечислены события, на которые откликается кнопка. Дважды щелкните по правой части строки события OnClick. В ответ Delphiактивизирует окно программы. Событие OnClick возникает в работающей программе при щелчке по кнопке мышью.
Окно программы.
1. Окно программы предназначено для создания и редактирования текста программы. Этот текст составляется по специальным правилам и описывает алгоритм работы программы. Первоначально окно кода содержит минимальный исходный текст, обеспечивающий нормальное функционирование пустой формы в качестве полноценного Windows-окна. В ходе работы над проектом программист вносит необходимые дополнения, чтобы придать программе нужную функциональность. Используя линейки прокрутки, просмотрите содержимое окна программы.
2. Вместе с окном кода обычно активизируется также окно навигатора кода, облегчающее поиск нужных элементов в случае, когда в окне набрано много строк кода. При разработке несложных учебных программ можно закрыть это окно маленькой кнопкой с крестиком в его верхнем правом углу. Восстановить закрытое окно броузера можно после щелчка правой кнопкой мыши по окну программы и выбора опции View/Code Explorer. Закройте, откройте и вновь закройте окно броузера.
3. Дважды щелкнув по правой части строки события OnClick, вы заставили Delphiсамостоятельно сделать заготовку для процедуры обработчика события OnClick.
procedure TForm1.Button1Click(Sender: TObject);
begin
. . .
end;
Между операторными скобками Begin и End введите следующие операторы языка Object Pascal:
x:= StrToFloat(Edit1.Text);
y:= x/400;
Memo1.Lines.Add(FormatFloat(‘####.## Граммов =’, x) +
FormatFloat(‘####.## Фунтов’, y));
Дополните описание переменных модуля. После var Form1: TForm1; добавьте x,y: real;
В первом операторе присваивания содержимое окна редактора преобразуется в вещественное число. Второй оператор присваивания – формула пересчета. Для отражения результата расчета в окне TMemoиспользуется метод Add этого компонента. Метод Add класса TStringListдобавляет новую строку к имеющемуся в Lines набору строк. Добавленная строка отображается на экране. Параметром метода является строковая переменная. Строковая переменная складывается из строкового представления вещественных переменных x и y. Функция FormatFloat форматирует значение с помощью описанного формата.
4. Осуществите прогон программы, нажав клавишу . Введите в окно редактора любое число, нажмите на кнопку и Вы получите результат в окне многострочного редактора.
5. Минимизируйте окно Delphi и удалите все файлы в каталоге Lab1.
Caldera Forms — формы, в которых есть все
