Adds a block of text to the current page.

TextID = Doc.AddText(Text)

Adds a block of text to the current page. The text is in the current style, size and color and starts at the location specified in the current position. If the text is long it will will wrap and extend downwards until it fills the current rectangle. Text positioning in the rectangle is determined by the horizontal and vertical positioning.

The AddText function returns the Object ID of the newly added Text Object. If no text could be added then zero is returned. This will happen if a zero length string was supplied or if the rectangle was too small for even one character to be displayed.

Text is drawn word-wrapped within the current rectangle with the first character at the location specified by the Pos property. Normally the Pos property reflects the top left position of the current rectangle. However if you need to alter the position at which text drawing starts you can modify the Pos property after changing the Rect. When the text has been drawn the Pos will be updated to reflect the next text insertion point.

Character positioning is specified from the top left of the character. The FontSize determines the total line height and the character baseline is 80% of the way down from the top of the line.

The following code adds a number of chunks of text to a document. Each chunk is in a different style. This sample makes use of the fact that the Pos is updated to point to the next text insertion point after adding a piece of text.

Set theDoc = Server.CreateObject("ABCpdf3.Doc")
theDoc.Page = theDoc.AddPage()
theDoc.FontSize = 48
theF1 = theDoc.AddFont("Times-Roman")
theF2 = theDoc.AddFont("Times-Bold")
theDoc.Font = theF1
theDoc.AddText "Gallia est omnis "
theDoc.Font = theF2
theDoc.AddText "tertiam Galli appellantur "
theDoc.Font = theF1
theDoc.AddText "divisa in partes tres, "
theDoc.Font = theF2
theDoc.AddText "quarum unam incolunt "
theDoc.Font = theF1
theDoc.AddText "Belgae, aliam Aquitani. "
theDoc.Font = theF2
theDoc.AddText "tertiam Galli appellantur"
theDoc.Save "c:\docaddtext.pdf"

docaddtext.pdf