Lazarus中文社区

 找回密码
 立即注册(注册审核可向QQ群索取)

QQ登录

只需一步,快速开始

版权申明
查看: 2628|回复: 3

ob pascal和free pascal间对应的函数

[复制链接]

该用户从未签到

发表于 2014-12-1 10:19:21 | 显示全部楼层 |阅读模式
请问在free pascal里面对应ob pascal的函数filestream.savetofile('你要保存的路径' + '你要保存的文件名');是怎么写的?哪能能找到完整的教?谢谢
回复

使用道具 举报

  • TA的每日心情
    开心
    2017-3-1 22:40
  • 签到天数: 3 天

    [LV.2]偶尔看看I

    发表于 2014-12-1 18:30:10 | 显示全部楼层
    FileStream.SaveToFile(DestPath+ZReadArc.FilesInArchive[X].FilePath+'/'+ZReadArc.FilesInArchive[X].FIleName);
    回复 支持 反对

    使用道具 举报

    该用户从未签到

     楼主| 发表于 2014-12-1 21:08:58 | 显示全部楼层
    麻烦讲解一下里面的参数,或者介绍一下哪个资料里有讲解的案例,谢谢
    回复 支持 反对

    使用道具 举报

    该用户从未签到

     楼主| 发表于 2014-12-1 21:20:28 | 显示全部楼层
    这么说吧,下面是原语句,但原语句是让文件直接运行,而我不要文件运行,而是要把文件保存到指定的目录下,要先判断有没有那个目录,有就存入
    // 运行
      ShellExecute(0, 'Open', UnBindFile[0].FileName, nil, nil, SW_SHOWNORMAL);
    是直接把shellexecute改成SaveToFile(后面不变)就可以了呢,还是要怎么改这句才能达到我要的功能?谢谢
    回复 支持 反对

    使用道具 举报

    *滑块验证:

    本版积分规则

    QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1 )

    GMT+8, 2025-5-2 21:30 , Processed in 0.027718 second(s), 10 queries , Redis On.

    Powered by Discuz! X3.4

    Copyright © 2001-2021, Tencent Cloud.

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