#! /usr/X11R6/bin/wish wm title . "CD-Floppy-Mount" wm geo . 250x120+10+30 set menu [frame .menu -relief raised -bd 2] pack $menu -side top -fill x set file [menubutton $menu.file -text File \ -underline 0 -menu $menu.file.f] pack $file -side left set f [menu $file.f] $f add command -label Quit -command "exit 1" pack [menubutton $menu.help -text Help \ -underline 0] -side right
| Previous slide | Next slide | Back to the index | View Graphic Version |
No notes for slide 40