anchor.diff:      FFoldTodo:= '';
       EditorSetFoldString(Editor, S);
     end;
  +
  +  if FTopLineTodo>0 then
  +  begin
  +    Editor.LineTop:= FTopLineTodo;
  +    FTopLineTodo:= 0;
  +  end;
   end;
   
   procedure TEditorFrame.DoOnUpdateStatus;
  
positive.code:     FLocked: boolean;
      FTabColor: TColor;
      FFoldTodo: string;
      FTabKeyCollectMarkers: boolean;
      FTagString: string;
      procedure DoOnChangeCaption;
  
negative.code:   Editor.Update;
    if Splitted then
      Editor2.Update;
  end;
  
  function TEditorFrame.DoPyEvent(AEd: TATSynEdit; AEvent: TAppPyEvent;
  