Ввод и вывод данных. Контейнер.                                         3

Информацию можно вывести непосредственно на форму, в компонент Label, диалоговые окна других компонентов. Для вывода информации используются соответствующие свойства компонентов. Для вывода информации с помощью метки используется свойство Caption. В компоненте Edit для вывода информации используется свойство Text, в компоненте Memo - свойства Text и Lines.

 

Создадим приложение для перевода значений температуры из градусов Цельсия в градусы Фаренгейта.

Построение интерфейсной части начнем с изменения свойства Caption новой формы. Затем поместим компонент TPanel на форму. Компонент TPanel представляет собой контейнер общего назначения. Контейнером называется компонент, предназначенный для размещения на нем других компонентов. Контейнеры предназначены для равномерного размещения компонентов в окне при изменении размеров окна. В инспекторе объектов на странице Properties свойству Align (выравнивание) зададим значение а1Bottom, а строку свойства Caption очистим. Свойство Align указывает способ выравнивания размещаемого компонента относительно того контейнера, в котором он размещается. Пустая форма представляет собой контейнер. Значение свойства а1Bottom означает, что панель прижимается к нижней границе формы и растягивается по всей ее длине. Высоту панели изменим таким образом, чтобы на ней поместились три компонента: метка ТLabel, однострочный редактор ТEdit, кнопка ТButton.

Компонент ТLabel предназначен для вывода всевозможных сообщений.Свойству Caption придадим значение, комментирующее действия пользователя. Для компонента ТButton этому свойству зададим значение "ОК". В редакторе ТEdit очистим свойство Техt и изменим ширину этого компонента по своему усмотрению.

На форму поместим многострочный редактор - компонент TMemo. Его свойству Align зададим значение -alClient. которое означает, что компонент заполняет всю свободную область контейнера (в данном случае всю свободную область формы). В многострочном редакторе TMemo имеется информация, состоящая из одного слова Memo. Можно очистить окно редактора, если вызвать диалоговое окно изменения свойства, дважды щелкнув мышью в строке Lines инспектора объектов. Обратившись к свойству Font этого компонента, изменим размер и цвет шрифта текста.

   На этом этап конструирования формы заканчивается. Для того чтобы форме функциональность, необходимо написать обработчик события. При нажатии на клавишу "Ок", число из окна однострочного редактора TEdit  должно быть пересчитано по формуле

F = 1.8*С'+ 32,

а результат пересчета отражен в TMemo. Обработчик события OnClick (нажатие левой клавиши мыши) может иметь следующий вид:

procedure TForm1.Button1Click(Sender: TObject);

var x,y: real;

   begin

       x:=StrToFloat(Edit1.Text);

      y:=1.8*x+32;

      Memo1.Lines.Add(Edit1.Text+’ C= ‘ + FormatFloat(‘####.##’,y)+’ F’);

      Edit1.Clear;

      Edit1.SetFocus;

end;

В первом операторе присваивания содержимое окна редактора преобразуется в вещественное число. Второй оператор присваивания - формула пересчета. Для отражения результата расчета в окне TMemo используется метод Add этого компонента. Метод Add класса TStringList добавляет новую строку к имеющемуся в Lines набору строк. Добавленная строка отображается на экране. Параметром метода является строковая переменная. Строковая переменная складывается из содержимого окна редактора Edit1 строкового представления вещественной переменной у и констант ' С=' и ‘ F’. Функция FormatFloat форматирует значение у с помощью описанного формата. Методы Clear и SetFocus позволяют очистить содержимое окна редактора Edit1 и установить маркер в окно редактора.