Межстрочный интервал в label

[Серёга Русич]

Доброго времени суток, товарищи!
Есть текст, который я получаю из StringGrida и должен наложить его на графическую форму (то бишь на Image). Фон у накладываемого текста должен быть прозрачным, поэтому было решено использовать Label.

Сама проблема в следующем:
Накладываемый текст достаточно длинный, его необходимо переносить на другую строку (или даже на несколько строк), но стандартный межстрочный интервал, используемый лейблом - не подходит, т.к. на форме, на которую накладывается текст - расстояние между строк куда больше.

Отсюда вопрос: как это можно реализовать? Сделать несколько лейблов и каким-то образом резать текст по определенной длине, использовать другой компонент, или же есть возможность каким-то образом просто изменить интервал у стандартного лейбла?
Заранее благодарю за ответы!

[Аватар]

PaintBox и рисуй в нем текст как хош, хоть по диагонали ))

[Серёга Русич]

Сообщение от Аватар

PaintBox и рисуй в нем текст как хош, хоть по диагонали ))

Уж очень я обрадовался этому компоненту, решил, как мне показалось - и другую проблему (поворот текста на определенный градус), пока тестировал
Но... Решение мне нужно использовать перед репеинтом формы (Form2.Repaint), а после репеинта скриншотом сохранить форму. Так вот, после репеинта с пейнтбокса все пропадает.
Информации по перерисовке данных в этом компоненте, к сожалению, не нашел

Вот кусочек кода:

var
  OldFont: HFONT;
  FontData: TLogFont;
  XForm: TXForm;
  saveIndex: integer;
begin

  with Form2.PaintBox1, Canvas do

  if random<0.5 then begin

    getobject(Font.Handle, sizeof(FontData), @fontdata);
    FontData.lfEscapement:=2700;
    FontData.lfOrientation:=2700;

    OldFont:=SelectObject(Handle, CreateFontIndirect(FontData));
    try
      TextOut(Width div 2, Height div 2, 'ТекстТекстТекст');
    finally
      deleteobject(SelectObject(Handle, OldFont));
    end;
  end

[Аватар]

Рисовать нужно в событии OnPaint бокса, тогда не пропадет. Repaint формы заставит прорисоваться все визуальные компоненты

[Серёга Русич]

Сообщение от Аватар

Рисовать нужно в событии OnPaint бокса, тогда не пропадет. Repaint формы заставит прорисоваться все визуальные компоненты

Спасибо! Разобрался с этим моментом
Я же правильно понял, что рисование текста на этой форме идет по тому же принципу, что и Canvas? То бишь я указываю позицию по осям XY и выводимый текст

Это либо не совсем подходит, либо я никак не могу уловить суть, попробую уточнить задачу:
Есть текст. Текст динамический, все время разной длины, его нужно вставить поверх изображения (не обязательно "встраивать", можно просто поверх, тем же label'ом, это не важно). Если текст выходит за границы выделенного ему поля - он автоматически переносится на другую строку, но строка должна находиться ниже, чем дает стандартный интервал того же лейбла