program ShowText;

{$APPTYPE CONSOLE}

uses

SysUtils, Graphics, Classes, HPDFDoc;

var

HPDF: THotPDF;

begin

HPDF := THotPDF.Create( nil );

try

HPDF.AutoLaunch := true; // A PDF fájl automatikusan megjelenik

HPDF.FileName := 'ShowText.pdf';

HPDF.BeginDoc; // PDF fájl létrehozása

HPDF.CurrentPage.SetFont( 'Times New Roman', [], 12 ); // Aktuális betűtípus beállítása

HPDF.CurrentPage.BeginText; // Szövegblokk megnyitása

HPDF.CurrentPage.MoveTextPoint( 20, 20 ); // Szövegpont mozgatása a 20, 20 koordinátára

HPDF.CurrentPage.ShowText( 'This' ); // Szöveg megjelenítése

HPDF.CurrentPage.SetTextRise( -5 ); // Szövegkiemelés (text rise) beállítása

HPDF.CurrentPage.ShowText( 'text' ); // Szöveg megjelenítése

HPDF.CurrentPage.SetTextRise( 5 ); // Szövegkiemelés (text rise) beállítása

HPDF.CurrentPage.ShowText( 'moves' ); // Szöveg megjelenítése

HPDF.CurrentPage.SetTextRise( 0 ); // Szövegkiemelés (text rise) beállítása

HPDF.CurrentPage.ShowText( 'around' ); // Szöveg megjelenítése

HPDF.CurrentPage.EndText; // Szövegblokk bezárása

HPDF.EndDoc; // PDF fájl bezárása

finally

HPDF.Free;

end;

end.