Delphi 中的 PDF 缩略图

发布于 2024-12-29 09:23:09 字数 132 浏览 2 评论 0 原文

我想知道在 Delphi 中是否可以轻松生成 PDF 文件的缩略图。基本上我想将 PDF 的第一页渲染为小位图（例如 100x100 或类似位图）。
我看到两个选项 1 使用 PDF 组件，2 以某种方式利用资源管理器生成预览/缩略图的方式。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

安穩 2025-01-05 09:23:09

使用像 QuickPDF 或 Gnostice 这样的库确实是最简单的选择。我相当确定资源管理器中的 PDF 缩略图实际上是由安装的任何 PDF 软件（例如 Adobe）生成的。除非您能保证每个工作站上都安装了正确的 PDF 阅读器，否则使用缩略图的想法可能无效。

编辑：这是一个完整的应用程序，使用 QuickPDF 将给定 PDF 文件的第一页渲染为 BMP 文件。在 10 DPI 下，我的输出 BMP 文件为 85 像素宽 x 110 像素高。

program PDFToBMP;
{$APPTYPE CONSOLE}
uses
  SysUtils, QuickPDF;
var
  Q : TQuickPDF;
begin
  Q := TQuickPDF.Create;
  try
    Q.LoadFromFile(ParamStr(1), '');
    Q.RenderPageToFile(10 {DPI}, 1 {PageNumber}, 0 {0=BMP}, ChangeFileExt(ParamStr(1),'.bmp'));
  finally
    Q.Free;
  end;
end.

Using a library like QuickPDF or Gnostice is really the easiest option. I'm fairly sure that the PDF thumbnails in explorer are actually generated by whatever PDF software is installed such as Adobe. Unless you can guarantee that a proper PDF reader is installed on every workstation the idea of using thumbnails might not be valid.

Edit: Here's a complete application using QuickPDF to render the first page of a given PDF file into a BMP file. At 10 DPI my output BMP file is 85 pixels wide by 110 pixels high.

program PDFToBMP;
{$APPTYPE CONSOLE}
uses
  SysUtils, QuickPDF;
var
  Q : TQuickPDF;
begin
  Q := TQuickPDF.Create;
  try
    Q.LoadFromFile(ParamStr(1), '');
    Q.RenderPageToFile(10 {DPI}, 1 {PageNumber}, 0 {0=BMP}, ChangeFileExt(ParamStr(1),'.bmp'));
  finally
    Q.Free;
  end;
end.

回复收藏 0 原文

苏辞 2025-01-05 09:23:09

您可以在HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\PreviewHandlers下找到已安装预览处理程序的列表（在 Vista 和 Windows 7 中）。

如果安装了任何 PDF 处理程序（例如，安装了 Acrobat Reader 时），您可以通过搜索之前找到的 GUID 来查找 COM 服务器。这与 IPreviewHandler< 结合使用/a> 界面可能会引导您找到解决方案。

回复收藏 0 原文

囍笑 2025-01-05 09:23:09

或者，如果您有“时间”，您可以尝试通过命令行或 GhostScript href="http://ghostscript.com/doc/7.07/Make.htm#Third-party_libraries" rel="nofollow">嵌入它。 Mike W. 为您提供了一个很好且简单的解决方案。我使用 Gnostice，但还有许多其他 PDF VCL 解决方案。