Hallo Leute,
ich hab hier ein Problem, das mit dem TAcroPDF Active x zu tun hat.
Ich habe eine Form mit einem
DB-Grid und einem PDF. Das selektierte PDF-File im Grid wird dann im PDF dargestellt.
hier der source, ich denke aber daran liegt es nicht
Delphi-Quellcode:
PDF: TAcroPDF;
....
procedure TPgmFrm.qryDokuAfterScroll(DataSet: TDataSet);
var FileName: String;
begin
TBlobField(qryDoku.FieldByName('File')).SaveToFile(usrTemp + '\1.pdf');
pdf.LoadFile(usrTemp + '\1.pdf'); //--- Hier kommt der Fehler ----
Filename := qryDoku.FieldByName('Bezeichnung').AsString;
Filename := ChangeFileExt(Filename,'');
PanPdfTop.Caption := Filename;
end;
Ich erhalte einen
Exception Fehler der Klasse EOleException, Meldung 'Unbekannter Fehler' Prozess wurde .....
Im Acrobat wurde die Dartstellung im Internet Explorer aktiviert.
Der Debugger springt dann in
unit AcroPDFLib_TLB und bleibt bei folgender function stehen:
Delphi-Quellcode:
function TAcroPDF.LoadFile(const fileName: WideString): WordBool;
begin
Result := DefaultInterface.LoadFile(fileName);
end;
Ich habe Adobe Acrobat standard sogar schon neu installiert, aber der gleiche Fehler.
Hat irgendjemand eine Idee woran es liegen könnte ?? Mir gehen sie langsam aus.
Danke schon mal im voraus