DrawVerticalText

Text

Description

Draws one run of text down the page in a named face.

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

XPos, YPos	Where the run starts. It runs downwards from there.
FontName	An installed face, by name.
Size	Text size in points.
Text	The text to draw.

1	The run was drawn.
0	The text or the face was empty, the size was not positive, or the face could not be read.

Draws one run without touching the mode set by SetVerticalWritingMode, so a single vertical caption can sit in an otherwise horizontal page.