THPDFPage.UserWidth

THPDFPage

Geeft de breedte van de pagina terug in tekeneenheden, 1/THotPDF.Resolution inch

Delphi syntax:

property UserWidth: Single; // read-only

C++ syntax:

__property float UserWidth = {read=GetUserWidth};

Beschrijving

X-coördinaten, marges, fontgroottes en de waarden die TextWidth en TextHeight teruggeven zijn in 1/Resolution inch. Width bewaart de paginabreedte in punten en neemt punten aan wanneer je die instelt, dus bij een andere Resolution dan 72 komt die niet overeen met de coördinaten waarmee je tekent. Lees UserWidth zodra je de paginabreedte met tekencoördinaten vergelijkt of combineert, bijvoorbeeld om de rechterrand van de marge te vinden, een blok te centreren of te bepalen wanneer content naar de volgende pagina moet

Bij de standaard Resolution van 72 is UserWidth gelijk aan Width. Een pagina waarvan je het formaat instelt via Width en Height tekent in punten, ongeacht de Resolution, en UserWidth is dan ook gelijk aan Width

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.

Zie ook: Width, UserHeight, THotPDF.Resolution