证书

[控件]Dbgrideh 内容垂直居中的方法

DBgrideh内容在横向上都能直接设置左右对齐,甚至居中,但是唯独却没有设置内容的垂直居中,这在调整了高度后就会很难看,来段代码解决下。

方法如下:

 
	procedure Tform1.reflay;
 var
  Count: integer;
begin
  for Count:= 0 to DBGridEh1.Columns.Count-1 do
  begin
   DBGridEh1.Columns[Count].Layout:=tlCenter;
  end;
end;

分享到: