Fortran Coder

标题: 大家看一下，QuickWin画图为什么不行啊？ [打印本页]

作者: 有赖幽趣 时间: 2014-4-9 11:25
标题: 大家看一下，QuickWin画图为什么不行啊？

[Fortran] 纯文本查看 复制代码

program hao



implicit none



integer*4 :: results



pause



results=SAVEjpeg('C:\1.JPEG',600,50,801,251,32)



pause

end program hao

作者: fcode 时间: 2014-4-9 13:57
1. QuickWin您得选择相关的工程类型。
2. 至少的写一个 USE IFQWIN 吧？或者其他类似的模块
3. SAVEjpeg 有这个函数吗？只有 SaveImage 吧？
4. 如果还有问题，请给出错误提示。

作者: 有赖幽趣 时间: 2014-4-9 15:08
本帖最后由有赖幽趣于 2014-4-9 18:21 编辑

fcode 发表于 2014-4-9 13:57
1. QuickWin您得选择相关的工程类型。
2. 至少的写一个 USE IFQWIN 吧？或者其他类似的模块
3. SAVEjpeg 有 ...

已经建立的了QuickWin应用程序：

[Fortran] 纯文本查看 复制代码

program hao

use MSFLIB

use IFQWIN

implicit none



integer*4 :: results



pause



results=savejpeg('C:\1.JPEG',600,50,801,251,32)



print*,results

pause

end program hao

但是还显示错误：
This name does not have a type, and must have an explicit type. [SAVEJPEG]
这样后

[Fortran] 纯文本查看 复制代码

program hao

use MSFLIB

use IFQWIN

implicit none



integer*4 :: results,SAVEJPEG



pause



results=savejpeg('E:\1.JPEG',600,50,801,251,32)



print*,results

pause

end program hao

但是还显示错误：
无法解析的外部符号 _SAVEJPEG，该符号在函数 _MAIN__ 中被引用

image.jpg (72.93 KB, 下载次数: 412)

jpeg.jpg (78.43 KB, 下载次数: 403)

作者: lm_lxt 时间: 2014-4-9 20:23
我搜索了一下，编译器没有提供这个函数。

作者: fcode 时间: 2014-4-9 21:17
您的这个文档中存在这个函数，但是至少在 IVFXE2013 for windows 下，没有提供它。
请以您编译器的帮助为准。

作者: 有赖幽趣 时间: 2014-4-9 21:36

fcode 发表于 2014-4-9 21:17
您的这个文档中存在这个函数，但是至少在 IVFXE2013 for windows 下，没有提供它。
请以您编译器的帮助为准 ...

谢谢啦，我说怎么saveimage可以，而savejpeg不可以。

作者: 有赖幽趣 时间: 2014-4-9 21:36

lm_lxt 发表于 2014-4-9 20:23
我搜索了一下，编译器没有提供这个函数。

谢谢啦！

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)