Hallo zusammen,

ab Windows 8 werden bei einem ShellExecute PDF-Dateien nicht angezeigt.

Aufruf:
ShellExecute(Handle, nil, PChar('Name der PDF-Datei.pdf'), nil, nil, SW_SHOW);

Alternativer Aufruf:
ShellExecute(Handle, nil, PChar('AdobeReaderMitPfadAngabe.exe'), PChar('Name der PDF-Datei.pdf'), nil, SW_SHOW);

Unter Windows 7 oder älter funktioniert das bestenes, unter Windows 8, 8.1 und 10 aber nicht mehr. Es passiert scheinbar nichts, aber im Taskmanager sieht man jetzt pro Startversuch einmal den Eintrag "Adobe Acrobat Reader DC (32bit)"

Das passiert aber nur dann, wenn man beim Delphiprogramm unter Eigenschaften --> Verknüpfung --> Erweitert --> Als Administrator ausführen anhakt. Der Benutzer selbst ist unter Windows nicht als Administrator angemeldet. Das Programm funktioniert aber in relevanten Teilen nur wie gewünscht, wenn der Haken gesetzt ist.
Bitte diesen Teil nicht diskutieren. Diese Gegebenheiten sind für uns nicht veränderbar.

Wenn ich einen alternativen Viewer einsetze und als Standardviewer deklariere, z.B. PdfXChangeViewer, funktioniert alles wie erwartet. Auch die Anzeige mit dem Standardviewer der jeweiligen Windows-Version funktioniert. Der Wunsch der Kunden ist jedoch, dass der Adobe Acrobat Reader in der jeweils aktuellen Version zur Anzeige eingesetzt wird.

Hatte jemand schon mal dieses Problem oder weiß Rat?

Zitat von knochen:

Hatte jemand schon mal dieses Problem oder weiß Rat?

´

Dieser Herr auf StackOverflow: http://stackoverflow.com/q/21263232/2298252

Funktioniert unter WIN8.1:

markieren

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;

Zitat von Der schöne Günther:

Dieser Herr auf StackOverflow: http://stackoverflow.com/q/21263232/2298252

Schön, jemand zu haben, der auch keine Lösung bekommen hat.

Zitat von hathor:

Funktioniert unter WIN8.1:

Nein, tut es leider nicht. Aus Delphi heraus schon, aber nicht, wenn es in der oben beschriebenen Art und Weise gestartet wird.

Mittlerweile habe ich es selbst herausgefunden.
ShellExecute(Handle, nil, PChar('Explorer.exe'), PChar('NameDerPdfDatei.pdf'), nil, SW_SHOW);
Das tut's

Trotzdem vielen Dank und guten Rutsch.

Da öffnet sich aber das mit pdf-verknüpfte Programm.
Bei mir ist es der Foxit-Reader.

Siehe:
http://www.delphipraxis.net/1245493-post8.html

Zitat von hathor:

Da öffnet sich aber das mit pdf-verknüpfte Programm.
Bei mir ist es der Foxit-Reader.

Siehe:
http://www.delphipraxis.net/1245493-post8.html

Das haben ich doch geschrieben, dass es mit anderen Viewern geht. Nur mit dem Adobe Acrobat Reader nicht.
Egal, geht ja jetzt.