vb6中我得到了目录下的所有图片文件的全路径,但怎么显示呢?

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

vb6中我得到了目录下的所有图片文件的全路径,但怎么显示呢?[已结贴,结贴人:zhl1015]

发表于：2007-10-25 09:19:38 楼主

我不会vb啊，项目急,用vb做点东西，我就硬着头皮做了

我得到了目录下的所有图片文件的全路径，然后想在另一个容器中显示这些图片（缩略图)，就像windows资源管理器一样，把文件列表改成缩略图，不知道该用什么控件，我用了imagelist和listview，但太慢了，请大家帮帮忙~~~谢谢了

发表于：2007-10-25 09:21:521楼得分:5

用picture控件，
loadpicture加载图片，然后用paintpicture方法缩小贴到指定位置

发表于：2007-10-25 09:26:142楼得分:5

用image控件,设置stretch=true，加载图片，得到图片的尺寸，然后按比例缩小image控件的长与宽，就可以得到缩略图。还有就是确定image在窗体上的位置，这也就是简单的计算问题。

发表于：2007-10-25 09:27:163楼得分:10

用image控件,把它的stretch属性设置为 true,然后按照缩略图尺寸调整大小:

vbscript code


with image1
  .stretch=true
  .move "left位置","left位置","缩略图宽","缩略图高"
  .picture=loadpicture（"你的图片路径")
end with

发表于：2007-10-25 09:28:274楼得分:0

.move "left位置","top位置","缩略图宽","缩略图高"

发表于：2007-10-25 09:33:295楼得分:0

多谢楼上几位,但你们的方法是不是都只能显示一张图片呢，如果一个文件夹下有多张图片要怎么显示,是将控件添加成数组吗?
还有picture和image这两种方法哪个会快一些?
再次感谢!!

发表于：2007-10-25 09:37:176楼得分:0

image资源占用少,因为picture是容器;
多图用image数组啊,设计时直接在image1的属性里将stretch属性设置为 true,然后复制image1,粘贴;
然后循环....

发表于：2007-10-25 09:46:327楼得分:0

多谢~~我试试先~~

发表于：2007-10-25 09:51:368楼得分:0

晕怎么结帖啊```

发表于：2007-10-25 09:53:199楼得分:0

左上 [管理帖子]

发表于：2007-10-25 10:22:3710楼得分:0

不行啊~~image加载多张图片还是不行,好慢呀~~
有没有什么好办法了?

其他资讯