⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pdfinfo.dpr

📁 生成PDF文档的控件
💻 DPR
字号:
{*******************************************************}
{                                                       }
{       This unit is part of the VISPDF VCL library.    }
{       Written by R.Husske - ALL RIGHTS RESERVED.      }
{                                                       }
{       Copyright (C) 2000-2008, www.vispdf.com         }
{                                                       }
{       e-mail: support@vispdf.com                      }
{       http://www.vispdf.com                           }
{                                                       }
{*******************************************************}

program PDFInfo;
{$APPTYPE CONSOLE}
uses
  SysUtils,
  Graphics,
  Classes,
  VPDFDoc;

var
   VPDF: TVPDF;

begin
  VPDF:= TVPDF.Create(nil);
  try
    VPDF.AutoLaunch := true;                                 // PDF file will shown automatically
    VPDF.FileName := '.\InfoDemo.pdf';                       // Set PDF filename
    VPDF.ShowInfo := true;                                   // Include information into document
    VPDF.Author := 'VisPDF console user';                    // Set information about author
    VPDF.Subject := 'VisPDF console information demo';       // Set document subject
    VPDF.Title := 'Information Demo';                        // Set document title
    VPDF.BeginDoc;                                           // Create PDF file
    VPDF.CurrentPage.TextOut(10, 10, 0, 'Information Demo'); // Print text
    VPDF.EndDoc;                                             // Close PDF file
  finally
      VPDF.Free;
  end;
end.

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -