سلام خدمت دوستان
یه برنامه کوچیک نوشتم که فایل ورد رو به PDF تبدیل میکنه و توی برنامه نمایش میده.
procedure TForm1.BtnConvertAndViewClick(Sender: TObject);
const
wdExportFormatPDF = 17;
var
Word, Doc: OleVariant;
begin
Word := CreateOleObject('Word.Application');
Doc := Word.Documents.Open('D:Test.docx');
Doc.ExportAsFixedFormat('D:Test.pdf', wdExportFormatPDF);
WebBrowser1.Navigate2('D:Test.pdf');
Word.ActiveDocument.Close;
Word.Quit;
Word := UnAssigned;
Doc := UnAssigned;
end;
کسی از دوستان پیشنهادی برای حل مشکل داره؟Err.png
برچسب:
نویسنده: محمد رضا جوادیان