anchor.diff:      Name : String;
       EditorKind : TmEditingFrameEditorKind;
       Index : integer;
  +    ReadOnly : boolean;
     end;
   
   { TmEditingFrame }
  
positive.code: begin
    curLine := FLinesByName.Find(aName) as TEditorLine;
    Result := FValueListEditor.Rows[curLine.Index + 1].Strings[1];
  end;
  
  function TmEditingFrame.GetValueFromMemo(const aName: string; const aTrimValue : boolean): string;
  
negative.code:     FLinesByIndex : TmIntegerDictionary;
      FMemosByName : TmStringDictionary;
      FLines : TObjectList;
      FMemos : TObjectList;
  
      function GetAlternateColor: TColor;
      procedure SetAlternateColor(AValue: TColor);
  