Datei als array of byte einlesen

[Neutral General]

Immer diese uralten Turbo Pascal Datei-Funktionen

Delphi-Quellcode:

var buffer: array of byte;
    i:Integer;
    datei: TFileStream;
begin
  datei := TFileStream.Create(FPdf, fmOpenRead);
  try
    SetLength(buffer, datei.Size);
    datei.Read(buffer[0], datei.Size);
  finally
    datei.Free;
  end;
end;

Falls das Problem trotzdem auftritt könnte das Problem eine Shell Extension sein, die eine Vorschau der PDF im Explorer anzeigt und die PDF dafür exklusiv öffnet.
Dann kannst du da nicht wirklich was machen.