用函数曲线在PPT中绘制曲线花

shenjianrong163

老师，请教下：怎样在PPT中用程序画这样的图形？谢谢！

Enocheasty

shenjianrong163 发表于 2024-12-8 14:40
老师，请教下：怎样在PPT中用程序画这样的图形？谢谢！

不知道你是否有特殊要求，这个云朵形状PPT里面是有的，如果一定要你贴出的这个样子的图形，你只能用自由曲线去描了，就像在ps中描图一样。
这个东西跟函数没关系。要从程序生成图形，也不过就是将描好图形的节点坐标重现一遍而已。

shenjianrong163

Enocheasty 发表于 2024-12-8 18:34
不知道你是否有特殊要求，这个云朵形状PPT里面是有的，如果一定要你贴出的这个样子的图形，你只能用自由 ...

主要是想了解下怎样让几段曲线连成闭合的图形！

Enocheasty

shenjianrong163 发表于 2024-12-10 23:11
主要是想了解下怎样让几段曲线连成闭合的图形！

这个要说说你具体的用意了，让曲线相连，如果曲线是已知的，不就让各段首尾坐标相连就行了？
像我上面的用函数绘制的曲线（其实就是很多小段的折线），让它们闭合有点麻烦，主要是计算闭合周期，不同的参数会导致闭合周期变化很大，我既不希望超过1个闭合周期（这样图线会重复，节点增多，但没意义）；也不想它们不到1个周期（这样图线不会闭合）。

shenjianrong163

Enocheasty 发表于 2024-12-11 10:49
这个要说说你具体的用意了，让曲线相连，如果曲线是已知的，不就让各段首尾坐标相连就行了？
像我上面的 ...

能否举下例子，画３段弧形曲线，首尾连接起来？谢谢！

Enocheasty

shenjianrong163 发表于 2024-12-12 22:53
能否举下例子，画３段弧形曲线，首尾连接起来？谢谢！

不知道你用什么语言，给你一段VBA吧，反正都一样的用法。运行下面的代码就能组成一个三段曲线的封闭图形了。原理一样，如果你希望节点坐标能通过函数生成，那你要自己研究函数了。

1. Sub test()
   
2.     With ActiveWindow.Selection.SlideRange(1).Shapes.BuildFreeform(msoEditingCorner, 212, 424)
   
3.         .AddNodes msoSegmentCurve, msoEditingCorner, 123, 355, 245, 123, 358, 145
   
4.         .AddNodes msoSegmentCurve, msoEditingCorner, 472, 166, 919, 507, 895, 554
   
5.         .AddNodes msoSegmentCurve, msoEditingCorner, 871, 600, 302, 492, 212, 424
   
6.         .ConvertToShape
   
7.     End With
   
8. End Sub

复制代码

shenjianrong163

Enocheasty 发表于 2024-12-13 17:52
不知道你用什么语言，给你一段VBA吧，反正都一样的用法。运行下面的代码就能组成一个三段曲线的封闭图形 ...

好的，谢谢！

woxoo

请教一下，给出一个任意函数解析式，如何在作图时均匀取点（图像上两点间的曲线长度都相等）