delphi 中dbgrid 行高怎么设置?通过代码
查询数据我是这么写的:mainfrm.ADODataSet1.Active:=false;mainfrm.ADODataSet1.CommandText:=ulink.m...
查询数据我是这么写的:
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;
想把行高调整一下,代码怎么写?
知道方法了,这么设置的:
TStringGrid(dbgrid1).DefaultRowHeight:=21;//设置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;
想把行高调整一下,代码怎么写?
知道方法了,这么设置的:
TStringGrid(dbgrid1).DefaultRowHeight:=21;//设置DBGRID行高 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询