Как сохранить нарисованне на канве PaintBox, в переменной TBitmap

← →
Отто фон Бисмарк (2004-04-18 12:16) [0]

Как сохранить рисунок, нарисованный на канве компонента TPaintBox, в объекте TBitmap, т.е. чтобы то что я нарисовал, можно было сохранить в переменной типа TBitmap, чтобы в последующем можно было сохранить рисунок и использоват mtuj при событии OnPaint...

← →
Mihey © (2004-04-18 15:47) [1]

Создать этот TBitmap, выставить размеры и через TBitmap.Canvas.CopyRect скопировать на него область из канвы TPaintBox.

← →
Думкин © (2004-04-18 16:14) [2]

> Отто фон Бисмарк (18.04.04 12:16)

В ветке из которой возник сей вопрос я писал об одном коде (первоначальный прикид) - он лежит где-то тут в пределах 30-40 постов. Поищи, там есть ответ на твой вопрос.

← →
Отто фон Бисмарк (2004-04-18 21:50) [3]

Mihey...
я сразу так и сделал (вот код)
Image.Canvas.CopyRect(paintBox1.Canvas.ClipRect,PaintBox1.Canvas,paintBox1.Canvas.ClipRect);
но это ничего не изменило...

← →
Mihey © (2004-04-18 22:06) [4]

Image.Canvas.CopyRect(paintBox1.Canvas.ClipRect,PaintBox1.Canvas,paintBox1.Canvas.ClipRect);

---->

Image.Canvas.CopyRect(paintBox1.Canvas.ClipRect,PaintBox1.Canvas,paintBox1.Canvas.ClientRect);

← →
Mihey © (2004-04-18 22:06) [5]

Ну и первый параметр соответсвенно тоже.

← →
Отто фон Бисмарк (2004-04-18 22:25) [6]

Mihey
[Error] Unit1.pas(236): Undeclared identifier: "ClientRect"
там вообще такого свойства нету...

2 Отто фон Бисмарк:

В смысле PaintBox1.ClientRect.

← →
Отто фон Бисмарк (2004-04-19 21:37) [8]

Mihey..спасибо!! всё работает!

Как сохранить нарисованне на канве PaintBox, в переменной TBitmap Найти похожие ветки