怎么合并stringgrid的单元格，在合并格子里输入文字能居中

如何合并stringgrid的单元格，在合并格子里输入文字能居中

在Delphi中，如何合并stringgrid的单元格，在合并格子里输入文字能居中。不是效果上的，而是可以打印出来的。最好给出相关的代码，万分感谢！

------解决方案--------------------
StringGrid不能真正的合并单元格 
只能自己画 
例子： 
合并第三行第二、三两格 
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; 
Rect: TRect; State: TGridDrawState); 
begin 
if(ARow = 2) and (ACol = 2) then 
begin 
Rect.Left := Rect.Left -2; 

end; 
if(ARow = 2) and (ACol = 1) then 
begin 
Rect.Right := Rect.Right + 2; 

end; 
StringGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, StringGrid1.Cells[ACol, ARow]) ; 
end; 
------解决方案--------------------
StringGrid不是Excel，你要的功能要找第3方控件 
------解决方案--------------------
如果你想做这个，不要用StringGrid，不如用DrawGrid，可能更灵活一些 
------解决方案--------------------
哈哈,有现成的东西 xlgrid 并且有全套代码