delphi 读取正在被占用的txt文件

本文整理自网络，侵删。

 
procedure TForm1.FormCreate(Sender: TObject);
var
FileSteam:TFileStream;
begin
FileSteam :=TFileStream.Create('u_in200416.log',fmShareDenyNone);
memo1.Lines.LoadFromStream(FileSteam);
end;
 

相关阅读 >>

Delphi 字符串加密解密代码

Delphi线程中动态创建ado控件

Delphi 多核机器上编程实现将指定进程pid放到指定cpu上运行

Delphi 链接获取主站地址

Delphi 替换指定字符串的函数

Delphi程序常用的公共代码

Delphi 合并文本行的函数

Delphi http post json示例

Delphi 禁止用键盘左右箭头，去切换pagecontrol页签

Delphi system 提供的编译期函数

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 读取正在被占用的txt文件