PDF Dateien werden nicht angezeigt unter Win8, 8.1, 10

[hathor]

Funktioniert unter WIN8.1:

Delphi-Quellcode:

//AcroRd32.exe
procedure TForm1.Button7Click(Sender: TObject);
var fn : String;
begin
fn:=ExtractFilePath(ParamStr(0)) +'test-1.pdf';
ShellExecute(0, 'open','acrord32', PChar(fn),NIL,SW_SHOWNORMAL);
end;