THPDFPage.AddLineAnnotation

THPDFPage

Lägger till en ny Line-annotering på aktuell sida

Delphi syntax:

procedure AddLineAnnotation ( Contents: AnsiString; BeginPoint: THPDFCurrPoint; EndPoint: THPDFCurrPoint; Color: TColor = clRed );

TPDFCurrPoint defines a point

Unit
HPDFDoc

type
    THPDFCurrPoint = record
        X: Extended;
        Y: Extended;
end;

Description:
The THPDFCurrPoint type defines a pixel location. X specifies the horizontal coordinate of the point, Y specifies the vertical coordinate.

C++ syntax:

void __fastcall AddLineAnnotation ( AnsiString Contents, THPDFCurrPoint &BeginPoint, THPDFCurrPoint &EndPoint, Graphics::TColor Color );

Beskrivning

Use AddLineAnnotation to add new Line annotation specified text message ( Contents), begin point, end point and color on the current page.

Overload with line-ending styles (HotPDF v2.119.16)

procedure AddLineAnnotation ( Contents: AnsiString; BeginPoint, EndPoint: THPDFCurrPoint; BeginStyle, EndStyle: THPDFLineEndingStyle; Color: TColor = clRed );

Den här överlagringen skriver PDF-arrayen /LE [/<begin> /<end>] för linjeändar enligt ISO 32000-1 §12.5.6.7 Table 175 + Table 176. Visaren ritar sedan ut de angivna ändpunktsmarkeringarna (pilar, streck, former) utan att anroparen behöver rita dem på sidan. THPDFLineEndingStyle täcker hela uppsättningen i Table 176:

   lesNone — no endpoint marker (PDF spec default)
   lesSquare — filled square
   lesCircle — filled circle
   lesDiamond — filled diamond
   lesOpenArrow — open arrowhead
   lesClosedArrow — triangular closed arrowhead
   lesButt — short perpendicular tick
   lesROpenArrow — reverse-direction open arrow
   lesRClosedArrow — reverse-direction closed arrow
   lesSlash — ~30° clockwise short tick

Exempel

PDF.CurrentPage.AddLineAnnotation('Width = 120mm',
  Point1, Point2, lesClosedArrow, lesClosedArrow, clBlue);