gettextsize
Функция получения размера строки (без переносов).
Синтаксис
s = gettextsize(str, font);Аргументы
| Имя | Тип данных | Описание |
|---|---|---|
| str | string |
Строка с текстом |
| font | string |
Название шрифта текста |
Описание
gettextsize – функция получения размера строки str,
отображаемой шрифтом font. Тип возвращаемого значения - комплексное число,
где действительная часть соответствует ширине строки, мнимая - высоте.
Результат
| Имя | Тип данных | Описание |
|---|---|---|
| s | tcomplex |
Ширина и высота строки |
Пример
initialization
var TxtSize: tcomplex = (1,1);
//Получаем размер шрифта
TxtSize = gettextsize(TextLabel.Text,TextLabel.Font);
TextLabel1.Text = "CX=" + floattostr(real(TxtSize)) + " CY=" + floattostr(imag(TxtSize));
end;
//Сдвигаем индикатор
move((real(TxtSize),0),Line,PolyLine);В примере переменной TxtSize присваивается размер строки элемента
TextLabel, полученные ширина и высота строки отображается в элементе
TextLabel1. Полученная ширина используется для сдвигания элементов
Line, PolyLine (стрелка) в конец строки.
Дополнительные материалы
Нет.