Registriert seit: 12. Mär 2007
486 Beiträge
|
Re: 3 bilder übereinander malen
12. Okt 2007, 01:30
ich würde es so machen
Delphi-Quellcode:
var
Ausgabe, //auf ausgabe wird alles gezeichnet und später auf ein canvas gezeichnet
bild1,bild2,bild3 : TBitmap; //in form create erstellen und bilder laden
...
Procedure Draw;
var
i : integer;
begin
bild1.transparentcolor := clwhite;
bild1.transparent := true;
//das gleiche mit bild 2 und3
Ausgabe.draw(0,0,bild1);
Ausgabe.draw(0,0,bild2);
Ausgabe.draw(0,0,bild3);
PaintBox.canvas.draw(0,0,Ausgabe);
end;
irgend wie so, müste funktionieren. Alle weißen felder vom Bitmap sind dann transparent.
|
|
Zitat
|