gettextsize

Функция получения размера строки (без переносов).

Синтаксис:

s = gettextsize(str, font);

Аргументы:

Имя	Тип данных	Описание
str	`string`	Строка с текстом
font	`string`	Название шрифта текста

Описание:

gettextsize – функция получения размера строки str, отображаемой шрифтом font. Тип возвращаемого значения - комплексное число, где действительная часть соответствует ширине строки, мнимая - высоте.

Результат:

Имя	Тип данных	Описание
s	`complex`	Ширина и высота строки

Пример:

initialization 
  var TxtSize: complex = (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 (стрелка) в конец строки.

Дополнительные материалы

Нет.