流写文件时出现另一个程序正在使用此文件,进程无法访问。
function myfunc(SStr:string):string;
var
mem:TMemoryStream;
begin
mem:=TMemoryStream.Create;
try
mem.Write(SStr[1],length(SStr));
mem.SaveToFile('c:\test.txt');
finally
mem.Free;
end;
这个函数是把传进来的字符串,写到一个文本文件里,我担心的是,当它同时被无数个用户调用的时候,出现:
另一个程序正在使用此文件,进程无法访问。