Программирование мультимедиа-систем. Баканов В.М. - 24 стр.

  if (FontDialog1->Execute())
   Image1->Canvas->Font = FontDialog1->Font;

  Определить высоту и ширину (в пикселах, в целях оценки возможности
вывода в нужную позицию полотна) текстовой строки можно так:

  char str[] = “Нет лучше кафедры ИТ-4”;
  …
  int y = Image1->Canvas->TextHeight(str);
  int x = Image1->Canvas->TextWidth(str);

  Соотношение между параметрами Size и Height таково (значение Size при-
нято оценивать в пунктах, причем обычно пункт=дюйм/72 ≈ 0,353 мм):

  Font->Size = -Font->Height * 72 / Font->PixelsPerInch;
  Font->Height = -Font.Size * Font->PixelsPerInch / 72;

  Отрисовывается (горизонтально слева направо) строка текста на полотне с
помощью метода TextOut (x,y – левая верхняя точки прямоугольной рамки,
мысленно охватывающей текст):

  Image1->Canvas->TextOut(x,y, “Это отрисовываемая строка”);

  Отрисовка строки с отсечением вне заданной прямоугольной области r
осуществляется методом TextRect (x,y – аналогично TextOut):

  TRect r;
  …
  r.Top = 10;
  r.Left = 10;
  r.Bottom = 100;
  r.Right = 100;
  Image1->Canvas->TextRect(r, 20, 20, "Привет, МГУПИ!");

  Для вывода текста на прозрачный фон обычно используется следующий
прием:

  Canvas->Brush->Style = bsClear;

  Для профессиональных пакетов обработки изображения обязательным яв-
ляется наличие эффектов геометрического преобразования (скручивание,
эффект линзы и т.д.); причем возможно применение этих эффектов как ко
всему, так и к выделенной части изображения. В общем случае геометриче-



                                      - 24 -