anchor.diff:    DoPyEvent(Sender as TATSynEdit, cEventOnClick, ['"'+StateString+'"']);
   end;
   
  -function TEditorFrame.GetSplitPos: double;
  +function TEditorFrame.GetSplitPosCurrent: double;
   begin
     if not Splitted then
       Result:= 0
  
positive.code:   Ed2.OnChange:= @EditorOnChange2;
    Ed1.EditorIndex:= 0;
    Ed2.EditorIndex:= 1;
  
    FSplitHorz:= true;
    Splitted:= false;
  
negative.code:     al:= alRight;
    Splitter.Align:= al;
    Ed2.Align:= al;
  
    //restore relative splitter ratio (e.g. 50%)
    SplitPos:= SplitPos;
  end;
  
  procedure TEditorFrame.SetSplitPos(AValue: double);
  