Fortran Coder

查看: 9700|回复: 9
打印 上一主题 下一主题

[绘图界面库] Fortran直接读取压缩文件

[复制链接]

10

帖子

2

主题

0

精华

入门

F 币
52 元
贡献
29 点
跳转到指定楼层
楼主
发表于 2015-11-15 08:31:13 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
各位大侠,我想问下如何用Fortran直接读取压缩文件,而不是先解压缩,在读文件内容呢?先解压缩再读取会遇到一个问题,就是压缩时间不好确定,
有没有函数可以判断是否解压成功呢?
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

736

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
700 元
贡献
359 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

沙发
发表于 2015-11-15 09:12:00 | 只看该作者
Fortran语法中没有这类函数。

你使用什么操作系统?什么方式来运行解压程序?何种解压程序?何种压缩格式?这可能都会影响你的问题如何解决。

490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

板凳
发表于 2015-11-15 16:42:15 | 只看该作者
会F与C混合编程的话,直接上zlib

10

帖子

2

主题

0

精华

入门

F 币
52 元
贡献
29 点
地板
 楼主| 发表于 2015-11-16 12:49:37 | 只看该作者
楚香饭 发表于 2015-11-15 09:12
Fortran语法中没有这类函数。

你使用什么操作系统?什么方式来运行解压程序?何种解压程序?何种压缩格式 ...

操作系统是win7,我是用call system来运行winrar,解压格式是zip

10

帖子

2

主题

0

精华

入门

F 币
52 元
贡献
29 点
5#
 楼主| 发表于 2015-11-16 12:51:50 | 只看该作者
pasuka 发表于 2015-11-15 16:42
会F与C混合编程的话,直接上zlib

有没有代码可供参考呢?

2033

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1641 元
贡献
709 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

6#
发表于 2015-11-16 14:06:55 | 只看该作者


我手边没有WinRAR,用 7zip 试了一下,可以实现先解压,然后再接着计算。并且有返回值,是0的话,表示正常解压结束。否则表示中途出错。
[Fortran] 纯文本查看 复制代码
use dfport
integer :: i
pause
i = system("C:\Progra~1\7-Zip\7z.exe a -t7z 1.7z 2.exe")
write(*,*) i
end



490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

7#
发表于 2015-11-16 22:01:56 | 只看该作者
pengfukai 发表于 2015-11-16 12:51
有没有代码可供参考呢?

zlib主页上面就有很多C的例子,F与C混编并不复杂或者高深,尤其是gcc系列的编译器

10

帖子

2

主题

0

精华

入门

F 币
52 元
贡献
29 点
8#
 楼主| 发表于 2015-11-17 07:19:09 | 只看该作者
fcode 发表于 2015-11-16 14:06
我手边没有WinRAR,用 7zip 试了一下,可以实现先解压,然后再接着计算。并且有返回值,是0的话,表示正 ...

非常感谢你的帮助!我测试了一下,7-Zip在解压和压缩过程中好像不会出现多线程的问题,而是一个文件压缩(解压)完成了之后再进行下一个文件,非常方便也节省时间。另外,我想问一下,system这个函数好像在dfport,dflib,以及不引用外部库文件是也有,请问这3者之间有什么区别吗?如果我想学习这几个库文件内函数的用法,有什么好的方法吗?谢谢!~

10

帖子

2

主题

0

精华

入门

F 币
52 元
贡献
29 点
9#
 楼主| 发表于 2015-11-17 07:20:23 | 只看该作者
pasuka 发表于 2015-11-16 22:01
zlib主页上面就有很多C的例子,F与C混编并不复杂或者高深,尤其是gcc系列的编译器 ...

好的,谢谢~,英语还不是太好,读起来有点吃力~

736

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
700 元
贡献
359 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

10#
发表于 2015-11-17 09:28:16 | 只看该作者
没有区别。实际就一个 system
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-24 09:57

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表