program ParaDemo;

{$APPTYPE CONSOLE}

uses

   SysUtils,

   Graphics,

   Classes,

   HPDFDoc;

 

var

    HPDF: THotPDF;

ParaIndex: Integer;

 

begin

   HPDF:= THotPDF.Create(nil);

   try

      HPDF.AutoLaunch := true;

      HPDF.FileName := 'ParaDemo.pdf';      

      HPDF.BeginDoc;

 

      ParaIndex := HPDF.CreateParagraph( 20, jtLeft, 60, 60, 30, 30  ); // 단락 생성

      HPDF.ParaAutoAddPage := true;   // 단락이 자동으로 새 페이지를 추가합니다

 

      HPDF.BeginParagraph( ParaIndex );                                        // 메인 단락 열기

      HPDF.CurrentPage.SetFont( 'Arial', [fsBold], 14  );                    // 단락 글꼴 설정

      HPDF.CurrentParagraph.Justification := jtCenter;                      // 단락 정렬을 가운데 정렬로 설정

      HPDF.CurrentPage.SetRGBFillColor ( clGray );

      HPDF.CurrentParagraph.ShowText( 'PDF 문서를 생성하기 위한 Delphi용 VCL 컴포넌트' ); // 단락 텍스트 출력

      HPDF.CurrentPage.SetRGBFillColor ( clBlack );

      HPDF.CurrentParagraph.NewLine;                                           // 줄 바꿈

      HPDF.CurrentParagraph.NewLine;                                           // 줄 바꿈

      HPDF.CurrentParagraph.Justification := jtLeft;                          // 단락 정렬을 왼쪽 정렬로 설정

      HPDF.CurrentParagraph.ShowText ( 'HotPDF는 Delphi 및 C++Builder용 PDF 생성 라이브러리입니다' ); // 단락 텍스트 출력

      HPDF.EndParagraph;                                                             // 현재 단락 닫기

 

      HPDF.EndDoc;

   finally

       HPDF.Free;

   end;

end.