ImageField.TextHeight : Integer
Высота выбранного шрифта.

Метод ImageField.TextHeight возвращает высоту выбранного шрифта в пикселях. Шрифт можно выбрать с помощью метода SetFont.

Пример:

Procedure OnCreate;
Var
  X, Y : Integer;
Begin
  Img.Resize(256, 256);
  Img.SetFont('Arial', 80, False, False, False);
  X := (Img.Width - Img.TextWidth('Привет')) div 2;
  Y := (Img.Height - Img.TextHeight) div 2;
  Img.Text(X, Y, 0xFFC080, 'Привет');
End;                  

Результат работы:

© RTIT