Canvas

← →
xman © (2004-05-25 22:01) [0]

Помогите с затемнением прямоугольника. Есть image1.picture.bitmap.canvas в нем расположена картинка, как зделать прямоугольник (пусть 20 на 50) который немного затемнит картинку в нем? т.е. каждый пиксель в этом прямоугольнике легонько затемнит.

← →
Luk (2004-05-26 00:37) [1]

Посмотри как делается прозрачность:
http://delphibase.endimus.com/?action=viewfunc&topic=mediaimg&id=10300
Если мозги есть, разберешься со своей задачей.

при прсмотре ссылки, я не стал разбиратся сильно там накручено.
И я нашол другой способ, если каму надо держите...

procedure .... type TRGB=record b,g,r:byte; // b-синий, g-зеленый, r-красный цвет end; ARGB=array [0..1] of TRGB; PARGB=^ARGB; var p:PARGB; x,y:integer; b:tbitmap; begin b:=tbitmap.create; b.loadfromfile(путь к картинке); for y:=100 to 200 do begin p:=b.scanline[y]; for x:=100 to 200 do begin p[x].r:=trunc(p[x].r/1.2); p[x].g:=trunc(p[x].g/1.2); p[x].b:=trunc(p[x].b/1.2); // где 1.2 значение затемнения end; end; image1.picture.bitmap.canvas.draw(0,0,b); // насчет этой строки не уверен end;

Canvas Найти похожие ветки