Y ybsnui Unregistered / Unconfirmed GUEST, unregistred user! 2001-08-19 #1 如何编程实现创建一个与指定文件同名而且长度大小为0的文件,并同时能将原文件覆盖???<br>例如:目标文件为snui.exe,大小为99KB。要生成一个大小为0的snui.exe文件,并用其覆盖取代原目标文件。<br>请大虾们不吝赐教!!!!!!!!!
如何编程实现创建一个与指定文件同名而且长度大小为0的文件,并同时能将原文件覆盖???<br>例如:目标文件为snui.exe,大小为99KB。要生成一个大小为0的snui.exe文件,并用其覆盖取代原目标文件。<br>请大虾们不吝赐教!!!!!!!!!
T Toylin Unregistered / Unconfirmed GUEST, unregistred user! 2001-08-19 #2 声明一个Tfile类型变量,<br>将它标志为snui.exe文件,<br>清空它,再保存,可以了吧
Z ZeeGee Unregistered / Unconfirmed GUEST, unregistred user! 2001-08-19 #3 procedure OverWrite(AName: String);<br>var<br> F: TFileStream;<br>begin<br> DeleteFile(AName);<br> F:=TFileStream.Create(AName, cmCreate);<br> F.Free;<br>end;<br>
procedure OverWrite(AName: String);<br>var<br> F: TFileStream;<br>begin<br> DeleteFile(AName);<br> F:=TFileStream.Create(AName, cmCreate);<br> F.Free;<br>end;<br>