Zitat von
Spargeltarzan:
Hallo
Hat jemand eine Idee wie man ein externes Programm aufruft, das dann das gewünschte Dokument (z.B. Test.pdf) anzeigt ?
Ich weiss wie man externe Programme aufruft, aber ich kann nur das Programm aufrufen. Das Dokument muss ich dann "von Hand" noch mit dem Laden Befehl des Programms laden. Ich möchte das Dokument direkt vom Programm darstellen lassen.
Wenn die Datei Windows bekannt ist, dann rufe doch einfach die Datei auf. Das dazugehörige Programm wird automatisch geladen und die Datei angezeigt:
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 =
class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
uses
ShellApi;
// Wird für ShellExecute() benötigt
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(
Handle,
PChar('
open'),
PChar('
C:\Eigene Dateien\Test.pdf'),
nil,
nil,
SW_SHOWNORMAL);
end;
end.
Wenn die Datei Windows nicht bekannt ist, dann kannst du folgendes versuchen:
Delphi-Quellcode:
ShellExecute(
Handle,
PChar('
open'),
PChar('
C:\Programme\Programm zum Öffnen.exe'),
PChar('
C:\Eigene Dateien\Test.pdf'),
nil,
SW_SHOWNORMAL);