25    set fen .fen_impr
26    catch {destroy $fen}
27    toplevel $fen
28    wm withdraw $fen
29    wm title $fen [ashare::mess ihm 247]
30    wm transient $fen .
31    grab set $fen
38    print_conf_list $fen
40    wm deiconify $fen
45 proc print_conf_list { fen } {  argument
62 …$MenuImpr entryconfigure 0 -font $astk::ihm(font,labmenu) -command "print_conf_para $fen.liste \"$…
65 …ont $astk::ihm(font,labmenu) -variable impr_sel -command "print_conf_para $fen.liste \"$astk::prin…
68 …mess ihm 255] -font $astk::ihm(font,labmenu) -variable impr_sel -command "add_print $fen $MenuImpr"
75       $MenuImpr entryconfigure 0 -font $astk::ihm(font,labmenu) -command "add_print $fen $MenuImpr"
82          -bd 0 -command "grab release $fen ; aff_aide . 190"
89          -command "annule_mod_print $fen"
92          -command "save_print ; destroy $fen ; grab release $fen"
98       -command "del_print $fen"
103 proc print_conf_para {fen impr} {
152 proc annule_mod_print { fen } {  argument
189       destroy $fen
190       grab release $fen
192       raise $fen
199 proc add_print { fen men } {
203    grab release $fen
210    getValue_fen $fen 255 258 $valint "" non_vide
212    grab set $fen
235       print_conf_list $fen
236       raise $fen
239       print_conf_para $fen "$impr_sel"
240       raise $fen
246 proc del_print { fen } {  argument
262       raise $fen
293    print_conf_list $fen
294    raise $fen