Zitat von
patti:
Das Bitmap machst du dann transparent und wählst als TransparentColor eben deine Kreis-Farbe (clFuchsia). Dieses Bitmap musst du nur noch auf das aus dem Image malen und dem Image das Ergebnis zuweisen.
Hallo,
wäre doch logisch, dass du das Bild mit dem farbigen Rahmen auf das andere Bild rauf zeichnest.
Delphi-Quellcode:
BMP1:=TBitmap.Create;
BMP1.LoadFromFile('C:\front.bmp');
BMP:=TBitmap.Create;
BMP.PixelFormat := pf24Bit;
BMP.Canvas.Brush.Color:=clYellow;
BMP.Width:= BMP1.Width;
BMP.Height:= BMP1.Height;
BMP.Transparent:=True;
BMP.TransparentColor:=clFuchsia;
BMP.Canvas.Pen.Width:=2;
BMP.Canvas.Brush.Color:=clFuchsia;
BMP.Canvas.Pen.Color:=clblack;
BMP.Canvas.Ellipse(1, 1, BMP.Width, BMP.Height);
bmp1.Canvas.Draw(0 , 0, Bmp);//Bild auf das andere rauf zeichnen
bmp1.SaveToFile('C:\test.bmp');
Image1.Picture.Bitmap.Assign(BMP1);
bmp.Free;
bmp1.Free;