Bug ZJJL, error with modify FormulaMemo & RelaFile

DataModules/ZJJLDm.dfm

@@ -101,6 +101,12 @@ object ZJJLData: TZJJLData
       end
       item
         FieldName = 'DrawingCode'
+      end
+      item
+        FieldName = 'FormulaMemo'
+      end
+      item
+        FieldName = 'RelaFile'
       end>
     BeforeValueChange = sdvZJJLBeforeValueChange
     Left = 40

Frames/ZJJLFme.pas

@@ -285,7 +285,9 @@ begin
   for iRowIndex := 0 to zgDetailInfo.RowCount - 1 do
     zgDetailInfo[0, iRowIndex].Align := gaTopLeft;
   zgDetailInfo.RowHeights[Integer(riFormulaMemoValue)] := 57;
-  zgDetailInfo.RowHeights[Integer(riRelaFileValue)] := 57;
+  zgDetailInfo.Cells[0, Integer(riFormulaMemoValue)].Align := gaTopLeft;
+  zgDetailInfo.RowHeights[Integer(riRelaFileValue)] := 57;              
+  zgDetailInfo.Cells[0, Integer(riRelaFileValue)].Align := gaTopLeft;
 end;
 
 procedure TZJJLFrame.zgZJJLCurrentChanged(Sender: TObject; Col,