THPDFPage.UserWidth

THPDFPage

 

Nahoru  Předchozí  Další

Vrací šířku stránky v kreslicích jednotkách, tedy 1/THotPDF.Resolution palce

 

Syntaxe Delphi:

property UserWidth: Single; // read-only

 

Syntaxe C++:

__property float UserWidth = {read=GetUserWidth};

 

Popis

Vodorovné souřadnice, okraje, velikosti fontů i hodnoty vracené TextWidth a TextHeight jsou v 1/Resolution palce. Width drží šířku stránky v bodech a při nastavení bere body, takže při Resolution jiné než 72 neodpovídá souřadnicím, kterými kreslíte. UserWidth čtěte vždy, když porovnáváte nebo kombinujete šířku stránky s kreslicími souřadnicemi — například když hledáte pravou hranu okraje, centrujete blok nebo rozhodujete, kdy musí obsah přetéct na další stránku

Při výchozí Resolution 72 se UserWidth rovná Width. Stránka dimenzovaná nastavením Width a Height kreslí v bodech bez ohledu na Resolution, a i tehdy se UserWidth rovná Width

 

Příklad kódu

program RightAlignedText;
{$APPTYPE CONSOLE}
uses
  SysUtils,
  HPDFDoc;

var
  HPDF: THotPDF;
  Text: AnsiString;
  X: Single;

begin
  HPDF:= THotPDF.Create(nil);
  try
    HPDF.FileName:= 'RightAlignedText.pdf';
    HPDF.Resolution:= 144;                    // Coordinates in 1/144 inch
    HPDF.BeginDoc;
    HPDF.CurrentPage.SetFont('Arial', [], 24); // 12 pt
    Text:= 'Right aligned with a one inch margin';
    // UserWidth is 1190 on an A4 page here; Width stays 595 points
    X:= HPDF.CurrentPage.UserWidth- 144- HPDF.CurrentPage.TextWidth(Text);
    HPDF.CurrentPage.TextOut(X, 144, 0, Text);
    HPDF.EndDoc;
  finally
    HPDF.Free;
  end;
end.

 

Viz také: Width, UserHeight, THotPDF.Resolution