|
Registriert seit: 18. Feb 2005
286 Beiträge
Delphi 2010 Enterprise
|
AW: Datei komplett in einen String lesen
14. Mär 2012, 21:59
Delphi-Quellcode:
function FileLoad(const Filename: String; const Encoding: TEncoding = nil): String;
var
Strings: TStrings;
begin
Strings := TStringList.Create;
try
Strings.LoadFromFile(Filename, Encoding);
Result := Strings.Text;
finally
Strings.Free;
end;
end;
"Es gibt keine schlimmere Lüge als die Wahrheit, die von denen, die sie hören, missverstanden wird."
|