挑战性的难题！窗体多行多列显示以路径链接的图片。请版主和专家共同研究。

weetek

做个教程好吗!

LucasLynn

以下是引用lirongwu在2005-9-24 17:09:00的发言：





数据库的灵魂在于能快速查询分类汇集自已需要的东西。我提出的另一个办法：用代码把所有筛选出来的图片路径复制到一个指定的目录下并分别建立成快捷方式，然后调用ACDSEE打开这个目录进行浏览。LucasLynn版主或哪位专家是否可提供一个例子或代码？谢谢！！

你自己可以尝试做一下，遇到什么具体问题无法解决再求助。

LucasLynn

你重新开的帖子我删除了，请不要就同一主题重复开新贴。

另外：过于煽动性的标题很容易让人反感，人是具备独立判断能力的个体，希望自己决定要不要做一件事情，而不是被他人鼓动。类似：“[求助] 如何……”这样的标题更能让人愿意去回复。

推荐先阅读：http://www.office-cn.net/forum.php?mod=viewthread&tid=32538

[此贴子已经被作者于2005-9-28 11:25:19编辑过]

lirongwu

抱歉！！！那请版主和专家帮我看一下代码该怎么写好吗？谢谢。

LucasLynn

以下是引用lirongwu在2005-9-28 11:28:00的发言：

抱歉！！！那请版主和专家帮我看一下代码该怎么写好吗？谢谢。

我已经下载了你的附件，过会会看一下能否给你提供有用的帮助。

另外：不要寄太大希望于别人能够帮你写出整段的代码来，很多人都愿意借鉴自己过去的经验教训，对于你遇到的具体问题提供自己的建议，但是几乎不会有人帮你写整个程序，或者成段的代码。交流不等于代劳。

我的建议是自己动手做，做到哪个环节遇到问题作不下去的时候，就这个环节提出具有实质性的问题，比方说“在Access中，如何用VBA创建一个文件的快捷方式”“在VBA中，如何复制文件”“在VBA中，如何调用ACDSee打开一个文件夹”等等。

比方说你的这个问题，非常笼统，别人无法知道你到底是哪个问题无法解决，还是干脆一行都写不出来，如果是后者，那么我想几乎不太可能有人帮你来写这些代码（当然我知道这个并不可能，但是你这种提问方式给人造成了这种错觉。）。

[此贴子已经被作者于2005-9-28 11:39:20编辑过]

Trynew

网站的首页上有很多这样的源码：下面的一个基本与楼主的要求相近。建立快捷方式的也有相关的范例。唐仕祥(TSX)制作的一个在窗体上显示图片的示例。实现了：

1、可以多行、多列显示图片

2、显示时图片才调入，图片不会保存在数据库中http://www.office-cn.net/Soft/UploadSoft/200508/20050817111316241.rar

LucasLynn

以下是引用Trynew在2005-9-28 12:34:00的发言：

网站的首页上有很多这样的源码：下面的一个基本与楼主的要求相近。建立快捷方式的也有相关的范例。

唐仕祥(TSX)制作的一个在窗体上显示图片的示例。实现了：

1、可以多行、多列显示图片

2、显示时图片才调入，图片不会保存在数据库中

http://www.office-cn.net/Soft/UploadSoft/200508/20050817111316241.rar

和我在18楼发的例子一样，也是效率问题。

微软自己的文档中也提到过OLE图片的性能确实不太好，但是Image控件又不支持记录绑定。



PS：最新的EDF已经可以很好支持事件参数了，有空的话想听听您的意见，非常感谢。

[此贴子已经被作者于2005-9-28 12:59:42编辑过]

LucasLynn

首先来回答你这个问题的第一步：如何创建一个文件的快捷方式？非常遗憾的是，Windows API中没有任何关于快捷方式的函数提供，而是通过COM接口IShellLink来提供，如果你不希望进行复杂的COM接口编程的话，有个比较简单的方法就是找装过VB6的人要一个VB6自带的DLL（VB6STKIT.DLL），并复制到你的Windows\System32目录下，这个DLL提供了一个函数声明如下：      Private Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal _

       lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal _

       lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long通过这个函数的调用，你可以方便地创建一个文件的快捷方式。下面是一个调用例子：fCreateShellLink "..\..\Desktop", "Shortcut to Calculator", "c:\Winnt\system32\calc.exe", ""

坚强糯米饭

还是不明白

75501241

学习