AddNoise example for Delphi

This example adds red noise and redisplays the bitmap.

Lead1.AddNoise(500, CHANNEL_RED);
Lead1.ForceRepaint;