// Hiermit kann man
das Negativ von einem Bitmap erzeugen.
// Getestet mit D4 unter WinME
procedure
TForm1.Button2Click(Sender: TObject);
var bmp:TBitmap;
begin
bmp:=TBitmap.create;
bmp.loadfromfile('d:\bilder\corel001sw.bmp');
InvertRect(bmp.canvas.handle,rect(0,0,bmp.width,bmp.height));
canvas.draw(100,10,bmp);
// z.B.
bmp.free;
end;
|