PDF aus Delphi heraus öffnen

[Matze]

Hallo

Ich versuche über

Delphi-Quellcode:

ShellExecute(Application.Handle, 'open', PChar('"' + FileDir + 'helpfile.pdf' + '"'),
  nil, nil, SW_NORMAL);

eine PDF Datei zu öffnen. GetLastError meldet mir nun:

Zitat:

Der angegebenen Datei ist keine Anwendung zugeordnet

Vom Explorer heraus kann ich die PDF per Doppelklick ganz normal im Adobe Reader öffnen. Wie kommt so eine Meldung zustande? Weder Google, noch die DP liefert mir eine Lösung, das scheint ein nicht allzu häufig auftretender Fehler zu sein.

[Christian Seehase]

Moin Matze,

laut Dokumentation von ShellExecute, spielt GetLastError hier keine Rolle.
Schau Dir doch noch mal die möglichen Rückgabewerte von ShellExecute an.

BTW:
Was liefert Dir denn

Assoc .pdf

zurück, wenn Du es in einer Konsole ausführst?

[Matze]

Hallo Chris

Zitat von Christian Seehase:

Was liefert Dir denn

Assoc .pdf

zurück, wenn Du es in einer Konsole ausführst?

.pdf=pdf_auto_file

Auch unser Hai macht es so wie ich, nur mit SW_SHOW (klick), doch geht das bei mir auch nicht. Es passiert bei mir rein gar nichts.

[Neutral General]

Also bei mir liefert assoc .pdf z.B

 .pdf=AcroExch.Document das scheint mir so nach "Acrobat Reader Dokument" auszusehen..
Ansonsten geh mal im Explorer auf Extras-> Ordneroptionen->Dateitypen und such dir pdf aus und ordne pdf den Acrobat Reader zu.
Dann müsste es gehen denke ich.

[Luckie]

Da es aus dem Explorer, laut Matze, mit einem Doppelklick geht, ist dem Dateityp pdf auch der Reader als Anwendung zu geordnet.

[Matze]

Zitat von Neutral General:

das scheint mir so nach "Acrobat Reader Dokument" auszusehen..
Ansonsten geh mal im Explorer auf Extras-> Ordneroptionen->Dateitypen und such dir pdf aus und ordne pdf den Acrobat Reader zu.
Dann müsste es gehen denke ich.

Die PDF muss aber mit den Adobe Reader verknüpft sein, sonst könnte ich sie aus dem Explorer heraus nicht öffnen. In den Ordneroptionen ist der Adobe Reader 7.0 zugewiesen. Außerdem kann ich dem Anwender auch nicht zumuten, in den Ordneroptionen rumfummeln zu müssen.

[mschaefer]

Moin moin, zusammen

also normalerweise würde ich das auch so angehen wie Matze geschildert hat, aber das Problem kann bei Acrobat liegen.
Probier mal erst den Acrobat zu starten und dann das PDF:

Delphi-Quellcode:

 ShellExecute(0, 'Open', PChar('C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe'), PChar(''), PChar(''), SW_Hide);
 ShellExecute(0, 'Open', PChar('C:\...\prices.pdf'), PChar(''), PChar(''), SW_Normal);

Über die Schöheit / Grausamkeit dieser Lösung brauchen wir aber nicht zu diskutieren.
Wie man aber auf eine bestimmte Seite navigiert da habe ich immer noch keine Ahnung...


Grüße // Martin



PS: Du kanst natürlich PDF auch im TWebBrowser öffnen

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  webbrowser1.Navigate('c:\..\MyPDFFile.pdf');
end;

[Matze]

Hallo Martin,

deine erste Lösung startet zwar den Adobe Reader, jedoch im Hintergrund, d.h. ohne GUI Doch möchte ich diesen Weg nicht gehen, da nicht jeder den Adobe Reader zum anzeigen von PDF-Dateien nutzt. Und TWebBrowser integrieren muss auch nicht sein, nur um eine PDF öffnen zu können.

Ich bin echt ratlos und kann mir das absolut nicht erklären.


Nachtrag: Achso SW_HIDE, klar sehe ich den nicht. Aber es würde auch nicht gehen.

[mschaefer]

Matze ich habe Dein Problem irgendwo schonmal gesehen und da war die einhellige Meinung, dass es an Acrobat liegt.
Mir würde da leider nur was kommerzielles Einfallen...

Grüße // Martin

[Matze]

Zitat von mschaefer:

Mir würde da leider nur was kommerzielles Einfallen...

Danke, doch das kommt für mich nicht in Frage, da ich das für ein Freeware-Programm benötige und es daher nicht einsehe, groß geld dafür auszugeben.

Gibt es denn absolut keine andere Möglichkeit? Vom Explorer kann ich diese Datei ja auch öffnen und da passiert bestimmt auch nichts anderes, als dass dem Reader über den Parameter der Pfad zur Datei übermittelt wird.