Datei mit Steuerzeichen in StringList laden?

[TiGü]

Es ist alles möglich.

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils,
  System.Classes;

var
  Stream: TStringStream;
  filename: string;
begin
  try
    filename := 'C:\Users\Horst\AppData\Roaming\Microsoft\Windows\Recent\CustomDestinations\e0e944739d076ab.customDestinations-ms';

    Stream := TStringStream.Create;
    Stream.LoadFromFile(filename);
    Writeln(Stream.DataString);
    Stream.Free;
    Readln;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.