diff --git a/mff/Control.bas b/mff/Control.bas
index 98abe0a4..54bb7867 100644
--- a/mff/Control.bas
+++ b/mff/Control.bas
@@ -958,7 +958,7 @@ Namespace My.Sys.Forms
 					Case 3: nLeft = CW_USEDEFAULT: nTop = CW_USEDEFAULT: nWidth = CW_USEDEFAULT: nHeight = CW_USEDEFAULT ' WindowsDefaultBounds
 					End Select
 					Dim As Integer AControlParent(2) => {0, WS_EX_CONTROLPARENT}
-					Dim As Integer ATabStop(2) => {0,WS_TABSTOP},AGrouped(2) = >{0,WS_GROUP}
+					Dim As Integer ATabStop(2) = {0, WS_TABSTOP}, AGrouped(2) = {0, WS_GROUP}
 					If ClassName = "WebBrowser" Then
 						'Style = WS_TABSTOP Or WS_CHILD Or WS_VISIBLE
 						'ExStyle = 0
diff --git a/mff/Grid.bas b/mff/Grid.bas
index 6b499250..8ef50a8f 100644
--- a/mff/Grid.bas
+++ b/mff/Grid.bas
@@ -56,7 +56,7 @@ Namespace My.Sys.Forms
 			If ColumnIndex < FColumns.Count Then
 				Dim As GridCell Ptr Cell = FColumns.Object(ColumnIndex)
 				If Cell = 0 Then
-					Cell = New GridCell
+					Cell = New_(GridCell)
 					Cell->Column = Cast(Grid Ptr, Parent)->Columns.Column(ColumnIndex)
 					Cell->Row = Cast(Grid Ptr, Parent)->Rows.Item(Index)
 					Cell->Parent = Parent