Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Find & replace GUI working.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2017-09-16 21:05:26 +00:00
parent c3c7bb858e
commit 27f402555b
1 changed files with 12 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
repository/Grafoscopio/GrafoscopioReplace.class.st
View File

@ -56,12 +56,13 @@ GrafoscopioReplace >> initializeWidgets [
ok := self newButton ok := self newButton
label: 'OK'; label: 'OK';
action: [ action: [
self returnValues. ok state: true.
self inspect. self window close. ] .
self window close ].
cancel := self newButton cancel := self newButton
label: 'Cancel'; label: 'Cancel';
action: [ self window close ]. action: [
cancel state: true.
self window close ].
self focusOrder self focusOrder
add: find; add: find;
add: replace; add: replace;
@ -97,10 +98,12 @@ GrafoscopioReplace >> replace: anObject [
{ #category : #initialization } { #category : #initialization }
GrafoscopioReplace >> returnValues [ GrafoscopioReplace >> returnValues [
^ Dictionary new self ok state
at: 'find' put: find getText; ifFalse: [ ^ self ]
at: 'replace' put: replace getText; ifTrue: [^ Dictionary new
yourself at: 'find' put: find getText;
at: 'replace' put: replace getText;
yourself]
] ]
{ #category : #api } { #category : #api }