Средства разработки приложений для персональных компьютеров. Ефремов О.В. - 19 стр.

UptoLike

ВУЗ: 

ТГТУ | Тамбов

Составители: 

Рубрика: 

выберите свойство Items, затем щелкните на маленькой кнопке с тремя точками. Появится
простой текстовый редактор, в котором пропишите две строчки: ″Фото-1″ и ″Фото-2″.
Панель используется обычно как контейнер для других компонентов, чтобы логически
сгруппировать их. В данном же случае она применена еще и для улучшения внешнего вида
интерфейса. У панели измените значения свойств Caption (должна быть пустая строка), а
также BevelInner и BevelOuter (внутренний и внешний края – соответственно bvRaised и
bvLowered).
Проследите, чтобы размеры панели, измеряемые в точках (высота Height и ширина
Width) были не меньше, чем соответственно 250 и 220.
После этого разместите на панели компонент Картинка (TImage). Так как пока мы не
указали, какое изображение будет в этом компоненте, он имеет вид пустой рамки, очерчен-
ной пунктирной линией. Чтобы картинка занимала всю площадь панели, измените ее свойст-
во Align (выравнивание), чтобы оно стало равным alClient.
Затем надо определить процедуру, выполняющуюся при выборе из выпадающего списка
того или иного пункта. Для этого надо выделить ComboBox на форме, перейти на вкладку
Events (События) в окне Object Inspector и дважды щелкнуть на пустом поле справа от собы-
тия OnChange (По изменению). После этого автоматически откроется окно кода:
procedure TfrmMain.cbChooseChange(Sender: TObject);
begin
end;
Готовая процедура будет выглядеть так:
procedure TfrmMain.cbChooseChange(Sender: TObject);
begin
{выбор файла с нужной картинкой}
case cbChoose.ItemIndex of
0: imgPhoto.Picture.LoadFromFile(‘photo1.jpg’);
1: imgPhoto.Picture.LoadFromFile(‘photo2.jpg’);
end;
end;
Чтобы приложение корректно работало, надо в самой верхней части окна кода модуля в
разделе uses добавить упоминание модуля Jpeg (работа с графическими файлами этого фор-
мата):
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, ExtCtrls, StdCtrls,
Jpeg; <- добавить
В приведенном выше коде использован метод LoadFromFile (загрузить из файла) компо-
нента класса TImage.
Содержание отчета
1. Название и цель работы.
2. Последовательность создания нового приложения, описание использованных компонентов и их основных
свойств.
3. Программный код процедуры, обрабатывающей выбор пункта из выпадающего списка с комментариями.
Контрольные вопросы
• Каковы основные свойства объектов TComboBox, TPanel и TImage? Для чего и как они
используются?
• Как определяются процедуры обработки события OnChange для компонента Com-
boBox?

Страницы