本文整理自网络,侵删。
//方法1:Uses IOUtils;TFile.ReadAllText(FileName);TFile.ReadAllText(FileName, s, TEncoding.ASCII) // force encoding
//方法2:function LoadFileToStr(const FileName: TFileName): String; var LStrings: TStringList; begin LStrings := TStringList.Create; try LStrings.Loadfromfile(FileName); Result := LStrings.text; finally FreeAndNil(LStrings); end; end; 相关阅读 >>
Delphi webbrowser载入自定义html内容并显示
更多相关阅读请进入《Delphi》频道 >>