HistoEqualize example for Delphi

This example equalizes the bitmap's histogram and repaints the image.

Lead1.HistoEqualize;
Lead1.ForceRepaint;