PresetShadowEffect.Distance Property

Gets or sets how far to offset the shadow.

Namespace: DevExpress.Docs.Presentation

Assembly: DevExpress.Docs.Presentation.v25.2.dll

NuGet Package: DevExpress.Docs.Presentation

Declaration

C#

public float Distance { get; set; }

VB.NET

Public Property Distance As Single

Property Value

Type	Description
Single	The distance to offset the shadow in Document units (1/300 of an inch).

Remarks

The PresetShadowEffect class exposes properties that you can use to configure the preset shadow effect:

Color

Specifies the preset shadow color.

Angle

Specifies the angle of the shadow’s offset.

Distance

Specifies how far to offset the shadow.

Type

Specifies the preset shadow type.

The following code snippet applies a preset shadow effect to a shape:

C#

using DevExpress.Docs.Presentation;
using System.Drawing;
using DevExpress.Docs;

namespace PresentationApiSample;

public class Program {
    public static void Main(string[] _) {

        Presentation presentation = new Presentation();
        presentation.Slides.Clear();

        Slide slide = new Slide(SlideLayoutType.Blank);
        presentation.Slides.Add(slide);

        Shape shape1 = new Shape(ShapeType.Rectangle);
        shape1.Outline = new LineStyle { Fill = new SolidFill(Color.RoyalBlue), Width = 8 };
        shape1.Fill = new SolidFill(Color.White);
        shape1.X = 1100;
        shape1.Y = 1100;
        shape1.Width = 300;
        shape1.Height = 300;
        slide.Shapes.Add(shape1);

        ShapeEffectProperties e_properties = new ShapeEffectProperties();

        e_properties.PresetShadow = new PresetShadowEffect {
            Color = new OfficeColor(Color.Gray),
            Angle = 45,
            Distance = 50,
            Type = PresetShadowType.BottomLeftDrop
        };

        shape1.Effects = e_properties;
    }
}

VB.NET

Imports DevExpress.Docs.Presentation
Imports System.Drawing
Imports DevExpress.Docs

Namespace PresentationApiSample

    Public Class Program
        Public Shared Sub Main(ByVal args As String())

            Dim presentation As New Presentation()
            presentation.Slides.Clear()

            Dim slide As New Slide(SlideLayoutType.Blank)
            presentation.Slides.Add(slide)

            Dim shape1 As New Shape(ShapeType.Rectangle)
            shape1.Outline = New LineStyle With {
                .Fill = New SolidFill(Color.RoyalBlue),
                .Width = 8
            }
            shape1.Fill = New SolidFill(Color.White)
            shape1.X = 1100
            shape1.Y = 1100
            shape1.Width = 300
            shape1.Height = 300
            slide.Shapes.Add(shape1)

            Dim e_properties As New ShapeEffectProperties()

            e_properties.PresetShadow = New PresetShadowEffect With {
                .Color = New OfficeColor(Color.Gray),
                .Angle = 45,
                .Distance = 50,
                .Type = PresetShadowType.BottomLeftDrop
            }

            shape1.Effects = e_properties
        End Sub
    End Class

End Namespace