请问如何将文本文件内容提出来?哪句代码显示了这个功能?(10)

  • 主题发起人 主题发起人 楚辞
  • 开始时间 开始时间

楚辞

Unregistered / Unconfirmed
GUEST, unregistred user!
function GetFileContent(const AFile: String): String;var// s: TStringList;begin Result := ''; s := TStringList.Create; try s.LoadFromFile(AFile); Result := s.Text; finally s.Free; end;end;
 
s.LoadFromFile(AFile); 有这个功能,兄弟你做下测试就知道了。
 
s.LoadFromFile(AFile);
 
s.LoadFromFile(AFile);//把文件载入S中 Result := s.Text;//取出S中的文本内容返回给 Result
 
多人接受答案了。
 
这个不用问了。结贴。
 
后退
顶部