anchor.diff:    grid.Update;
   end;
   
  -procedure TfrmLangTable.EditClick(Sender: TObject);
  +procedure TfrmLangTable.btnEditClicked(Sender: TObject);
   var
     frm : TfrmTextEdit;
     tr : TatsTextRow;
  
positive.code:     procedure menuProcSave(Sender: TObject);
      procedure menuProcOpen(Sender: TObject);
      procedure menuProcNew(Sender: TObject);
  
      procedure EditClick(Sender : TObject);
  
    end;
  
  
  
negative.code:     Hint := '';
      ImageName := '';
      TabOrder := 5;
      OnClick := @btnEditClicked;
    end;
  
    {@VFD_BODY_END: frmLangTable}
  