Заменить <grd.selection> адресами ячеек

[aslanbek]

мне надо заменить <grd.selection> адресами ячеек которые я хочу объединить.
Как это сделать? Помогите пожалуйста.


procedure TForm1.Button1Click(Sender: TObject);
begin
if grd.MergeCells(grd.Selection)=nil then
grd.SplitRange(grd.Col,grd.Row);
end;


function TMZMergeStringGrid.MergeCells(ARect : TGridRect): TMZRange;