Скачать: CL | DM;

Как быстро очистить Canvas?   Найти похожие ветки 

← →
Charly22   (2005-06-07 21:38) [0]

Всем привет!
Подскажите, плз., наиболее быстрый способ очистки некоторой прямоугольной области Canvas"a от всего, что на нем было нарисовано? Например, область формы.

Если можно, с примером. Заранее благодарен!

---

← →
Anatoly Podgoretsky ©   (2005-06-07 21:48) [1]

Что значить очистить, сие не возможно, она всегда грязная.

---

← →
Charly22   (2005-06-07 22:00) [2]

:-))
Я имею ввиду ситуацию, если на форме юзер нарисовал что-то, а потом, скажем, заотел выделить все нарисованное, нажать Del и все это стереть. Чтобы на месте рисунка оказалась область, залитая таким же цветом, какого цвета форма.

---

← →
Anatoly Podgoretsky ©   (2005-06-07 22:06) [3]

Вот и заливай цветом фона, а то очистить

---

← →
Eraser ©   (2005-06-08 00:11) [4]

Charly22   (07.06.05 22:00) [2]
Чтобы на месте рисунка оказалась область, залитая таким же цветом, какого цвета форма.

Рисуй рект на весь рисунок.

---

← →
XProger ©   (2005-06-08 04:30) [5]


Canvas.Brush.Color := clBtnFace;
Canvas.FillRect(Rect(X, Y, Width, Height));


---

← →
Crazy_Diman ©   (2005-06-08 05:07) [6]

procedure TForm1.Button1Click(Sender: TObject);
begin
 PatBlt(Form1.Canvas.Handle,0,0,Form1.ClientWidth,Form1.ClientHeight,WHITENESS);
end;
___________________________________
                                  |
                                  |
Canvas.Brush.Color := ClWhite;     |
Canvas.FillRect(Canvas.ClipRect);  |
___________________________________|

---

← →
Crazy_Diman ©   (2005-06-08 05:22) [7]

InValidateRect(Canvas.handle,NIL,True);

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c