Как просто повернуть текст в сетке в Delphi?

Question

Является ли простой способ поворота текста в сетке (90 и 45 градусов)? Или есть БЕСПЛАТНЫЙ компонент типа TStringGrid с вращением текста в ячейке?

Answer 1

Вы можете использовать ZColorStringGrid компонент (бесплатно).Компонент имеет дополнительные свойства для каждой ячейки (вращение текста, отступ, цвет, выравнивание).Поддержка многострочного текста (и возможность поворота многострочного текста) и объединение ячеек.

Пример кода:

  ZColorStringGrid1.CellStyle[0, 1].Font.Name := 'Tahoma';
  ZColorStringGrid1.CellStyle[0, 1].Font.Size := 12;
  ZColorStringGrid1.CellStyle[0, 1].Rotate := 90;
  ZColorStringGrid1.Cells[0, 1] := 'Rotate' + sLineBreak + 'text' + sLineBreak + '90 degrees';