Створення програми для перегляду малюнків - 02 Серпня 2013 - Блог

Меню сайту

Категорії розділу

Архітектура ПК [1]

Архітектура та експлуатація персонального комп'ютера

СПЗ [12]

Системне програмне забезпечення та операційні системи

Комп'ютерна графіка [25]

КСМ [28]

Комп'ютерні системи та мережі

ІСІТО [1]

Інформаційні системи і технології обліку

Бухгалтерський облік [0]

АМтП [10]

Алгоритмічні мови та програмування

Копирайт рерайт [1]

СУБД [18]

Системи управління базами даних

ОКТ практикум [2]

Основи комп'ютерних технологій практикум

Інформатика (практ) [1]

інформатика практикум, практичні заняття

ТіОБВ [61]

Технологія і організація будівельного виробництва

ОСАПр [6]

Основи систем автоматизованого проектування, AutoCAD, ArchiCAD

ТіОБВ (заочники) [1]

Пошук

Статистика

Онлайн всього: 1

Гостей: 1

Користувачів: 0

Форма входу

Календар

Головна » » Створення програми для перегляду малюнків

12:49

Створення програми для перегляду малюнків

Мета роботи - створити програму для перегляду малюнків

Після запуску програми у вікні відображається малюнок

Рис. 1.

2. По кліку мишкою по малюнку відображається меню.

3. Вибрати у діалоговому вікні будь-який інший малюнок.

Рис. 2.

4. Для виходу з програми необхідно натиснути кнопку "закрити в рядку заголовка".

План розробки програми

1. Відкрити новий проект.

2. Розмістити на формі компоненти: панель Panel, рисунок Image, діалогове вікно OpenDialog. Натисніть кнопку Save All на панелі інструментів і збережіть проект.

3. Виконати наступні дії:

Таблиця 6.

Виділений об'єкт	Вкладка вікна Object Inspector	Ім'я властивості/ ім'я події	Дія
Forml	Properties	Caption	Додавання імені форми "Альбом"
Panell (Вкладка Standard)	Properties	Caption	Очистіть значення властивості Caption
		BevelOuter	Вибрати в спадаючому списку значення bvLowered
		BevelInner	Вибрати в спадаючому списку значення bvNone
		BewelWidth	Присвоїти значення 2
		Width	Присвоїти значення 241
		Height	Присвоїти значення 185
Imagel (Вкладка Additional)	Properties	Left	Присвоїти значення 2
		Top	Присвоїти значення 2
		Width	Присвоїти значення 237
		Height	Присвоїти значення 181
		Stretch	Включити властивість True
		Picture	За допомогою кнопки-побудови відкрити діалогове вікно Picture Editor (редактор зображень). Клацнути на кнопці Load (Завантажити) - відкриється діалогове вікно Load Picture (Завантаження рисунка) Відкрити папку і вибрати будь-який малюнок і натичнути кнопку Відкрити. Повернутися до вікна редкстора зображень, натиснути кнопку ОК.
		Picture	Image1.Picture.LoadFromFile (OpenDialog1.FileName);
	Events	OnClick	OpenDialog1.Execute;
OpenDialogl (Вкладка Dialogs)	Properties	Title	Ввести текст: "Вибір зображення"
		FileName	Ввести повний шлях доступа до файлу: C:\Windows\Pіc.bmp
		Filter	Ввести текст: Растрове зображення (.bmp)\|.bmp
		DefaultExt	Присвоїти властивості значення: .bmp
		Options	Півластивості ofFileMustExit (Файл должен существовать) присвоить значение True (Да)

4. Збережіть проект, запустите и протестируйте его.

Лістинг підпрограми

procedure TForm1.Image1Click (Sender: TObject); begin

OpenDialog1.Execute;

Image1.Picture.LoadFromFile (OpenDialog1.FileName); end;

Категорія: АМтП | Переглядів: 644 | Додав: Gryzley | Рейтинг: 0.0/0

Всього коментарів: 0

« Серпень 2013 »
Пн	Вт	Ср	Чт	Пт	Сб	Нд
			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


Ім`я *:
Email *:

Код *: