仿acdSee文件及图片浏览控件

博主： samool
发布时间：2007 年 06 月 03 日
25756 次浏览
9 条评论
1476字数
分类：搞软件

使用前,请先注册一下SamoolImageListViewProj1.ocx注册方法1: 用目录下fRegister.exe 打开SamoolImageListViewProj1.ocx来注册注册方法1: 在Windows命令行下运行：regsvr32  SamoolImageListViewProj1.ocx 注册 ----------------------------------------------------------------------------能够快速生成缩略图，支持缩略图缓存，支持多种图片格式，支持接口参数，可获取选中文件的完整文件名，可设置缩略图是否显示像素比例及文件大小，可直接导入开发工具使用，也可用于Web浏览图片及图片上传, 另附上各种开发工具demo. 控件类名：SamoolImageListView ----------------------------------------------------------------------------提供方法：     procedure SelectAllFile; safecall;    //选择所有文件    procedure AntiSelectFile; safecall;   //反向选择文件    procedure GetFiles(out sfs: OleVariant); safecall;        {得到选择文件的路径及名称格式如1|c:\1.jpg ,多个文件2|c:\1.jpg|c:\2.jpg}    procedure SetThumbsDetails(details: WordBool); safecall;      {设置缩略图是否显示像素及文件大小,1表示显示，0表示不显示}    procedure SetThumbsViewStyle(myStyle: SYSINT); safecall;     {设置显示方式: 0-缩略图   1-平铺   2-图标   3-列表   4-详细信息}    procedure SetImgCachPath(CachPath: OleVariant); safecall;     {设置缩略图缓存保存路径}    procedure GetCurrentPath(out cPath: OleVariant); safecall;     {得到当前列表目录的路径}    procedure SetCurrentPath(sPath: OleVariant); safecall;     {设置列表目录的路径}  <a href="https://samool.com/attachment/39152/" title="软件截图.jpg"><img src="/attachments/date_200706/93233e7577c4a43b892c313e908c215b.jpg" alt="软件截图.jpg" /></a> <a href="https://samool.com/attachment/39153/" title="网页截图.jpg"><img src="/attachments/date_200706/8fd472d47e5ca632f234a49ac49a8b01.jpg" alt="网页截图.jpg" /></a> <a href="https://samool.com/attachment/40677/" title="ocx.rar">ocx.rar</a> <a href="https://samool.com/attachment/40678/" title="delphi7 demo.rar">delphi7 demo.rar</a> <a href="https://samool.com/attachment/40679/" title="c++builder6 demo.rar">c++builder6 demo.rar</a> <a href="https://samool.com/attachment/40680/" title="vs 2003 c#版demo.rar">vs 2003 c#版demo.rar</a>

使用前,请先注册一下SamoolImageListViewProj1.ocx注册方法1: 用目录下fRegister.exe 打开SamoolImageListViewProj1.ocx来注册注册方法1: 在Windows命令行下运行：regsvr32&nbsp;&nbsp;SamoolImageListViewProj1.ocx 注册 ----------------------------------------------------------------------------能够快速生成缩略图，支持缩略图缓存，支持多种图片格式，支持接口参数，可获取选中文件的完整文件名，可设置缩略图是否显示像素比例及文件大小，可直接导入开发工具使用，也可用于Web浏览图片及图片上传, 另附上各种开发工具demo. 控件类名：SamoolImageListView ----------------------------------------------------------------------------提供方法： &nbsp;&nbsp;&nbsp; procedure SelectAllFile; safecall;&nbsp;&nbsp;&nbsp; //选择所有文件&nbsp;&nbsp;&nbsp; procedure AntiSelectFile; safecall;&nbsp;&nbsp; //反向选择文件&nbsp;&nbsp;&nbsp; procedure GetFiles(out sfs: OleVariant); safecall;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; {得到选择文件的路径及名称格式如1|c:\1.jpg ,多个文件2|c:\1.jpg|c:\2.jpg}&nbsp;&nbsp;&nbsp; procedure SetThumbsDetails(details: WordBool); safecall;&nbsp; &nbsp;&nbsp;&nbsp; {设置缩略图是否显示像素及文件大小,1表示显示，0表示不显示}&nbsp;&nbsp;&nbsp; procedure SetThumbsViewStyle(myStyle: SYSINT); safecall; &nbsp;&nbsp;&nbsp; {设置显示方式: 0-缩略图&nbsp;&nbsp; 1-平铺&nbsp;&nbsp; 2-图标&nbsp;&nbsp; 3-列表&nbsp;&nbsp; 4-详细信息}&nbsp;&nbsp;&nbsp; procedure SetImgCachPath(CachPath: OleVariant); safecall; &nbsp;&nbsp;&nbsp; {设置缩略图缓存保存路径}&nbsp;&nbsp;&nbsp; procedure GetCurrentPath(out cPath: OleVariant); safecall; &nbsp;&nbsp;&nbsp; {得到当前列表目录的路径}&nbsp;&nbsp;&nbsp; procedure SetCurrentPath(sPath: OleVariant); safecall; &nbsp;&nbsp;&nbsp; {设置列表目录的路径}&nbsp; <a href="https://samool.com/attachment/39152/" title="软件截图.jpg"><img src="/attachments/date_200706/93233e7577c4a43b892c313e908c215b.jpg" alt="软件截图.jpg" style=""></a> <a href="https://samool.com/attachment/39153/" title="网页截图.jpg"><img src="/attachments/date_200706/8fd472d47e5ca632f234a49ac49a8b01.jpg" alt="网页截图.jpg" style=""></a> <a href="https://samool.com/attachment/40677/" title="ocx.rar">ocx.rar</a> <a href="https://samool.com/attachment/40678/" title="delphi7 demo.rar">delphi7 demo.rar</a> <a href="https://samool.com/attachment/40679/" title="c++builder6 demo.rar">c++builder6 demo.rar</a> <a href="https://samool.com/attachment/40680/" title="vs 2003 c#版demo.rar">vs 2003 c#版demo.rar</a>

最后修改：2009 年 08 月 16 日

支持就是力量

9 条评论

我的工作 - 傻猫网络日志 Samool's blog - 二十年老博客
2024-05-22 07:27:45

[...]轻武计费认证系统KDBOSS2.0轻武计费认证系统官方网站：http://www.kdboss.cngithub: https://github.com/cnsamool/kdboss轻武计费认证系统主要针对中小型企业，用户规模在1-100万内的小区宽带运营商，本系统可作为宽带运营支撑系统，同时该系统支持多业务受理，包括宽带业务，商业客户，语音业务，增值业务等。本系统历经10年千锤百炼，历经百万宽[...]

回复
MyWork - SaSkye's Blog, Opening a new world of AI
2024-04-26 08:05:00

[...]轻武计费认证系统KDBOSS2.0轻武计费认证系统官方网站：http://www.kdboss.cngithub: https://github.com/cnsamool/kdboss轻武计费认证系统主要针对中小型企业，用户规模在1-100万内的小区宽带运营商，本系统可作为宽带运营支撑系统，同时该系统支持多业务受理，包括宽带业务，商业客户，语音业务，增值业务等。本系统历经10年千锤百炼，历经百万宽[...]

回复
samool
2008-09-23 12:13:31

[quote=lovecat]谢谢
这是个过程,如何知道返回结果呢,比如我选中了几个缩略图片,如何在edit中显示出来或导出为文本?[/quote]测试版不提供技术支持,呵呵,请购买正式版哈.

回复
lovecat
2008-09-22 14:18:28

谢谢
这是个过程,如何知道返回结果呢,比如我选中了几个缩略图片,如何在edit中显示出来或导出为文本?

回复
samool
2008-09-21 19:48:00

[quote=lovecat]procedure GetFiles(out sfs: OleVariant);
这个可否给个具体例子，谢谢[/quote]
procedure GetFiles(out sfs: OleVariant); safecall;
{得到选择文件的路径及名称格式如1|c:\1.jpg ,多个文件2|c:\1.jpg|c:\2.jpg}

回复
lovecat
2008-09-21 19:24:48

procedure GetFiles(out sfs: OleVariant);
这个可否给个具体例子，谢谢

回复
samool
2008-07-01 11:34:05

[quote=lw]想用C#实现这样的功能,你这种速度真快.不知道你是怎么做的[/quote]你可以购买我的OCX控件啊,直接调用就可以了.呵呵. 有兴趣加我QQ:6042506

回复
lw
2008-07-01 11:13:13

想用C#实现这样的功能,你这种速度真快.不知道你是怎么做的

回复
samool
2007-06-03 09:01:44

可订做功能接口,欢迎下载试用,如需正式版请与我联系.
联系QQ:6042506 或 474646104

回复