GlowFilter example for Delphi

procedure TForm1.GlowFilterClick(Sender: TObject);
begin
   LEADImage1.GlowFilter( 5, 3, 0 );
end;