![]() КАТЕГОРИИ: АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Delphi. Компоненты Image, OpenPictureDialog, SavePictureDialog. Рисование и сохранение графической информацииСоздадим новое приложение показывающей работу вDelphi 7, позволяющее пользователю рисовать на холсте, выбирая ширину и цвет линии, и возможность сохранять результаты своей работы в файле как точечный рисунок .Рисовать будем не на всей поверхности окна(Form1.Canvas), а на холсте специально отведённого для размещения рисунка компонента Image(Image1.Canvas). Для этого запускаем нашу программу Delphi 7 и добавляем на форму следующие компоненты(см. рис.):
События компонентов в приложении простого графического редактора:
procedure TForm1.FormCreate(Sender: TObject); Рисование происходит при нажатии левой кнопки мыши (событие On MouseDown) точка, над которой была нажата кнопка, фиксируется, то есть назначается текущим положением пера (метод Canvas.MoveTo). После этого любое перемещение мыши (событие OnMouseMove) проводит линию от текущего положения пера до нового положения указателя мыши, и текущей позицией становится эта новая точка (метод Canvas.LineTo). Так происходит до тех пор, пока остаётся нажатой левая кнопка мыши.
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton; При выборе цвета ColorDialog пользователь закрывает окно нажатием кнопки OK, то скопируем значение свойства Color объекта ColorDialog1в одноимённое свойство пера:
Процесс сохранения рисунка выполняет следующая процедура: procedure TForm1.Button3Click(Sender: TObject); И так процесс создания программы для демонстрации работы в Delphi 7 графикамы завершили. Так будет выглядеть приложение после работы с простейшим редактором графики:
На основе вышеописанного, самостоятельно создайте кнопку, которая загрузит в форму любую картинку из компьютера (соответственно за открытие картинки отвечает диалог OpenPictureDialog). Дата добавления: 2015-09-15; просмотров: 66; Нарушение авторских прав |