How to ResizeToFit a cell with multi-line text in WinForms GridGroupingControl?

//Event hooking in constructor.
this.gridGroupingControl1.TableModel.QueryRowHeight += new GridRowColSizeEventHandler(TableModel_QueryRowHeight);
//This event is triggered when the row height is changed.
void TableModel_QueryRowHeight(object sender, GridRowColSizeEventArgs e)
 {
     if (e.Index > 0) 
        {
          IGraphicsProvider graphicsProvider = this.gridGroupingControl1.TableModel.GetGraphicsProvider();
          Graphics g = graphicsProvider.Graphics;
          GridStyleInfo style = this.gridGroupingControl1.TableModel[e.Index, 2];
          GridCellModelBase model = style.CellModel;
          e.Size = model.CalculatePreferredCellSize(g, e.Index, 2, style, GridQueryBounds.Height).Height;
          e.Handled = true;
        }
 }

'Event hooking.
AddHandler gridGroupingControl1.TableModel.QueryRowHeight, AddressOf TableModel_QueryRowHeight
'This event gets triggered when the row height is changed.
Private Sub TableModel_QueryRowHeight(ByVal sender As Object, ByVal e As GridRowColSizeEventArgs)
 If e.Index > 0 Then
     Dim graphicsProvider As IGraphicsProvider = Me.gridGroupingControl1.TableModel.GetGraphicsProvider()
     Dim g As Graphics = graphicsProvider.Graphics
     Dim style As GridStyleInfo = Me.gridGroupingControl1.TableModel(e.Index, 2)
     Dim model As GridCellModelBase = style.CellModel
     e.Size = model.CalculatePreferredCellSize(g, e.Index, 2, style, GridQueryBounds.Height).Height
     e.Handled = True
 End If
End Sub