anchor.diff:  var
     Ed: TATSynEdit;
     Frame: TEditorFrame;
  -  Params: TAppVariantArray;
     Keymap: TATKeymap;
     {$ifdef debug_on_lexer}
     SFileName: string;
  
positive.code:     DoFocusResult;
      if bEnableEventOpened then
      begin
        SetLength(Params, 0);
        DoPyEvent(Result.Ed1, cEventOnOpen, Params);
      end;
  
      exit;
  
negative.code: 
  procedure TfmMain.DoDialogGoto;
  var
    Str: string;
  begin
    if not Assigned(fmGoto) then
  