equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 2013 by Claus Gittinger |
4 COPYRIGHT (c) 2013 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
8 be provided or otherwise made available to, or used by, any |
10 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
11 other person. No title to or ownership of the software is |
10 hereby transferred. |
12 hereby transferred. |
11 " |
13 " |
12 "{ Package: 'stx:libtool' }" |
14 "{ Package: 'stx:libtool' }" |
|
15 |
|
16 "{ NameSpace: Smalltalk }" |
13 |
17 |
14 View subclass:#CodeCompletionHelpView |
18 View subclass:#CodeCompletionHelpView |
15 instanceVariableNames:'myView editView' |
19 instanceVariableNames:'myView editView' |
16 classVariableNames:'' |
20 classVariableNames:'' |
17 poolDictionaries:'' |
21 poolDictionaries:'' |
86 myView origin:(0.0@0.0) corner:(1.0@1.0). |
90 myView origin:(0.0@0.0) corner:(1.0@1.0). |
87 |
91 |
88 "Modified: 27.4.1996 / 15:16:46 / cg" |
92 "Modified: 27.4.1996 / 15:16:46 / cg" |
89 ! ! |
93 ! ! |
90 |
94 |
|
95 !CodeCompletionHelpView methodsFor:'event handling'! |
|
96 |
|
97 focusOut |
|
98 self topView destroy |
|
99 |
|
100 "Created: / 04-08-2018 / 10:41:59 / Claus Gittinger" |
|
101 ! |
|
102 |
|
103 keyPress:key x:x y:y |
|
104 self topView destroy |
|
105 |
|
106 "Created: / 04-08-2018 / 10:40:43 / Claus Gittinger" |
|
107 ! ! |
|
108 |
91 !CodeCompletionHelpView methodsFor:'initialization'! |
109 !CodeCompletionHelpView methodsFor:'initialization'! |
92 |
110 |
93 initStyle |
111 initStyle |
94 "setup viewStyle specifics" |
112 "setup viewStyle specifics" |
95 |
113 |
116 realize |
134 realize |
117 self create. |
135 self create. |
118 "/ self computeShape. |
136 "/ self computeShape. |
119 self enableMotionEvents. |
137 self enableMotionEvents. |
120 self enableButtonMotionEvents. |
138 self enableButtonMotionEvents. |
|
139 self enableFocusEvents. |
121 super realize |
140 super realize |
|
141 |
|
142 "Modified: / 04-08-2018 / 10:42:23 / Claus Gittinger" |
122 ! ! |
143 ! ! |
123 |
144 |
124 !CodeCompletionHelpView methodsFor:'private'! |
145 !CodeCompletionHelpView methodsFor:'private'! |
125 |
146 |
126 resizeToFit |
147 resizeToFit |
165 ! ! |
186 ! ! |
166 |
187 |
167 !CodeCompletionHelpView class methodsFor:'documentation'! |
188 !CodeCompletionHelpView class methodsFor:'documentation'! |
168 |
189 |
169 version |
190 version |
170 ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.6 2014-03-24 09:02:41 cg Exp $' |
191 ^ '$Header$' |
171 ! |
192 ! |
172 |
193 |
173 version_CVS |
194 version_CVS |
174 ^ '$Header: /cvs/stx/stx/libtool/CodeCompletionHelpView.st,v 1.6 2014-03-24 09:02:41 cg Exp $' |
195 ^ '$Header$' |
175 ! ! |
196 ! ! |
176 |
197 |