- 人气:
- 放大
- 缩小
- 二维码
- 赞赏
delphi设置DBGrid每列自动居中
Delphi中DBGrid每列自动居中
我的方案是在表单创建的时候遍历DBGrid每列的的Alignment属性并给它赋值居中属性。
procedure TPatHomePage.FormCreate(Sender: TObject);
var i,j:Integer;
begin
j:=dbgrd1.Columns.Count-1;
for i:=0 to j do
begin
dbgrd1.Columns.Items[i].Title.Alignment:=taCenter;
end;
end;
end.
————————————————
原文链接:https://blog.csdn.net/qxqx451/article/details/83144354