AutoTrim example for Delphi

This example trims the bitmap with threshold of 10.

Lead1.AutoTrim(10);
Lead1.ForceRepaint;