24小时热门版块排行榜    

查看: 562  |  回复: 2

magang26

金虫 (小有名气)

[求助] 文本文件拖拽到fortran exe上面

将文本文件拖拽到fortran exe上面,执行,dos窗口显示直到计算结束,不自动消失。不知道怎么实现,求思路。
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

成长吧
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ghfan

新虫 (小有名气)

你求神吧,神能做到
2楼2012-03-27 10:36:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

magang26

金虫 (小有名气)

引用回帖:
2楼: Originally posted by ghfan at 2012-03-27 10:36:00:
你求神吧,神能做到

呵呵,楼上说笑了。我实现了一些,写出来,共同参详吧。

(1) 用Fortran自己的Read功能。就是多了个双击的操作,先让DOS窗口出来,然后直接把文件拖入就行了。这个比较简单,以后我会用这个方法。

(2)借助VC++参数捕捉功能和Fortran的命令行参数提取功能。程序段不多,基本也不用对VC++很了解。
<2.1> VC++编译成的Exe文件,能够捕捉我们拖放的文件参数,其函数签名为:int main( int argc, char* argv[] ),文件的路径就存放在argv[1]中。
<2.2> 在VC++中调用已经编译好的Fortran Exe文件,执行FORTRAN命令的格式为:xxx.exe para1 para2 ..,目前我用WinExec来执行这个命令。这个命令的作用就是通过带参数的命令行将文件路径等信息传递到Fortran Exe里面去。
<2.3> 现在需要Fortran Exe能够提取到传递进来的参数。这里用到了Fortran的get_command_argument函数。

这样整个过程就完成了。当然这里面还有些不完善的地方,如完成的时机等。自己用的话,这个简单的需求是可以满足的。
成长吧
3楼2012-04-06 06:50:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 magang26 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +5 3n8v2C8RimXI 2026-09-13 6/300 2026-09-18 09:18 by yS4CkeWDhD6V
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 C79jjtjAKjEn 2026-09-15 3/150 2026-09-18 03:40 by cITaGg3p5edr
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 vZfe6xYu34yj 2026-09-14 3/150 2026-09-18 02:16 by cITaGg3p5edr
[公派出国] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 vZfe6xYu34yj 2026-09-14 3/150 2026-09-18 02:06 by cITaGg3p5edr
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-18 00:28 by cITaGg3p5edr
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +6 LwdutQ8HoqWP 2026-09-13 6/300 2026-09-17 23:05 by cuPZTDXS3VOd
[找工作] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 3n8v2C8RimXI 2026-09-13 4/200 2026-09-17 22:39 by cuPZTDXS3VOd
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 vZfe6xYu34yj 2026-09-14 3/150 2026-09-17 15:29 by 0ngsZVSCTS7z
[公派出国] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 Aj1rhIDL5ixY 2026-09-14 4/200 2026-09-17 14:27 by ObVzqQQh1rrE
[硕博家园] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +6 40ms4Wlo4umh 2026-09-14 6/300 2026-09-17 13:53 by ObVzqQQh1rrE
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 6F5UbRU2I5hL 2026-09-14 3/150 2026-09-17 03:16 by Tql5LQhh5rLK
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +6 6F5UbRU2I5hL 2026-09-14 6/300 2026-09-17 03:04 by Tql5LQhh5rLK
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-17 02:38 by Tql5LQhh5rLK
[公派出国] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 s3fFTmArrBt6 2026-09-13 7/350 2026-09-17 02:14 by Tql5LQhh5rLK
[考研] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +4 23jxep3nCNZb 2026-09-14 4/200 2026-09-16 21:03 by MHf40yA0Uhyb
[考博] 上海工程技术大学激光智能制造课题组招收博士研究生 +8 两三岁ss 2026-09-14 8/400 2026-09-16 09:46 by 水士口
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +5 LwdutQ8HoqWP 2026-09-13 5/250 2026-09-16 03:14 by DgNGHc3h5tPl
[教师之家] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 s3fFTmArrBt6 2026-09-14 3/150 2026-09-15 07:46 by C79jjtjAKjEn
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 s3fFTmArrBt6 2026-09-13 4/200 2026-09-15 06:50 by 5BDX0d0WFp7t
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +6 3n8v2C8RimXI 2026-09-13 6/300 2026-09-15 05:38 by 5BDX0d0WFp7t
信息提示
请填处理意见