AdvstringGrid设置标题行对齐方式

1. procedure Tfrmmain.AdvStringGrid1GetAlignment(Sender: TObject; ARow,
2.   ACol: Integer; var HAlign: TAlignment; var VAlign: TVAlignment);
3. begin
4.   if ARow=0 then
5.   begin
6.      HAlign := taCenter;
7.      VAlign := vtaCenter;
8.   end;  

AdvstringGrid好像没有直接提供设置列标题对齐的方式，但可以在事件中来设置对齐，用到的事件是GetAlignment事件，只需要在Arow参数为0时，把HAlign设置为taCenter、VAlign设置为Vtacenter就可以实现水平垂直剧中对齐。