anchor.diff:    ShowHint := true;
     TextBuffer.AddNotifyHandler(senrUndoRedoAdded, @changeNotify);
     //
  +  fPositions := TCESynMemoPositions.create(self);
     fMultiDocSubject := TCEMultiDocSubject.create;
     subjDocNew(TCEMultiDocSubject(fMultiDocSubject), self);
   end;
  
positive.code: uses
    graphics, ce_interfaces;
  
  constructor TCESynMemo.Create(aOwner: TComponent);
  begin
    inherited;
  
negative.code: 
  procedure TCESynMemo.KeyDown(var Key: Word; Shift: TShiftState);
  begin
    if Key in [VK_PRIOR, VK_NEXT] then
      fPositions.store;
    //
    inherited;
    identifierToD2Syn;
    //
  