在delphi中调整stringgrid列的大小

Question

我想要一个Stringgrid。 我更改列的大小。

该Stringgrid已连接到数据库。 但是，我尝试了不同的方法。 列未更改。 我该怎么办？

Answer 1

不确定“长度”是什么意思，即宽度或高度。

此代码将更改左侧列的宽度：

procedure TForm1.Button1Click(Sender: TObject);
begin
  SG1.ColWidths[0] := SG1.ColWidths[0] + 10;
end;

该链接将向您展示如何“自动调整”网格的列宽：

如何使StringGrid的列适合网格的宽度？

如果您实际上是要指定单元格的高度，则可以一次执行以下操作：

procedure TForm1.btnHeightClick(Sender: TObject);
begin
  SG1.RowHeights[1] := SG1.RowHeights[1] + 10;  //  NB Row 0 is the column header
end;

或者，您可以像这样一次设置所有行的高度：

procedure TForm1.btnHeightsClick(Sender: TObject);
begin
  SG1.DefaultRowHeight := SG1.DefaultRowHeight + 10;
end;