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