Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Компонент TImage – отображение картинок. Этот компонент служит для размещения на форме одного из трех поддерживаемых Delphi типов изображений: растровой картинки, пиктограммы, или метафайла.
Основное свойство компонента – Picture.
Разместить графический объект можно несколькими способами:
1. Свойству Picture присвоить значение <filename>, указав весь путь доступа к данному файлу.
2. Во время работы программы применить метод LoadFromFile
Image1.Picture.LoadFromFile (‘flower.bmp’);
3. Создать просмотрщик изображений, используя компонент OpenDialog или OpenPictureDialog.
Основной метод, с помощью которого производится обращение к компоненту OpenDialog илиOpenPictureDialog - Execute. При открытии окна мы формируем переменную булевского типа и возвращаем TRUE, если нажата клавиша OK, или FALSE, если нажата клавиша Cancel или Esc.
Для этого выполните следующее:
1. Разместите на форме компоненты Image1, Button1, OpenPictureDialog1
2. Напишите такой обработчик события OnClick для Button1
procedure TForm1.Button1.Click(Sender: TObject);
Begin
If OpenDialog1.Execute
Then begin
Image1.Picture.LoadFromFile
(OpenDialog1.FileName);
Image1.Stretch:=true
End;
End;
Заметим, что оператор Image1.Stretch:=True масштабирует изображение так, чтобы оно занимало всю рабочую область Image1.
Дата публикования: 2014-10-25; Прочитано: 358 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!