HasMagGlass example for Delphi

   if (LEADImage1.HasMagGlass) Then
   begin
      Caption:=  'Stop';
        //Stop the MagGlass
        LEADImage1.StopMagGlass ( ) ;
   end
   else
     Caption:= 'Error';