278 |
278 |
279 "Do not manually edit this!! If it is corrupted, |
279 "Do not manually edit this!! If it is corrupted, |
280 the UIHelpTool may not be able to read the specification." |
280 the UIHelpTool may not be able to read the specification." |
281 |
281 |
282 " |
282 " |
283 UIHelpTool openOnClass:ImageEditor |
283 UIHelpTool openOnClass:ImageEditor |
284 " |
284 " |
285 |
285 |
286 <resource: #help> |
286 <resource: #help> |
287 |
287 |
288 ^ #( |
288 ^ #( |
|
289 |
|
290 #colorMap |
|
291 'ColorMap functions' |
|
292 |
|
293 #colorMap1 |
|
294 'Convert to depth-1 image' |
|
295 |
|
296 #colorMap1M |
|
297 'Convert to depth-1 image plus mask' |
|
298 |
|
299 #colorMap2 |
|
300 'Convert to depth-2 image' |
|
301 |
|
302 #colorMap24 |
|
303 'Convert to depth-24 image (rgb)' |
|
304 |
|
305 #colorMap2M |
|
306 'Convert to depth-2 image plus mask' |
|
307 |
|
308 #colorMap32 |
|
309 'Convert to depth-32 image (rgba)' |
|
310 |
|
311 #colorMap4 |
|
312 'Convert to depth-4 image' |
|
313 |
|
314 #colorMap4M |
|
315 'Convert to depth-4 image plus mask' |
|
316 |
|
317 #colorMap8 |
|
318 'Convert to depth-8 image' |
|
319 |
|
320 #colorMap8M |
|
321 'Convert to depth-8 image plus mask' |
|
322 |
|
323 #colorMapTable |
|
324 'Shows a list of used colors of the image' |
|
325 |
|
326 #compressColormap |
|
327 'Remove unneeded entries from the colorMap' |
|
328 |
|
329 #cropAll |
|
330 'Find and remove all borders' |
|
331 |
|
332 #cropBottom |
|
333 'Find and remove bottom border' |
|
334 |
|
335 #cropLeft |
|
336 'Find and remove left border' |
|
337 |
|
338 #cropManual |
|
339 'Specify border(s) to remove.' |
|
340 |
|
341 #cropRight |
|
342 'Find and remove right border' |
|
343 |
|
344 #cropTop |
|
345 'Find and remove top border' |
|
346 |
|
347 #drawModeBox |
|
348 'Rectangle Drawing Mode' |
|
349 |
|
350 #drawModeCircle |
|
351 'Circle Drawing Mode' |
|
352 |
|
353 #drawModeCopy |
|
354 'Area Copy Mode' |
|
355 |
|
356 #drawModeFill |
|
357 'Flood Fill Mode' |
|
358 |
|
359 #drawModeFilledBox |
|
360 'Filled Rectangle Drawing Mode' |
|
361 |
|
362 #drawModeFilledCircle |
|
363 'Filled Circle Drawing Mode' |
|
364 |
|
365 #drawModeMaskOutsideCircle |
|
366 'Mask everything outside a Circle' |
|
367 |
|
368 #drawModeMaskOutsideRectangle |
|
369 'Mask everything outside a Rectangle' |
|
370 |
|
371 #drawModePaste |
|
372 'Paste Mode' |
|
373 |
|
374 #drawModePasteUnder |
|
375 'Paste-Under Mode' |
|
376 |
|
377 #drawModePasteWithMask |
|
378 'Paste-with-Mask Mode' |
|
379 |
|
380 #drawModePoint |
|
381 'Point Drawing Mode' |
|
382 |
|
383 #drawModeSpecial |
|
384 'Special operations (select rectangle, then choose operation)' |
|
385 |
|
386 #drawModeSpray |
|
387 'Spray Drawing Mode' |
|
388 |
|
389 #edit3DProjection |
|
390 'Generate a 3D projection' |
|
391 |
|
392 #editFlipHorizontal |
|
393 'Flip the image horizontally' |
|
394 |
|
395 #editFlipVertical |
|
396 'Flip the image vertically' |
|
397 |
|
398 #editMagnifyImage |
|
399 'Magnify the image' |
|
400 |
|
401 #editNegate |
|
402 'Invert the images colors' |
|
403 |
|
404 #editResize |
|
405 'Resize the image (preserving the old image)' |
|
406 |
|
407 #editRotate |
|
408 'Rotate the image' |
|
409 |
|
410 #fileEditMask |
|
411 'Load Mask from a File' |
|
412 |
|
413 #fileGrabImageFromScreen |
|
414 'Pick an image from the screen (specify area)' |
|
415 |
|
416 #fileGrabImageFromWindow |
|
417 'Pick an image from a window on the screen (click on window)' |
|
418 |
|
419 #fileLoadFromClass |
|
420 'Select and load an image from a resource method' |
|
421 |
|
422 #fileLoadFromFile |
|
423 'Select and load an image from a file' |
|
424 |
|
425 #fileLoadFromURL |
|
426 'Load an image from the net, given its URL' |
|
427 |
|
428 #fileNewImage |
|
429 'Create a new image' |
|
430 |
|
431 #fileNewImageFromClipboard |
|
432 'Create a new image and initialize it from the clipboard' |
|
433 |
|
434 #fileNewMaskFromClipboard |
|
435 'Paste the image in the clipboard as a mask. Must be a depth-1 image' |
|
436 |
|
437 #filePrint |
|
438 'Print' |
|
439 |
|
440 #filePrint |
|
441 'Print the image on a postscript printer' |
|
442 |
|
443 #fileSave |
|
444 'Save the image' |
|
445 |
|
446 #fileSaveAs |
|
447 'Save the image to a file' |
|
448 |
|
449 #fileSaveButtonImageAs |
|
450 'Save an image of a button with the image to a file (for html use)' |
|
451 |
|
452 #fileSaveMaskAs |
|
453 'Save the mask of the image to a file' |
|
454 |
|
455 #fileSaveMethod |
|
456 'Save the image as resource method in the current class and selector' |
|
457 |
|
458 #fileSaveMethodAs |
|
459 'Save the image as resource method in a class' |
|
460 |
|
461 #floodFillMaxError |
|
462 'Specify the max. allowed deviation from the clicked pixel in a flood-fill operation.\Pixels where the hue/light values differ less than that fraction\will be included in the fill.\The range must be between 0 and 1. With 0, only areas with exactly the same pixel will be filled.\With 1, every other pixel is included.\\When filling gradiented areas, start with small values, such as 0.05, and increase slowly.' |
|
463 |
|
464 #gropAll |
|
465 'Crop (cut off) all four sides by the amounts entered into the above fields.' |
|
466 |
|
467 #gropBottom |
|
468 'Cut off the specified number of pixels at the bottom' |
|
469 |
|
470 #gropLeft |
|
471 'Cut off the specified number of pixels at the left' |
|
472 |
|
473 #gropRight |
|
474 'Cut off the specified number of pixels at the right' |
|
475 |
|
476 #gropTop |
|
477 'Cut off the specified number of pixels at the top' |
|
478 |
|
479 #magnificationNumber |
|
480 'Shows the current magnification' |
|
481 |
|
482 #magnifyImageDown |
|
483 'Decrease magnification' |
|
484 |
|
485 #magnifyImageUp |
|
486 'Increase magnification' |
|
487 |
|
488 #mouseKeyColorMode |
|
489 'Toggle between left and right mouse button color' |
|
490 |
|
491 #nextImageInSequence |
|
492 'Go to the next image in the animated gif image sequence.' |
|
493 |
|
494 #previewView |
|
495 'Shows a preview of the image' |
|
496 |
|
497 #previousImageInSequence |
|
498 'Go to the previous image in the animated gif image sequence.' |
|
499 |
|
500 #settingsGridMagnification |
|
501 'Change the grid magnification of the edit view' |
289 |
502 |
290 #xdrawModeBox |
503 #xdrawModeBox |
291 'Rectangle' |
504 'Rectangle' |
292 |
505 |
293 #xdrawModeCopy |
506 #xdrawModeCopy |
336 'Save as method' |
546 'Save as method' |
337 |
547 |
338 #xfileSaveMethodAs |
548 #xfileSaveMethodAs |
339 'Save as Method...' |
549 'Save as Method...' |
340 |
550 |
341 #nextImageInSequence |
|
342 'Go to the next image in the animated gif image sequence.' |
|
343 |
|
344 #previousImageInSequence |
|
345 'Go to the previous image in the animated gif image sequence.' |
|
346 |
|
347 #colorMap |
|
348 'ColorMap functions' |
|
349 |
|
350 #colorMap1 |
|
351 'Convert to depth-1 image' |
|
352 |
|
353 #colorMap1M |
|
354 'Convert to depth-1 image plus mask' |
|
355 |
|
356 #colorMap2 |
|
357 'Convert to depth-2 image' |
|
358 |
|
359 #colorMap24 |
|
360 'Convert to depth-24 image (rgb)' |
|
361 |
|
362 #colorMap2M |
|
363 'Convert to depth-2 image plus mask' |
|
364 |
|
365 #colorMap32 |
|
366 'Convert to depth-32 image (rgba)' |
|
367 |
|
368 #colorMap4 |
|
369 'Convert to depth-4 image' |
|
370 |
|
371 #colorMap4M |
|
372 'Convert to depth-4 image plus mask' |
|
373 |
|
374 #colorMap8 |
|
375 'Convert to depth-8 image' |
|
376 |
|
377 #colorMap8M |
|
378 'Convert to depth-8 image plus mask' |
|
379 |
|
380 #colorMapTable |
|
381 'Shows a list of used colors of the image' |
|
382 |
|
383 #compressColormap |
|
384 'Remove unneeded entries from the colorMap' |
|
385 |
|
386 #cropAll |
|
387 'Find and remove all borders' |
|
388 |
|
389 #cropBottom |
|
390 'Find and remove bottom border' |
|
391 |
|
392 #cropLeft |
|
393 'Find and remove left border' |
|
394 |
|
395 #cropManual |
|
396 'Specify border(s) to remove.' |
|
397 |
|
398 #cropRight |
|
399 'Find and remove right border' |
|
400 |
|
401 #cropTop |
|
402 'Find and remove top border' |
|
403 |
|
404 #drawModeBox |
|
405 'Rectangle Drawing Mode' |
|
406 |
|
407 #drawModeCircle |
|
408 'Circle Drawing Mode' |
|
409 |
|
410 #drawModeCopy |
|
411 'Area Copy Mode' |
|
412 |
|
413 #drawModeFill |
|
414 'Flood Fill Mode' |
|
415 |
|
416 #drawModeFilledBox |
|
417 'Filled Rectangle Drawing Mode' |
|
418 |
|
419 #drawModePaste |
|
420 'Paste Mode' |
|
421 |
|
422 #drawModePasteUnder |
|
423 'Paste-Under Mode' |
|
424 |
|
425 #drawModePasteWithMask |
|
426 'Paste-with-Mask Mode' |
|
427 |
|
428 #drawModePoint |
|
429 'Point Drawing Mode' |
|
430 |
|
431 #drawModeSpecial |
|
432 'Special operations (select rectangle, then choose operation)' |
|
433 |
|
434 #drawModeSpray |
|
435 'Spray Drawing Mode' |
|
436 |
|
437 #editFlipHorizontal |
|
438 'Flip the image horizontally' |
|
439 |
|
440 #editFlipVertical |
|
441 'Flip the image vertically' |
|
442 |
|
443 #editMagnifyImage |
|
444 'Magnify the image' |
|
445 |
|
446 #editNegate |
|
447 'Invert the images colors' |
|
448 |
|
449 #editResize |
|
450 'Resize the image (preserving the old image)' |
|
451 |
|
452 #editRotate |
|
453 'Rotate the image' |
|
454 |
|
455 #fileGrabImageFromScreen |
|
456 'Pick an image from the screen (specify area)' |
|
457 |
|
458 #fileGrabImageFromWindow |
|
459 'Pick an image from a window on the screen (click on window)' |
|
460 |
|
461 #fileLoadFromClass |
|
462 'Select and load an image from a resource method' |
|
463 |
|
464 #fileLoadFromFile |
|
465 'Select and load an image from a file' |
|
466 |
|
467 #fileLoadFromURL |
|
468 'Load an image from the net, given its URL' |
|
469 |
|
470 #fileNewImage |
|
471 'Create a new image' |
|
472 |
|
473 #fileNewImageFromClipboard |
|
474 'Create a new image and initialize it from the clipboard' |
|
475 |
|
476 #fileNewMaskFromClipboard |
|
477 'Paste the image in the clipboard as a mask. Must be a depth-1 image' |
|
478 |
|
479 #filePrint |
|
480 'Print the image on a postscript printer' |
|
481 |
|
482 #fileSave |
|
483 'Save the image' |
|
484 |
|
485 #fileSaveAs |
|
486 'Save the image to a file' |
|
487 |
|
488 #fileSaveButtonImageAs |
|
489 'Save an image of a button with the image to a file (for html use)' |
|
490 |
|
491 #fileSaveMaskAs |
|
492 'Save the mask of the image to a file' |
|
493 |
|
494 #fileSaveMethod |
|
495 'Save the image as resource method in the current class and selector' |
|
496 |
|
497 #fileSaveMethodAs |
|
498 'Save the image as resource method in a class' |
|
499 |
|
500 #magnificationNumber |
|
501 'Shows the current magnification' |
|
502 |
|
503 #magnifyImageDown |
|
504 'Decrease magnification' |
|
505 |
|
506 #magnifyImageUp |
|
507 'Increase magnification' |
|
508 |
|
509 #mouseKeyColorMode |
|
510 'Toggle between left and right mouse button color' |
|
511 |
|
512 #previewView |
|
513 'Shows a preview of the image' |
|
514 |
|
515 #settingsGridMagnification |
|
516 'Change the grid magnification of the edit view' |
|
517 |
|
518 |
|
519 |
|
520 |
|
521 #drawModeFilledCircle |
|
522 'Filled Circle Drawing Mode' |
|
523 |
|
524 #drawModeMaskOutsideCircle |
|
525 'Mask everything outside a Circle' |
|
526 |
|
527 #drawModeMaskOutsideRectangle |
|
528 'Mask everything outside a Rectangle' |
|
529 |
|
530 #edit3DProjection |
|
531 'Generate a 3D projection' |
|
532 |
|
533 #fileEditMask |
|
534 'Load Mask from a File' |
|
535 |
|
536 |
|
537 #gropBottom |
|
538 'Cut off the specified number of pixels at the bottom' |
|
539 |
|
540 #gropLeft |
|
541 'Cut off the specified number of pixels at the left' |
|
542 |
|
543 #gropRight |
|
544 'Cut off the specified number of pixels at the right' |
|
545 |
|
546 #gropTop |
|
547 'Cut off the specified number of pixels at the top' |
|
548 |
|
549 |
|
550 ) |
551 ) |
551 |
552 |
552 "Created: / 16-02-2017 / 12:29:54 / cg" |
553 "Modified: / 17-02-2017 / 15:32:45 / cg" |
553 ! |
554 ! |
554 |
555 |
555 helpSpec |
556 helpSpec |
556 "This resource specification was automatically generated |
557 "This resource specification was automatically generated |
557 by the UIHelpTool of ST/X." |
558 by the UIHelpTool of ST/X." |
1585 tabable: true |
1586 tabable: true |
1586 model: gropBottomNow |
1587 model: gropBottomNow |
1587 autoRepeat: true |
1588 autoRepeat: true |
1588 usePreferredWidth: true |
1589 usePreferredWidth: true |
1589 ) |
1590 ) |
|
1591 (ActionButtonSpec |
|
1592 label: 'Crop All' |
|
1593 name: 'Button4' |
|
1594 layout: (LayoutFrame 133 0 148 0 237 0 176 0) |
|
1595 activeHelpKey: gropAll |
|
1596 visibilityChannel: cropBoxIsNotDialog |
|
1597 translateLabel: true |
|
1598 resizeForLabel: true |
|
1599 tabable: true |
|
1600 model: applyCropAction |
|
1601 ) |
1590 (HorizontalPanelViewSpec |
1602 (HorizontalPanelViewSpec |
1591 name: 'HorizontalPanel1' |
1603 name: 'HorizontalPanel1' |
1592 layout: (LayoutFrame 0 0.0 -30 1 -16 1.0 0 1) |
1604 layout: (LayoutFrame 0 0.0 -30 1 -16 1.0 0 1) |
1593 visibilityChannel: cropBoxIsDialog |
1605 visibilityChannel: cropBoxIsDialog |
1594 horizontalLayout: fitSpace |
1606 horizontalLayout: fitSpace |
1600 (SpecCollection |
1612 (SpecCollection |
1601 collection: ( |
1613 collection: ( |
1602 (ActionButtonSpec |
1614 (ActionButtonSpec |
1603 label: 'Cancel' |
1615 label: 'Cancel' |
1604 name: 'Button1' |
1616 name: 'Button1' |
1605 visibilityChannel: cropBoxIsDialog |
|
1606 translateLabel: true |
1617 translateLabel: true |
1607 resizeForLabel: true |
1618 resizeForLabel: true |
1608 tabable: true |
1619 tabable: true |
1609 model: cancel |
1620 model: cancel |
1610 extent: (Point 103 28) |
1621 extent: (Point 110 28) |
1611 ) |
1622 ) |
1612 (ActionButtonSpec |
1623 (ActionButtonSpec |
1613 label: 'Apply' |
1624 label: 'Apply' |
1614 name: 'Button3' |
1625 name: 'Button3' |
1615 translateLabel: true |
1626 translateLabel: true |
1616 resizeForLabel: true |
1627 resizeForLabel: true |
1617 tabable: true |
1628 tabable: true |
1618 model: applyAction |
1629 model: applyCropAction |
1619 extent: (Point 104 28) |
1630 extent: (Point 111 28) |
1620 ) |
1631 ) |
1621 (ActionButtonSpec |
1632 (ActionButtonSpec |
1622 label: 'OK' |
1633 label: 'OK' |
1623 name: 'Button2' |
1634 name: 'Button2' |
1624 visibilityChannel: cropBoxIsDialog |
|
1625 translateLabel: true |
1635 translateLabel: true |
1626 resizeForLabel: true |
1636 resizeForLabel: true |
1627 tabable: true |
1637 tabable: true |
1628 model: accept |
1638 model: accept |
1629 extent: (Point 104 28) |
1639 extent: (Point 111 28) |
1630 ) |
1640 ) |
1631 ) |
1641 ) |
1632 |
1642 |
1633 ) |
1643 ) |
1634 keepSpaceForOSXResizeHandleH: true |
1644 keepSpaceForOSXResizeHandleH: true |
|
1645 ) |
|
1646 (LabelSpec |
|
1647 label: 'Floodfill Tolerance:' |
|
1648 name: 'Label1' |
|
1649 layout: (LayoutFrame 14 0 192 0 242 0 214 0) |
|
1650 activeHelpKey: floodFillMaxError |
|
1651 visibilityChannel: cropBoxIsNotDialog |
|
1652 translateLabel: true |
|
1653 adjust: left |
|
1654 ) |
|
1655 (LabelSpec |
|
1656 label: 'Hue:' |
|
1657 name: 'Label2' |
|
1658 layout: (LayoutFrame 51 0 220 0 127 0 242 0) |
|
1659 activeHelpKey: floodFillMaxError |
|
1660 visibilityChannel: cropBoxIsNotDialog |
|
1661 translateLabel: true |
|
1662 adjust: left |
|
1663 ) |
|
1664 (InputFieldSpec |
|
1665 name: 'EntryField2' |
|
1666 layout: (LayoutFrame 132 0 220 0 190 0 242 0) |
|
1667 activeHelpKey: floodFillMaxError |
|
1668 visibilityChannel: cropBoxIsNotDialog |
|
1669 tabable: true |
|
1670 model: floodFillMaxHueError |
|
1671 type: number |
|
1672 acceptChannel: acceptChannel |
|
1673 acceptOnPointerLeave: true |
|
1674 ) |
|
1675 (LabelSpec |
|
1676 label: 'Light:' |
|
1677 name: 'Label3' |
|
1678 layout: (LayoutFrame 51 0 246 0 127 0 268 0) |
|
1679 activeHelpKey: floodFillMaxError |
|
1680 visibilityChannel: cropBoxIsNotDialog |
|
1681 translateLabel: true |
|
1682 adjust: left |
|
1683 ) |
|
1684 (InputFieldSpec |
|
1685 name: 'EntryField3' |
|
1686 layout: (LayoutFrame 132 0 246 0 190 0 268 0) |
|
1687 activeHelpKey: floodFillMaxError |
|
1688 visibilityChannel: cropBoxIsNotDialog |
|
1689 tabable: true |
|
1690 model: floodFillMaxLightError |
|
1691 type: number |
|
1692 acceptChannel: acceptChannel |
|
1693 acceptOnPointerLeave: true |
1635 ) |
1694 ) |
1636 ) |
1695 ) |
1637 |
1696 |
1638 ) |
1697 ) |
1639 ) |
1698 ) |
3971 ^ true |
4030 ^ true |
3972 |
4031 |
3973 "Created: / 03-02-2017 / 11:23:50 / cg" |
4032 "Created: / 03-02-2017 / 11:23:50 / cg" |
3974 ! |
4033 ! |
3975 |
4034 |
|
4035 cropBoxIsNotDialog |
|
4036 ^ self cropBoxIsDialog not |
|
4037 |
|
4038 "Created: / 17-02-2017 / 14:38:04 / cg" |
|
4039 ! |
|
4040 |
3976 cropBoxVisibleHolder |
4041 cropBoxVisibleHolder |
3977 |holder| |
4042 |holder| |
3978 |
4043 |
3979 (holder := builder bindingAt:#cropBoxVisibleHolder) isNil ifTrue:[ |
4044 (holder := builder bindingAt:#cropBoxVisibleHolder) isNil ifTrue:[ |
3980 builder aspectAt:#cropBoxVisibleHolder put:(holder := false asValue). |
4045 builder aspectAt:#cropBoxVisibleHolder put:(holder := false asValue). |
3981 ]. |
4046 ]. |
3982 ^ holder |
4047 ^ holder |
3983 |
4048 |
3984 "Created: / 03-02-2017 / 11:20:13 / cg" |
4049 "Created: / 03-02-2017 / 11:20:13 / cg" |
|
4050 ! |
|
4051 |
|
4052 floodFillMaxHueError |
|
4053 |holder| |
|
4054 |
|
4055 (holder := builder bindingAt:#floodFillMaxHueError) isNil ifTrue:[ |
|
4056 builder aspectAt:#floodFillMaxHueError put:(holder := 0 asValue). |
|
4057 holder onChangeEvaluate:[ imageEditView floodFillMaxHueError:holder value ]. |
|
4058 ]. |
|
4059 ^ holder |
|
4060 |
|
4061 "Created: / 17-02-2017 / 15:19:17 / cg" |
|
4062 ! |
|
4063 |
|
4064 floodFillMaxLightError |
|
4065 |holder| |
|
4066 |
|
4067 (holder := builder bindingAt:#floodFillMaxLightError) isNil ifTrue:[ |
|
4068 builder aspectAt:#floodFillMaxLightError put:(holder := 0 asValue). |
|
4069 holder onChangeEvaluate:[ imageEditView floodFillMaxLightError:holder value ]. |
|
4070 ]. |
|
4071 ^ holder |
|
4072 |
|
4073 "Created: / 17-02-2017 / 15:19:11 / cg" |
3985 ! |
4074 ! |
3986 |
4075 |
3987 hasClassAndSelectorDefinedHolder |
4076 hasClassAndSelectorDefinedHolder |
3988 ^ [ |
4077 ^ [ |
3989 |cls| |
4078 |cls| |
4354 |
4443 |
4355 "Modified: / 06-12-2016 / 12:51:36 / cg" |
4444 "Modified: / 06-12-2016 / 12:51:36 / cg" |
4356 ! |
4445 ! |
4357 |
4446 |
4358 selectedColorsChanged |
4447 selectedColorsChanged |
4359 |colorIndices| |
4448 |colorIndices selectedIndex| |
4360 |
4449 |
4361 (colorIndices := self selectedColors value) isEmptyOrNil ifTrue:[ |
4450 (colorIndices := self selectedColors value) size == 1 ifTrue:[ |
4362 self selectionOfColor value:nil |
4451 "/ a single color selected |
4363 ] ifFalse:[ |
4452 selectedIndex := colorIndices first |
4364 colorIndices size == 1 ifTrue:[ |
4453 ]. |
4365 "/ as single color selected |
4454 self selectionOfColor value:selectedIndex |
4366 self selectionOfColor value:colorIndices first |
4455 |
4367 ] ifFalse:[ |
4456 "Modified: / 17-02-2017 / 14:40:33 / cg" |
4368 "/ multipl selected |
|
4369 self selectionOfColor value:nil |
|
4370 ]. |
|
4371 ]. |
|
4372 ! |
4457 ! |
4373 |
4458 |
4374 update:something with:aParameter from:changedObject |
4459 update:something with:aParameter from:changedObject |
4375 |clrIndex image imagePreView clr changedColor cMap| |
4460 |clrIndex image imagePreView clr changedColor cMap| |
4376 |
4461 |
6819 bindings at:#gropLeftNow put:[ gropAction value:left value:0 value:0 value:0 ]. |
6904 bindings at:#gropLeftNow put:[ gropAction value:left value:0 value:0 value:0 ]. |
6820 bindings at:#gropRightNow put:[ gropAction value:0 value:right value:0 value:0 ]. |
6905 bindings at:#gropRightNow put:[ gropAction value:0 value:right value:0 value:0 ]. |
6821 bindings at:#gropTopNow put:[ gropAction value:0 value:0 value:top value:0 ]. |
6906 bindings at:#gropTopNow put:[ gropAction value:0 value:0 value:top value:0 ]. |
6822 bindings at:#gropBottomNow put:[ gropAction value:0 value:0 value:0 value:bottom ]. |
6907 bindings at:#gropBottomNow put:[ gropAction value:0 value:0 value:0 value:bottom ]. |
6823 |
6908 |
6824 bindings at:#applyAction put:[ gropAction value:left value:right value:top value:bottom ]. |
6909 bindings at:#applyCropAction put:[ gropAction value:left value:right value:top value:bottom ]. |
6825 |
6910 |
6826 (self openDialogInterface:#cropDialogSpec withBindings:bindings) |
6911 (self openDialogInterface:#cropDialogSpec withBindings:bindings) |
6827 ifFalse:[ |
6912 ifFalse:[ |
6828 firstChange ~~ true ifTrue:[ |
6913 firstChange ~~ true ifTrue:[ |
6829 imageEditView undo. |
6914 imageEditView undo. |
6830 self updateImagePreView. |
6915 self updateImagePreView. |
6831 ] |
6916 ] |
6832 ]. |
6917 ]. |
6833 |
6918 |
6834 "Created: / 07-09-1998 / 18:16:07 / cg" |
6919 "Created: / 07-09-1998 / 18:16:07 / cg" |
6835 "Modified: / 16-02-2017 / 01:33:36 / cg" |
6920 "Modified: / 17-02-2017 / 14:33:19 / cg" |
6836 ! |
6921 ! |
6837 |
6922 |
6838 doCropRight |
6923 doCropRight |
6839 "find a right border and cut it off" |
6924 "find a right border and cut it off" |
6840 |
6925 |