[控件]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;