PaintROP3 example for Delphi

This example demonstrates the PaintROP3 property.

{ Paint an inverted image.}
Lead1.PaintROP3 := SRCINVERT;