let capture_ecran () =
        Graphics.set_window_title "Projet Puzzle";
(*        zenity_info "Choisir un fichier ou ecrire la capture d'ecran :";*)
        let image_direction = (ask_value "Donnez un nom de fichier ou ecrire la capture d'ecran (au format .jpg):" ()) in
        faire ("import -silent -window \"Projet Puzzle\" "^image_direction)