仿acdSee文件及图片浏览控件

作者: 傻猫    分类: 搞软件     发布时间: 06-03 08:48    浏览次数: 9742     7 条留言

使用前,请先注册一下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;
    {设置列表目录的路径}

 


软件截图.jpg

网页截图.jpg

ocx.rar

delphi7 demo.rar

c++builder6 demo.rar

vs 2003 c#版demo.rar

已有 7 条评论 »

  1. Ev1n

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

  2. Ev1n

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

  3. Ev1n

    [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}

  4. Ev1n

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

  5. Ev1n

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

  6. Ev1n

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

  7. Ev1n

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

添加新评论