在delphi中使用stringgrid旋转文本有多简单？

Question

在stringgrid（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';