新颖的图片展示效果求助

wanwan 发表于: 2007-11-28 16:10 来源: 扑奔PPT网

huangjianfei 发表于 2007-11-28 19:40:32

好象是用flash做的吧。

蓝光 发表于 2007-11-28 20:09:59

我觉得用ppt来做比flash还简单，效果是一样的，有时间我做一个传上来你看一下就知道了

wzmceci 发表于 2007-11-29 09:58:05

我简单的做了一个，基本的意思出来了，不知是否满足你的要求？

846 KB, 下载次数: 777)

zzn 发表于 2007-11-29 14:21:40

jpeg图片来源于本论坛wzmceci版主。

 

(2007-11-29 14:21:40, Size: 845 KB, Downloads: 257)

wanwan 发表于 2007-11-29 16:10:38

觉得这是一种折衷的方法，可以通过运动路径和放大/缩小实现吗？

zyhqzn 发表于 2007-11-29 18:23:24

我怎么也看不见那个flash，怎么回事?

wanwan 发表于 2007-11-29 19:32:18

看不见另存为本地播放吧，韩国网站的东西，速度慢……

wanwan 发表于 2007-11-29 20:04:43

自己作了一个，还有2个问题：

1、目前是单击效果
2、不能循环

283 KB, 下载次数: 186)

zzn 发表于 2007-11-29 21:05:29

我又在本论坛原创区传了一个，不知你是否满意。其实我已经尽力了，真不好意思!

zyhqzn 发表于 2007-11-30 09:00:16

wanwan兄：
在你作品的基础上做了修改，这个你一定满意（请启用宏，否则看不到效果），把鼠标移动每个小图上，看看效果和那个flash是不是很像。

[ 本帖最后由 zyhqzn 于 2007-11-30 09:02 编辑 ]

310 KB, 下载次数: 320)

wzmceci 发表于 2007-11-30 13:49:46

楼上的附件是不是发错了，快修改一下吧

zyhqzn 发表于 2007-11-30 14:07:03

没有发错呀！我是根据9楼楼主自己的例子修改的。

wanwan 发表于 2007-11-30 20:02:32

QUOTE:

原帖由 zyhqzn 于 2007-11-30 09:00 发表
wanwan兄：
在你作品的基础上做了修改，这个你一定满意（请启用宏，否则看不到效果），把鼠标移动每个小图上，看看效果和那个flash是不是很像。

cool........................... good job！！

bmwgtr 发表于 2008-6-19 11:29:47

不错
zyhqzn 兄厉害~~~~~~~
就是这个效果
不知道 你的　那个代码　是否通用？
该如何修改？

alicerose 发表于 2008-6-19 16:52:58

厉害，厉害，佩服佩服！加油进步

zhuyx 发表于 2008-6-19 17:39:55

zyhqzn 老师能解释一下是如何制作的吗？让我们学习，学习!先谢了。

kofkof 发表于 2008-6-22 11:35:50

下载一个来看看，也学习学习:$

kelvinku 发表于 2008-6-26 22:05:00

没看到效果, 不知道是什么样的

kelvinku 发表于 2008-6-26 22:05:39

zyhqzn 老师能解释一下是如何制作的吗？让我们学习，学习!先谢了

zyhqzn 发表于 2008-6-27 14:18:56

先做一个图片动画，加上触发器（触发器就是自己），加上以下代码：（这段代码就是模拟鼠标单击），图片设置“动作设置/鼠标移过，运行宏shubiao”
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Const MOUSEEVENTF_LEFTDOWN = &H2
Private Const MOUSEEVENTF_LEFTUP = &H4
Sub shubiao()
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
DoEvents
End Sub