delphi 中dbgrid 行高怎么设置?通过代码查询数据我是这么写的:
mainfrm.ADODataSet1.Active:=false;
mainfrm.ADODataSet1.CommandText:=ulink.mysql;
mainfrm.ADODataSet1.Active:=true; mainfrm.DataSource1.DataSet:=mainfrm.ADODataSet1;
mainfrm.DBGrid1.DataSource:=mainfrm.DataSource1; //居中对齐
for i:=0 to mainfrm.DBGrid1.datasource.dataset.fieldcount-1 do
begin
mainfrm.DBgrid1.Columns[i].Title.Alignment:=taCenter;//标题居中
mainfrm.dbgrid1.Columns[i].Title.Font.Size:=12;//设置标题字号
mainfrm.dbgrid1.Columns[i].Alignment:=taCenter;//内容居中 end;
想把行高调整一下,不知道代码怎么写。
mainfrm.ADODataSet1.Active:=false;
mainfrm.ADODataSet1.CommandText:=ulink.mysql;
mainfrm.ADODataSet1.Active:=true; mainfrm.DataSource1.DataSet:=mainfrm.ADODataSet1;
mainfrm.DBGrid1.DataSource:=mainfrm.DataSource1; //居中对齐
for i:=0 to mainfrm.DBGrid1.datasource.dataset.fieldcount-1 do
begin
mainfrm.DBgrid1.Columns[i].Title.Alignment:=taCenter;//标题居中
mainfrm.dbgrid1.Columns[i].Title.Font.Size:=12;//设置标题字号
mainfrm.dbgrid1.Columns[i].Alignment:=taCenter;//内容居中 end;
想把行高调整一下,不知道代码怎么写。
mainfrm.dbgrid1.OptionsView.CellAutoHeight := True;
设置成自适应行高