Zwar funktioniert der Ausdruck einer word Datei, aber bei einer pdf-Datei scheitere ich .
Die word-datei drucke ich wie folgt aus:
Delphi-Quellcode:
var wo:variant;
uses comobjec;
...
procedure
TForm1.Arbeitsbltter1Click(Sender: TObject);
begin
try
wo := CreateOleObject('Word.Application');
wo.visible := true;
wo.Documents.Open(FileName:= ExtractFilePath(Paramstr(0)) + 'texte.doc');
except
messagebox(0,'Kann office nicht starten oder word-Datei nicht finden.'+
#13+'Abbruch','Problem',16);
END;
end;
Eine ähnliche procedure für eine vorhandene pdf-Datei wäre gut.
danke