let
glade_file =
Filename
.concat
Cam_installation
.glade_dir
"tdl.glade"