Improve working with DrawingArea (more shapes, copy DrawingArea into DrawingArea)