anchor.diff:      FLinesByIndex : TmIntegerDictionary;
       FMemosByName : TmStringDictionary;
       FLines : TObjectList;
  +    FMemos : TObjectList;
   
       function GetAlternateColor: TColor;
       procedure SetAlternateColor(AValue: TColor);
  
positive.code:     Name : String;
      EditorKind : TmEditingFrameEditorKind;
      Index : integer;
    end;
  
  { TmEditingFrame }
  
negative.code:     exit;
  
    curLine := FLinesByIndex.Find(aRow) as TEditorLine;
    if (not Assigned(curLine)) or curLine.ReadOnly then
      exit;
  
    if (curLine.EditorKind = ekDate) then
  