Dry example for Delphi

procedure TForm1.DryClick(Sender: TObject);
begin
   LEADImage1.Dry( 5 );
end;