若想用流对文件进行操作,常见的如下:
FileStream := TFileStream.Create(FileName, fmCreate or fmOpenReadWrite);
意图为文件存在则打开,不存在则创建,
今天发现,好象不是这样的,不管存在不存在都会创建.
再进一步看
const
fmCreate = $FFFF;
fmOpenRead = $0000;
fmOpenWrite = $0001;
fmOpenReadWrite = $0002;
那么 fmCreate or fmOpenReadWrite等于什么,我想是fmCreate吧,
测试如下:
if fmCreate =(fmCreate or fmOpenReadwrite) then
showmessage('s');
那这种写法是有别的含义还是我理解错了
FileStream := TFileStream.Create(FileName, fmCreate or fmOpenReadWrite);
意图为文件存在则打开,不存在则创建,
今天发现,好象不是这样的,不管存在不存在都会创建.
再进一步看
const
fmCreate = $FFFF;
fmOpenRead = $0000;
fmOpenWrite = $0001;
fmOpenReadWrite = $0002;
那么 fmCreate or fmOpenReadWrite等于什么,我想是fmCreate吧,
测试如下:
if fmCreate =(fmCreate or fmOpenReadwrite) then
showmessage('s');
那这种写法是有别的含义还是我理解错了
解决方案 »
- 查詢語句中用了sum速度就很慢,有什麼辦法優化sum?
- 请问未学C、C++是否适合去考程序员认证???
- 如何排序??
- delphi中使用Tdatabase连接Sybase数据库的问题!
- 请给几个免费的生产管理的程序吧,要求很简单
- 请教CORBA在不同局域网(或internet)怎么互联 -- UP有分
- 已知一工资算法字符串例如:(3*A+2*B)/30+500 去算每个员工的工资,但公式有可能变动如:(3*A+B)/30+800.所以不能写成固定的函数去做
- 关于delphi+dbase做物理删除的问题.........
- 用delphi7自带QuickRePort报表如何实现分组汇总统计
- 如何在Form2通过按钮动态创建Form3,然后通过Form3中的按钮关闭Form2
- 请教fastreport基础问题
- 欢迎大家加盟QQ群:Delphi高手突破(群号:1463857) 共同讨Delphi技术,共同交流,共同进步!
if FileExists(filename) then
FileStream := TFileStream.Create(FileName, fmOpenReadWrite)
else
FileStream := TFileStream.Create(FileName, fmCreate);