Question

delphi 如何调用同个文件夹txt文本

2: memo1.Lines.LoadFromFile('C:\Documents and Settings\Administrator\桌面\短信模板\4G办理.txt');

但是换电脑就不行了
如何建立 虚拟目录 delphi 如何使用虚拟目录

Answer 1

比如，把你的这个目录路径文件名串 “C:\Documents and Settings\Administrator\桌面\短信模板\4G办理.txt” 置于一个名为“MYAPP.TXT”的文本文件中，并将其和你的exe文件放置于同一个目录中，在你的执行文件中打开这个txt文件，将“字符串”读入变量s中，然后将你的delphi语句改为：
memo1.Lines.LoadFromFile(s);
不就OK了吗 ！

追问

如何建立虚拟目录

追答

按我的方法，没有什么虚拟目录问题。
在dos下有个subst命令也许能满足你的想法。

追问

需要使用这个 主要有很多文件ExtractFilePath(application.exename)

追答

执行cmd进入dos窗口，在dos窗口中运行 subst/? 可显示该命令的用法 ！