Lines Matching full:options
110 # Proc Options creates the options window.
112 proc Options {} {
116 catch {destroy .options}
117 toplevel .options -class Options
118 wm title .options "Set Image Options"
119 wm group .options .
120 wm transient .options .
121 wm geometry .options \
124 # Create options window frame.
126 frame .options.input_title
127 label .options.input_title.label -text "Input"
128 pack .options.input_title.label
129 pack .options.input_title
130 frame .options.input -relief sunken -borderwidth 2
131 frame .options.input.checks
132 checkbutton .options.input.checks.border -text "Borders" -width 11 \
134 checkbutton .options.input.checks.frame -text "Frame" -width 11 \
136 checkbutton .options.input.checks.screen -text "Screen" -width 11 \
138 checkbutton .options.input.checks.descend -text "Descend" -anchor w \
140 pack .options.input.checks.border .options.input.checks.frame \
141 .options.input.checks.screen .options.input.checks.descend -side left
142 pack .options.input.checks
143 frame .options.input.delay
144 label .options.input.delay.label -text "Delay:" -width 9 -anchor w
145 scale .options.input.delay.scale -orient horizontal -length 11c \
147 pack .options.input.delay.label .options.input.delay.scale -side left
148 pack .options.input.delay
149 frame .options.input.id
150 label .options.input.id.window -text "Window:" -width 9 -anchor w
151 entry .options.input.id.window_entry -width 18 -relief sunken \
153 label .options.input.id.display -text "Display:"
154 entry .options.input.id.display_entry -width 18 -relief sunken \
156 pack .options.input.id.window .options.input.id.window_entry \
157 .options.input.id.display .options.input.id.display_entry -side left
158 pack .options.input.checks .options.input.delay .options.input.id \
160 pack .options.input.id -pady 1m
161 pack .options.input -expand 1 -fill both
162 frame .options.processing_title
163 label .options.processing_title.label -text "Image Processing"
164 pack .options.processing_title.label
165 pack .options.processing_title
166 frame .options.processing -relief sunken -borderwidth 2
167 frame .options.processing.checks
168 checkbutton .options.processing.checks.dither -text "Dither" -width 11 \
170 checkbutton .options.processing.checks.negate -text "Negate" -width 11 \
172 checkbutton .options.processing.checks.monochrome -text "Monochrome" \
174 checkbutton .options.processing.checks.trim -text "Trim" -anchor w \
176 pack .options.processing.checks.dither .options.processing.checks.negate \
177 .options.processing.checks.monochrome .options.processing.checks.trim \
179 pack .options.processing.checks
180 frame .options.processing.colors
181 label .options.processing.colors.label -text "Colors:" -width 9 -anchor w
182 scale .options.processing.colors.scale -orient horizontal -length 11c \
184 pack .options.processing.colors.label .options.processing.colors.scale \
186 pack .options.processing.colors
187 frame .options.processing.rotate
188 label .options.processing.rotate.label -text "Rotate:" -width 9 -anchor w
189 scale .options.processing.rotate.scale -orient horizontal -length 11c \
191 pack .options.processing.rotate.label .options.processing.rotate.scale \
193 pack .options.processing.rotate
194 pack .options.processing.checks .options.processing.colors \
195 .options.processing.rotate -padx 1m -anchor w
196 pack .options.processing -expand 1 -fill both
197 frame .options.output_title
198 label .options.output_title.label -text "Output"
199 pack .options.output_title.label
200 pack .options.output_title
201 frame .options.output -relief sunken -borderwidth 2
202 frame .options.output.checks
203 checkbutton .options.output.checks.compress -text "Compress" -width 11 \
205 checkbutton .options.output.checks.interlace -text "Interlace" -width 11 \
207 checkbutton .options.output.checks.verbose -text "Verbose" -anchor w \
209 pack .options.output.checks.compress .options.output.checks.interlace \
210 .options.output.checks.verbose -side left
211 pack .options.output.checks
212 frame .options.output.scene
213 label .options.output.scene.label -text "Scene:" -width 9 -anchor w
214 scale .options.output.scene.scale -orient horizontal -length 11c \
216 pack .options.output.scene.label .options.output.scene.scale -side left
217 pack .options.output.scene
218 frame .options.output.comment
219 label .options.output.comment.label -text "Comment:" -width 9 -anchor w
220 entry .options.output.comment.entry -width 45 -relief sunken \
222 pack .options.output.comment.label .options.output.comment.entry \
224 pack .options.output.comment
225 frame .options.output.label
226 label .options.output.label.label -text "Label:" -width 9 -anchor w
227 entry .options.output.label.entry -width 45 -relief sunken \
229 pack .options.output.label.label .options.output.label.entry -side left
230 pack .options.output.label
231 frame .options.output.id
232 label .options.output.id.page -text "Page:" -width 9 -anchor w
233 entry .options.output.id.page_entry -width 18 -relief sunken \
235 label .options.output.id.density -text "Density:"
236 entry .options.output.id.density_entry -width 18 -relief sunken \
238 pack .options.output.id.page .options.output.id.page_entry \
239 .options.output.id.density .options.output.id.density_entry -side left
240 pack .options.output.checks .options.output.scene \
241 .options.output.comment .options.output.label .options.output.id \
243 pack .options.output.id -pady 1m
244 pack .options.output -expand 1 -fill both
245 button .options.button -text Ok -command {destroy .options}
246 pack .options.button
247 bind .options <Return> {destroy .options}
249 # Map options window.
251 pack .options.input_title .options.input .options.processing_title \
252 .options.processing .options.output_title .options.output .options.button \
561 button .buttons.options -text Options -command Options
562 pack .buttons.snap .buttons.options -side left -expand 1
571 # Initalize snap options.