Clone pictures

Hello,
What is the cleanest way to avoid the kind of problem I encounter with pictures?
When I modify the final picture the original one is modified too.

Ex:

[code]Canvas_Original.Backdrop = Picture_Original

Picture_Final = New Picture( Picture_Original.Width, Picture_Original.Height, 32 )
Picture_Final = Picture_Original // I declare that at the beginning both pictures are the same.
Surf_Final = Picture_Final.RGBSurface

Image processing

Canvas_Final.Backdrop = Picture_Final[/code]

And both pictures are modified.
Thanks for your help.

like this:

Public Function Clone(p as Picture) as Picture Dim r As New Picture(p.Width, p.Height) r.Graphics.DrawPicture p, 0, 0 Return r End Function

Thank youu Christian,
Indeed it is more logical to draw an image in another one than to pose the equality between both.
Thanks again.