DrawVerticalText

Text

Beskrivning

Ritar en textsträcka nedåt på sidan i ett namngivet teckensnitt

Syntax

Delphi

Function TPDFlib.DrawVerticalText(XPos, YPos: Double; Const FontName: WideString;
  Size: Double; Const Text: WideString): Integer;

Parametrar

XPos, YPosVar texten börjar. Den löper nedåt från den punkten
FontNameEtt installerat teckensnitt, vid namn
SizeTextstorlek i punkter
TextTexten som ska ritas

Returvärden

1Texten ritades
0Texten eller teckensnittet var tomt, storleken var inte positiv, eller teckensnittet kunde inte läsas

Anmärkningar

Ritar en enda textsträcka utan att röra läget som SetVerticalWritingMode satt, så en enstaka vertikal text kan placeras på en sida som i övrigt har horisontell text

Se även

SetVerticalWritingMode, GetVerticalTextHeight, DrawShapedText