使用Spire.Presentation,开发人员可以给PowerPoint文档设置背景颜色和添加背景图片。该示例将详细讲述如何使用Spire.Presentation给一个现有幻灯片文档设置纯色背景颜色,渐变背景颜色以及添加背景图片。
设置纯色背景颜色
C#
//加载PowerPoint文档
Presentation ppt = new Presentation();
ppt.LoadFromFile("Sample.pptx");
//设置文档的背景填充模式为纯色填充,设置颜色
ppt.Slides[0].SlideBackground.Type = BackgroundType.Custom;
ppt.Slides[0].SlideBackground.Fill.FillType = FillFormatType.Solid;
ppt.Slides[0].SlideBackground.Fill.SolidColor.Color = Color.DarkSeaGreen;
//保存文档
ppt.SaveToFile("Solidbackground.pptx", FileFormat.Pptx2013);
VB.NET
'加载PowerPoint文档
Dim ppt As New Presentation()
ppt.LoadFromFile("Sample.pptx")
'设置文档的背景填充模式为纯色填充,设置颜色
ppt.Slides(0).SlideBackground.Type = BackgroundType.[Custom]
ppt.Slides(0).SlideBackground.Fill.FillType = FillFormatType.Solid
ppt.Slides(0).SlideBackground.Fill.SolidColor.Color = Color.DarkSeaGreen
'保存文档
ppt.SaveToFile("Solidbackground.pptx", FileFormat.Pptx2013)
设置渐变色背景颜色
C#
Presentation ppt = new Presentation();
ppt.LoadFromFile("Sample.pptx");
//设置文档的背景填充模式为渐变色填充,设置颜色
ppt.Slides[0].SlideBackground.Type = BackgroundType.Custom;
ppt.Slides[0].SlideBackground.Fill.FillType = FillFormatType.Gradient;
ppt.Slides[0].SlideBackground.Fill.Gradient.GradientStops.Append(0f, KnownColors.White);
ppt.Slides[0].SlideBackground.Fill.Gradient.GradientStops.Append(1f, KnownColors.MediumSeaGreen);
ppt.SaveToFile("Gradientbackground.pptx", FileFormat.Pptx2013);
VB.NET
Dim ppt As New Presentation()
ppt.LoadFromFile("Sample.pptx")
'设置文档的背景填充模式为渐变色填充,设置颜色
ppt.Slides(0).SlideBackground.Type = BackgroundType.[Custom]
ppt.Slides(0).SlideBackground.Fill.FillType = FillFormatType.Gradient
ppt.Slides(0).SlideBackground.Fill.Gradient.GradientStops.Append(0F, KnownColors.White)
ppt.Slides(0).SlideBackground.Fill.Gradient.GradientStops.Append(1F, KnownColors.MediumSeaGreen)
ppt.SaveToFile("Gradientbackground.pptx", FileFormat.Pptx2013)
设置背景图片
C#
Presentation ppt = new Presentation();
ppt.LoadFromFile("Sample.pptx");
//设置文档的背景填充模式为图片填充
ppt.Slides[0].SlideBackground.Type = Spire.Presentation.Drawing.BackgroundType.Custom;
ppt.Slides[0].SlideBackground.Fill.FillType = FillFormatType.Picture;
ppt.Slides[0].SlideBackground.Fill.PictureFill.FillType = PictureFillType.Stretch;
//设置背景图片
Image img = Image.FromFile("bgimage.jpg");
IImageData image = ppt.Images.Append(img);
ppt.Slides[0].SlideBackground.Fill.PictureFill.Picture.EmbedImage = image;
ppt.SaveToFile("Imagebackground.pptx", FileFormat.Pptx2013);
VB.NET
Dim ppt As New Presentation()
ppt.LoadFromFile("Sample.pptx")
'设置文档的背景填充模式为图片填充
ppt.Slides(0).SlideBackground.Type = Spire.Presentation.Drawing.BackgroundType.[Custom]
ppt.Slides(0).SlideBackground.Fill.FillType = FillFormatType.Picture
ppt.Slides(0).SlideBackground.Fill.PictureFill.FillType = PictureFillType.Stretch
'设置背景图片
Dim img As Image = Image.FromFile("bgimage.jpg")
Dim image__1 As IImageData = ppt.Images.Append(img)
ppt.Slides(0).SlideBackground.Fill.PictureFill.Picture.EmbedImage = image__1
ppt.SaveToFile("Imagebackground.pptx", FileFormat.Pptx2013)