Txt-Text object

From Vectorlab
Jump to: navigation, search

Function to create a text object. Returns a handle to the text object created. Load the routine T_WriteText before using this. By Orso B. Schmid

{ Orso *********************************************** }
{ calls T_WriteText and returns a handle to the text object }
FUNCTION T_TxtObj(theText: DYNARRAY[] OF CHAR; tx, ty, maxTWidth: REAL; tJust, tAlign: INTEGER): HANDLE;
		T_WriteText(theText, tx, ty, maxTWidth, tJust, tAlign);
		T_TxtObj := LNewObj;