327 !MenuItem methodsFor:'accessing resource'! |
327 !MenuItem methodsFor:'accessing resource'! |
328 |
328 |
329 findGuiResourcesIn:aResourceContainerOrApplication |
329 findGuiResourcesIn:aResourceContainerOrApplication |
330 "setup a resource container |
330 "setup a resource container |
331 " |
331 " |
332 |lblImg| |
332 |lblImg m| |
333 |
333 |
334 self translateLabel ifTrue:[ |
334 self translateLabel ifTrue:[ |
335 label := ResourceRetriever findResourceLabel: label in: aResourceContainerOrApplication |
335 label := ResourceRetriever findResourceLabel: label in: aResourceContainerOrApplication |
336 ]. |
336 ]. |
337 |
337 |
338 adornment notNil ifTrue:[ |
338 adornment notNil ifTrue:[ |
339 (lblImg := adornment labelImage) notNil ifTrue:[ |
339 (lblImg := adornment labelImage) notNil ifTrue:[ |
340 lblImg findGuiResourcesIn:aResourceContainerOrApplication. |
340 lblImg findGuiResourcesIn:aResourceContainerOrApplication. |
341 lblImg labelText notNil ifTrue: [lblImg labelText: label]. |
341 lblImg labelText notNil ifTrue: [lblImg labelText: label]. |
342 ]. |
342 ]. |
343 adornment submenu notNil ifTrue:[ |
343 (m := adornment submenu) notNil ifTrue:[ |
344 adornment submenu findGuiResourcesIn:aResourceContainerOrApplication |
344 m := m value. |
|
345 m notNil ifTrue:[ |
|
346 m findGuiResourcesIn:aResourceContainerOrApplication |
|
347 ] |
345 ]. |
348 ]. |
346 ] |
349 ] |
|
350 |
|
351 "Modified: / 18.6.1998 / 16:54:25 / cg" |
347 ! ! |
352 ! ! |
348 |
353 |
349 !MenuItem methodsFor:'converting'! |
354 !MenuItem methodsFor:'converting'! |
350 |
355 |
351 fromLiteralArrayEncoding:aLiteralEncodedArray |
356 fromLiteralArrayEncoding:aLiteralEncodedArray |