HText为string类型变量HText:=read(InitData.Path+'\f'+Session.Param3+'.dat');//出错处
怎么也找不出原因,高手请帮忙看一下!
我用的是D7,如果
read(InitData.Path+'\f'+Session.Param3+'.dat')这样实在不能读出来的话,换一种什么样的方法又能替代?
怎么也找不出原因,高手请帮忙看一下!
我用的是D7,如果
read(InitData.Path+'\f'+Session.Param3+'.dat')这样实在不能读出来的话,换一种什么样的方法又能替代?
解决方案 »
- 注意啦!散分了,懂脚本的高手进啦!在线求PaxScript脚本加载DLL得到DLL中返回的对象及操作,请高手帮忙啊!
- 动态生成adoquery的parameter?
- ClientDataSet.XMLData通过SOAP传递到Web Service 上,再赋值给一个ClientDataSet,报错'Variant or Safe Array is locked'
- 呵呵,大家能给个意见吗?谢谢!
- 如何实现select的组合查询,在线等待!!!
- 一个非常简单的问题,回答对了就给100分。急,在线等。。。。。。
- delphi中如何锁定标题栏!
- 刚刚步入dephi的天堂,有个问题想问!!!
- 曾经看见一篇这样的文章
- 二值图像边缘提取与拟合
- Delphi中有没有VBScript中那样的Dictionary对象?
- 登录窗口到主窗口的问题
Ch: Char;
begin
if OpenDialog1.Execute then begin
AssignFile(F1, OpenDialog1.Filename);
Reset(F1);
if SaveDialog1.Execute then begin
AssignFile(F2, SaveDialog1.Filename);
Rewrite(F2);
while not Eof(F1) do
begin
Read(F1, Ch);
Write(F2, Ch);
end;
CloseFile(F2);
end;
CloseFile(F1);
end;end;
这是全句
HText:=read(InitData.Path+'\f'+session.param3+'.dat');
HText:=trim(HText+#13+Session.Param1);(是trim 在这里CSDN不让发所以打了','号) write(InitData.Path+'\f'+Session.Param3+'.dat',HText);
如果lz想对字符串赋值的话,直接赋值就好,不用read.
比如
HText:=InitData.Path+'\f'+Session.Param3+'.dat';
其中变量皆为string型
我是LZ哦~
其实我看了一下这段语句的意思应该是把文读入.DAT文件里面.
其在读方前保存了以前.DAT里面原始数据.
这句话HText:=read(InitData.Path+'\f'+session.param3+'.dat');
应该是先把.DAT里面的内容取出来存在HTEXT里面.然后
再用WRITE把数据一起写入.DAT里面~
不知道高手们觉得是不是这样~
看看何如改写!
也还是同样的错误!