Changeset 82 for trunk/MultiChannelUSB
- Timestamp:
- Nov 30, 2009, 12:36:23 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/MultiChannelUSB/UserInterface.tcl
r78 r82 5 5 package require usb 6 6 7 wm minsize . 900 7207 wm minsize . 800 600 8 8 9 9 namespace eval ::mca { … … 68 68 ${config(2)}.polar1 select 69 69 ${config(2)}.polar2 select 70 ${config(2)}.polar3 select 70 71 } 71 72 … … 868 869 869 870 grid rowconfigure . 0 -weight 1 870 grid columnconfigure . 0 -weight 0 -minsize 80871 grid columnconfigure . 0 -weight 0 -minsize 50 871 872 grid columnconfigure . 1 -weight 1 872 873 … … 892 893 set answer [tk_messageBox -icon error -type retrycancel \ 893 894 -message {Cannot access USB device} -detail $usb_handle] 894 if {[string equal $answer cancel]} break895 if {[string equal $answer cancel]} exit 895 896 } 896 897
Note:
See TracChangeset
for help on using the changeset viewer.