ICode9

精准搜索请尝试: 精确搜索
首页 > 其他分享> 文章详细

纯Delphi 原生写的 上传到七牛的功能

2019-11-07 22:51:19  阅读:331  来源: 互联网

标签:原生 dlg Delphi 七牛 uploadToQiniu directUploadToQiniu 上传


上传文件到七牛, 支持分片分段上传, 适用于Delphi XE, 10等新版本

分两个函数: uploadToQiniu 和 directUploadToQiniu

uploadToQiniu 这个函数使用分片, 分段的方式上传, 并有上传进度回调, 采用多线程同时进行, 该方法适用于上传较大文件。

directUploadToQiniu 该函数直接使用Form表单的形式上传, 没有上传进度回调, 适用于上传较小的文件。

上面两个方法已经使用于 好智学项目中, 被大量用户实际验证可行。

 

具体代码: https://github.com/Neugls/uploadtoqiniu/blob/master/qiniu.pas

 

使用方法:

var dlg: TOpenDialog;

begin
   
    dlg := TOpenDialog.create;
    try
       uploadToQiniu(dlg.filename, qiniuToken, 'file/20191107_zjj3ijad.zip',   procedure ( p:integer ) begin
         self.pbProgress.value = p
       end);
    finaly
        dlg.free;
    end;

  

 

如遇到使用问题, 请到github上发issue

 

标签:原生,dlg,Delphi,七牛,uploadToQiniu,directUploadToQiniu,上传
来源: https://www.cnblogs.com/neugls/p/11816280.html

本站声明: 1. iCode9 技术分享网(下文简称本站)提供的所有内容,仅供技术学习、探讨和分享;
2. 关于本站的所有留言、评论、转载及引用,纯属内容发起人的个人观点,与本站观点和立场无关;
3. 关于本站的所有言论和文字,纯属内容发起人的个人观点,与本站观点和立场无关;
4. 本站文章均是网友提供,不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属;如您发现该文章侵犯了您的权益,可联系我们第一时间进行删除;
5. 本站为非盈利性的个人网站,所有内容不会用来进行牟利,也不会利用任何形式的广告来间接获益,纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

专注分享技术,共同学习,共同进步。侵权联系[81616952@qq.com]

Copyright (C)ICode9.com, All Rights Reserved.

ICode9版权所有