Функции для вывода текста

procedure DrawText(x, y, w, h: real; text: object; align: Alignment := Alignment.Center; angle: real := 0.0);
        Выводит текстовое представление объекта в прямоугольник размера (w,h) с координатами левого верхнего угла (x,y)
procedure DrawText(x, y, w, h: real; text: object; color: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
        Выводит текстовое представление объекта указанным цветом в прямоугольник (x,y,w,h)
procedure DrawText(rect: GRect; text: object; align: Alignment := Alignment.Center; angle: real := 0.0);
        Выводит текстовое представление объекта в указанный прямоугольник
procedure DrawText(rect: GRect; text: object; color: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
        Выводит текстовое представление объекта в указанный прямоугольник указанным цветом
procedure DrawText(x, y, w, h: real; text: object; f: FontOptions; align: Alignment; angle: real);
        Выводит строку в прямоугольник (x,y,w,h) указанным шрифтом
function TextHeight(text: string): real;
        Высота текста при выводе
function TextHeight(text: string; f: FontOptions): real;
        Высота текста при выводе заданным шрифтом
procedure TextOut(x, y: real; text: object; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
        Выводит текстовое представление объекта в позицию (x,y)
procedure TextOut(x, y: real; text: object; color: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
        Выводит текстовое представление объекта в позицию (x,y) указанным цветом
procedure TextOut(x, y: real; text: object; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
        Выводит текстовое представление объекта в позицию (x,y) указанным шрифтом
procedure TextOut(pos: Point; text: object; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
        Выводит текстовое представление объекта в позицию pos
procedure TextOut(pos: Point; text: object; color: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
        Выводит текстовое представление объекта в позицию pos указанным цветом
procedure TextOut(pos: Point; text: object; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
        Выводит текстовое представление объекта в позицию pos указанным шрифтом
function TextSize(text: string): Size;
        Размер текста при выводе
function TextSize(text: string; f: FontOptions): Size;
        Размер текста при выводе заданным шрифтом
function TextWidth(text: string): real;
        Ширина текста при выводе
function TextWidth(text: string; f: FontOptions): real;
        Ширина текста при выводе заданным шрифтом