Delphi Sources

Delphi Sources

 




 

ИСХОДНИК ПРОГРАММЫ

 

. : Canvas Drawing : .

 

Delphi - Пример рисования на холсте, сохранения рисунка в растровое изображение или файл

Исходник программы, показывающей пример рисования на холсте, сохранения рисунка в растровое изображение или файл, очистки холста изображения и повторного отображения ранее сохраненного изображения (аналог слоев в Photoshop).

Кнопка Сохранить холст в список создает изображение TBitmap, копирует в него холст с помощью Copyrect и сохраняет растровое изображение как объект в списке изображений.

Также в примере доступна функция рисования каракулей, чтобы пользователь мог рисовать на холсте. Для рисования используется событие OnMouseDown. Событие OnMouseUp завершает рисование (сбрасывает флаг рисования на false).

Примечание: обновление курсора во время рисования иногда стирает часть нарисованной линии. Решение данной проблемы состоит в том, чтобы установить Cursor в CrNone до рисования линии и CrDefault после ее рисования.

Просмотры: 6 037
Дата: 13.07.2021, Автор: Gary Darby
Скачивания: 68
Написать сообщение:

 

 

Скачать (4 Кб)     Регистрация >>


 

Похожие исходники


Canvas

Thread Bitmap (pencil drawings)

Drawing Board

 

Соглашение пользователяКонфиденциальностьПравила обработки cookie       BrokenByte Software