在delphi中调整列stringgrid的大小

时间:2016-02-08 12:17:46

标签: delphi delphi-xe8 stringgrid

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

此Stringgrid已连接到数据库。但是,我尝试了不同的方法;专栏没有改变。我该怎么办?

1 个答案:

答案 0 :(得分:3)

不确定“长度”是什么意思,即它们的宽度或高度。

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

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

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

How do I make a StringGrid's columns fit the grid's width?

如果您实际上意味着细胞的高度,您可以像这样一次这样做:

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;