timage1 timage2 один на другим прозрачный, как это сделать?

← →
vilfred (2002-12-24 02:17) [0]

есть имадж1, в нем показываю картинку, и над неи хочу сделать прозрачный второй timage2 на котором бы чтоннить рисовать можно было бы... лишьбы прозрачный был бы

код, которым гружу картинку в имадж1 такой:

BitMap1 := TBitMap.Create; BitMap1.LoadFromFile("/home/vilfred/images/imgaimage.200212140408.bmp"); Image1.Canvas.Draw(0,0,BitMap1);

thanks!!

p.s. на самом деле это киликс. но пока никакой разницымежду дельфяими и киликсом не замечал... т.е. как дельфи шестой...

← →
vilfred (2002-12-24 03:22) [1]

дальше над timage1 ставлю timage2 и пишу
with Image2 do begin canvas.Pen.Color:=clWhite; canvas.Brush.color:=clWhite; TransParent:=True; TransParentMode:=tmAuto; TransparentColor:=canvas.brush.color; canvas.RectAngle(0, 0, Width,Height); canvas.Pen.Color:=clBlue;
ну и далее что-то рисую в image2 с помощью ellipse, lineto, moveto(т.е. поверх картинки).

Вобщем оно ругается на то что и TransParentMode и TransParentColor undeclared identified...
на Transparen ругалось, исправли тем что вместо with Image2.canvas do begin написал with Image2 do begin но оно дальше ругается :(

timage1 timage2 один на другим прозрачный, как это сделать? Найти похожие ветки