AdvStringGrid 单元格合并之后数据为什么只是横向居中呢？

procedure TFM_Exception.AdvStringGrid2etAlignment(Sender: TObject; ARow,
  ACol: Integer; var HAlign: TAlignment; var VAlign: TVAlignment);
begin
      HAlign:=taCenter;
      VAlign:=vtaCenter;
end;

AdvStringGrid2.MergeCells(2,3,2,2);
AdvStringGrid2.cells[2,3]:='10';
为什么这个10只是横向居中呢？
[解决办法]
AdvStringGrid2.MergeCells(2,3,2,2);
AdvStringGrid2.cells[2,3]:='10';
AdvStringGrid2.HAlign:=taCenter;
AdvStringGrid2.VAlign:=vtaCenter;

这么 试一下

[解决办法]

AdvStringGrid2.HAlign:=taCenter;
AdvStringGrid2.VAlign:=vtaCenter;